首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设在工程中有一个标准模块,并定义了如下类型: Type Stutype ino As Integer stmame As String*20 strsex As String*2 smark As Single
设在工程中有一个标准模块,并定义了如下类型: Type Stutype ino As Integer stmame As String*20 strsex As String*2 smark As Single
admin
2020-07-22
67
问题
设在工程中有一个标准模块,并定义了如下类型:
Type Stutype
ino As Integer
stmame As String*20
strsex As String*2
smark As Single
End Type
在窗体上画一个名为Command1的命令按钮,要求当执行事件过程Command1_Click时,在C盘根目录下的随机文件Student.dat中写入一条记录。下列能够完成该操作的是( )。
选项
A、Sub Command1_Click()
Dim student As Studtype
Dim record_no As Integer
record_no=1
With student
.ino=12:.stmame="smith":
.strsex==男=:.smark=89
End With
Open"c:\Student.dat"For Input As#1 Len
=Len(Student)
Put#1,record_no,Student
Close#1
End Sub
B、Sub Command1_Click()
Dim Student As Stutype
Dim Record_no As Integer
Record_no=1
With Student
.ino=12:.strname="smith"
.strsex="男":.smark=89
End With
Open"c:\student.dat"For RandomAs As#1
Len=Len(Student)
put#1,Record_no,Student
Close#1
End Sub
C、Private Sub Command1_Click()
DimStudent As Stutype
Dim Record no As Integer
Record_no=1
With Student
.ino=12:.stmame="smith"
.strsex="男":.smark=89
End With
Open"c:\student.dat"For Random As 1
Len=Len(Student)
Write#1,Record_no,Student
Close#1
End Sub
D、Sub Command1_Click()
Dim Student As Stutype
Dim Record_no As Integer
Record_no=1
With Student
.ino=12:.stmame="smith"
.strsex="男":.smark=89
End With
Open"c:\student.dat"For Output As#1
Len=Len(Student)
Put#1,Record_no,Student
Close#1
End Sub
答案
B
解析
本题考查文件操作。题目中要求以随机的方式(Random)打开一个文件,打开文件的方法格式为:Open FileNamn For Random As#文件号[Len=记录长度],然后以Put方法写入一条记录,方法的格式为:Put[#]文件号,[记录号],变量名。
转载请注明原文地址:https://kaotiyun.com/show/0fHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
编写如下程序:PrivateSubCommand1_Click()DimnAsLong,sAsStringn=InputBox("输入一个数")DoWhilen0Printn\10
窗体上有2个名称分别为Text1和Text2的文本框。编写如下程序:PrivateSubForm_Load()Text1.Text=""Text2.Text=""EndSubPrivateSubCommand1_Cl
假定有如下语句:answer$=MsgBox("Stringl",,"String2","String3",2)执行该语句后,将显示一个信息框,单击其中的“确定”按钮,则answer$的值为()。
以下叙述中错误的是
在考生文件夹下有一个工程文件sjt5.vbp,已给出了所有控件(如图3.62所示)和部分程序。程序运行时,请按以下顺序操作:1)单击“读入文件”按钮,把考生目录下的文件in5.dat中的内容读入内存并显示在上面的文本框(Text1)中;2)单击“加密”
(1)在考生文件夹下有一个工程文件sit3.vbp。程序的功能是通过键盘向文本框中输入正整数。在“除数”框架中选择一个单选按钮,然后单击“处理数据”按钮,将大于文本框中的正整数且能够被所选除数整除的5个数添加到列表框Ifistl中,如图3-23所示。在窗体
假定在标准模块中的声明部分有如下语句:PublicVarAAsInteger而在窗体模块的声明部分有如下语句:PublicVarBAsInteger则以下叙述中正确的是
命令按钮Command1的MouseUp事件过程结构如下:PrivateSubCommand1_MouseUp(ButtonAsInteger,ShiftAsInteger,
下面不属于软件需求分析阶段主要工作的是
一棵二叉树中共有70个叶子结点与80个度为1的结点,则该二叉树中的总结点数为
随机试题
如果把“遵纪守法”与“遵守课堂纪律”并列为同级评价指标,这就违背了设计指标体系的
葡萄胎不需要给预防性化疗的是下列哪项
A.大杼B.膏肓C.申脉D.攒竹E.志室善于治疗急性腰扭伤的腧穴是
下列关于法的概念与特钲的表述,错误的是()。(2008年多项选择第41题)
辅助生产费用按计划成本分配法分配计入基本生产成本的费用与其他分配方法分配计入基本生产成本的费用总额相同。()
下列属于应当征收增值税的混合销售行为是()。
据有关专家介绍:如果将一种经过基因工程加工的“溶瘤病毒”注射到人的肿瘤部位,病毒就会成千上万地高速复制,最终撑破肿瘤细胞,肿瘤也就溶解了。但也因此使部分肿瘤细胞进入血液,随着循环系统进入其他部位,从而导致肿瘤的转移。此时,如果对病人肿瘤部位加热,人体会大量
代位继承是指被继承人的子女先于被继承人死亡时,由被继承人的死亡子女的晚辈直系血亲继承其应继承的遗产份额的制度。根据以上定义,下列属于代位继承的是()。
拜占庭中等教育学习的基本内容是()。
Nowadays,airtravelisvery【C1】______.WearenotsurprisedwhenwewatchonTVthatapoliticianhastalkedwithFrenchPresid
最新回复
(
0
)