首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名称为Command1的命令按钮,编写如下程序代码 Private Type Student sn As String*10 class As String*20 score As Double End Type Private Sub Co
在窗体上画一个名称为Command1的命令按钮,编写如下程序代码 Private Type Student sn As String*10 class As String*20 score As Double End Type Private Sub Co
admin
2018-06-20
31
问题
在窗体上画一个名称为Command1的命令按钮,编写如下程序代码
Private Type 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:\Seorelist.dat已存在并且有记录,单击命令按钮,可以修改文件中的一条记录
B、若文件C:\Scorelist.dat不存在,则Open语句执行中出现“文件未找到”的错误
C、文件C:\Scorelist.dat中的每条记录长度可以不同,但记录最长为Len(s)
D、定义记录类型Student的Type语句可以移到事件过程Commandl_Click中
答案
A
解析
在Open语句中指定文件的访问方式为输出(Output)、附加(Append)或随机(Random),若打开的文件不存在,则建立相应的文件。本题中指定的访问方式为Random,所以B选项叙述错误;对于用随机访问方式打开的文件,其每个记录的长度必须是相同的,C选项叙述错误;记录类型的定义必须放在模块(包括标准模块和窗体模块)的声明部分,D选项叙述错误,本题A选项叙述正确。本题选择A选项。
转载请注明原文地址:https://kaotiyun.com/show/MiGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
有下面程序代码:PrivateSubCommandl_Click()DimxAsInteger,sAsIntegerx=1Fork=1To3x
如果将命令按钮的访问键设置为“D”,以下不会触发命令按钮Click事件的操作是
命令按钮不支持的事件为
如果改变驱动器列表框的Drive属性,则将触发的事件是
窗体上有一个名称为Commandl的命令按钮,单击该按钮时所实现的功能是产生10个随机整数,然后从键盘输入一个整数,查找该数在数组中的位置。若找到,输出该数的位置;若没有找到,给出相应的提示。该命令按钮的单击事件过程如下:PrivateSub
在窗体上画一个文本框,名称为Text1,然后编写如下程序:PrivateSubForm_Load()Textl.Text="":Textl.SetFocusEndSubPrivateSubFor
设有如下程序:PrivateSubForm_Click()num=InputB0x(”请输入一个实数”):P=InStr(num,”.”)Ifp>0Then
窗体上有一个名称为Text1的文本框,一个名称为Commandl的命令按钮。窗体文件的程序如下:PrivateTypexaAsInteger:bAsIntegerEndTypePrivateSu
在窗体上画一个命令按钮,然后编写如下事件过程:PrivateSubCommandlClick()a$=InputBox(”请输入一个二进制数”):n=Len(a$)Fori=1Ton
随机试题
A.青霉素GB.红霉素C.氨基糖苷类抗生素D.耐青霉素酶的半合成青霉素肺炎链球菌肺炎的首选治疗药物是
诊断急性肝炎或慢性肝炎活动期最敏感的试验项目是
患者,男性,59岁,患十二指肠溃疡5年。今晨起突然排出大量柏油样黑便,并出现恶心、头晕、心悸、无力,由家人送至医院急诊。查体:体温36.3℃,血压85/50mmHg,脉搏115次/分钟;患者面色苍白、出冷汗、四肢湿冷;腹部稍胀,上腹部有轻度压痛,肠鸣音亢进
我国《刑法》规定,已满14周岁不满16周岁的人,应对()行为负刑事责任。
甲8岁,在没有告诉家长的情况下,将其佩戴的一枚玉坠送给邻居乙。该玉坠为甲的祖母在甲过生日时所赠,价值5000元左右。甲、乙之间的赠与协议的效力为()。
下列组合是“后三头同盟”的是()①屋大维②恺撒③安东尼④雷必达
冒泡排序在最坏情况下的比较次数是()。
A、 B、 C、 A
Whenmostanimalsdie,naturelikestotidyupbymakingtheirbodiesdisappear.Theremainsgeteatenbyscavengers,bonesare
Goandgetyourcoat.It’s______youleftit.
最新回复
(
0
)