首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名称为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
51
问题
在窗体上画一个名称为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
以下关于命令按钮的叙述中正确的是
为了使命令按钮的Picture、DownPicture或DisabledPicture属性生效,必须把它的Style属性设置为
如果把命令按钮的Cancel属性设置为True,则程序运行后
某人编写了下面的程序,希望能把Textl文本框中的内容写到out.txt文件中PPrivateSubCommandl_Click()Open”out.txt”ForOutputAs#2Print”
设有如下程序:PrivateSubForm_Click()num=InputB0x(”请输入一个实数”):P=InStr(num,”.”)Ifp>0Then
窗体上有两个名称分别为Text1、Text2的文本框。Text1的KeyUp事件过程如下:PrivateSubText1_KeyUp(KeyCodeAsInteger,ShiftAsInteger)DimCA
在窗体上画两个文本框,其名称分别为Text1和Text2,然后编写如下程序:PrivateSubForm_Load()Text1.Text=””:Text2.Text=””:Text1.SetFocusEnd
随机试题
有一定毒性的开窍药是
最常选用的表面麻醉剂是
甲市某公司因为业务发展需要,准备招聘一批技术人员从事产品开发工作。经过层层选拔,最终录用了李某、王某、张某和赵某,并约定每月工资为5000元。请结合人力资源管理的知识回答下列问题:
委托人向监理人支付报酬的期限和方式是在( )中明确的。
根据《生产安全事故报告和调查处理条例》,以下属于一般事故的是()。
在正常使用条件下,以下关于建设工程最低保修期限的说法,符合《建设工程质量管理条例》规定的是()。
关于房地产开发企业土地增值税税务处理,下列说法错误的是()。
下列属于营业税纳税人的是()。
简述定量分析中数据描述的三个量数并解释其含义。
计算三重积分|x2+y2+z2-1|dv,其中Ω={(x,y,z)|x2+y2+z2≤2).
最新回复
(
0
)