首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名称为Command1的命令按钮,编写如下程序代码 Private Tvpe Student sn As String*10 class As String*20 score As Double End T
在窗体上画一个名称为Command1的命令按钮,编写如下程序代码 Private Tvpe Student sn As String*10 class As String*20 score As Double End T
admin
2019-08-21
62
问题
在窗体上画一个名称为Command1的命令按钮,编写如下程序代码
Private Tvpe Student
sn As String*10
class As String*20
score As Double
End Type
Private Sub Command1_Click()
Dim S As Student
Dim s1 As Student
Open"C:\Scorelist.dat"For Random As#1 Len=Len(s)
s.sn="张一帆"
s.class="计2014-1班"
s.score=90
Put#1,,S
Close#1
End Sub
以下叙述中正确的是( )。
选项
A、若文件C:\Scorelist.dat已存在并且有记录,单击命令按钮,可以修改文件中的一条记录
B、若文件C:\Scorelist.dat不存在,则Open语句执行中出现“文件未找到”的错误
C、文件C:\Scorelist.dat中的每条记录长度可以不同,但记录最长为Len(S)
D、定义记录类型Student的Type语句可以移到事件过程Command1_Click中
答案
A
解析
在Open语句中指定文件的访问方式为输出(Output)、附加(Append)或随机(Random),若打开的文件不存在,则建立相应的文件。本题中指定的访问方式为Random,所以B选项叙述错误;对于用随机访问方式打开的文件,其每个记录的长度必须是相同的,C选项叙述错误;记录类型的定义必须放在模块(包括标准模块和窗体模块)的声明部分,D选项叙述错误,本题A选项叙述正确。本题选择A选项。
转载请注明原文地址:https://kaotiyun.com/show/xOUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下关于多重窗体程序的叙述中,错误的是
设有如下通用过程:PublicFunctionFun(xStrAsString)AsStringDimtStrAsString,strLAsIntegertStr=""strL=Len(xStr)i=1DoWhil
在某个事件过程中定义的变量是
下列可作为VisualBasic变量名的是
窗体上有1个名称为Commandl的命令按钮,事件过程如下:PrivateSubCommandl_Click()Dimx%,y%,z%x=InputBox("请输入第1个整数"):y=InputBox("请输入第2个整数")DoUnt
默认情况下,下面声明的数组的元素个数是Dima(5,-2To2)
软件按功能可以分为:应用软件、系统软件和支撑软件(或工具软件)。下面属于应用软件的是
(1)在考生文件夹下有一个工程文件sjt3.vbp,其功能是:①单击“读数据”按钮,则把考生文件夹下:in3.dat文件中的100个正整数读入数组a中;②单击“统计”按钮,则找出这100个正整数中的所有完全平方数(一个整数若是另外一个整数的平方,那么它
在软件开发中,需求分析阶段产生的主要文档是()。
设子程序过程定义的首部为:PublicSubS(XAsInteger,YAsSingle)则以下正确的调用形式为
随机试题
营养结肠的动脉
中国共产党的“三大”作风是
金刚烷胺主要用于治疗和预防下列哪种疾病
关于美国劳动关系模式特征的说法,正确的是()。
采用从量定额计征的消费税,根据按税法确定的()计算确定。
何为直观性原则?在教学中贯彻这一原则有哪些基本要求?
沟通在管理中举足轻重,其主要功能体现在()。
世界工人运动史上最早的武装起义是()。
(1)HarryS.TrumanHighSchoolintheBronxhaseightfloors,sevengymnasiums,afootballfieldandaplanetarium.Butthereis
Anoldsongsaysthat"lovemakestheworldgoaround."Ifyou【C1】______AmericansonValentine’sDay,youcanbelieveit.Thewh
最新回复
(
0
)