首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设在工程中有一个标准模块,并定义了如下类型: 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
61
问题
设在工程中有一个标准模块,并定义了如下类型:
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() a=0 k=1 DoWhilek
下面不属于软件设计阶段任务的是
在考生文件夹下有一个工程文件sjt5.vbp,已给出了所有控件(如图3.62所示)和部分程序。程序运行时,请按以下顺序操作:1)单击“读入文件”按钮,把考生目录下的文件in5.dat中的内容读入内存并显示在上面的文本框(Text1)中;2)单击“加密”
一棵二叉树中共有80个叶子结点与70个度为1的结点,则该二叉树中的总结点数为
以下能从字符串“VisualBasic”中直接取出子字符串“Basic”的函数是()。
在考生文件夹下有一个工程文件sjt5.vbp。其窗体中有2个标题分别为“读数据”和“查找水仙花数”的命令按钮。请画1个名称为Text1、初始值为空的文本框,该文本框允许显示多行内容,且有垂直滚动条,如图所示。程序功能如下:(1)考生文件
下列关于滚动条的叙述中,错误的是
以下关于控件数组的叙述中,正确的是( )。
数据库管理系统是()。
定义学生选修课程的关系模式如下:S(S#,Sn,Sd,Sa)(其属性分别为学号、姓名、所在系、年龄);C(C#,Cn,P#)(其属性分别为课程号、课程名、先选课);SC(S#,C#,G)(其属性分别学号、课号和成绩)。检索选修课程名为“操作系统”的
随机试题
学生申诉制度建立的法律依据是()
领导者把握领导规律、履行领导职能的最高境界是
在食品加工人员中,常洗手是防止食品污染的有效措施,必须洗手的环节有
A.放置宫内节育器大小应参考宫腔大小B.宫内节育器要一次放至宫底部C.为便于术后随访,尾丝应留2cmD.探针超过宫腔深度时应停止操作E.子宫腔过大伴轻度子宫脱垂者
下列各项,不属胎膜早破常见病因的是
在服务项目的管理过程中,经常会忽略项目的需求调研和(),而这两个阶段对于服务项目管理来说恰恰是至关重要的。
管理会计是会计的重要分支,主要服务于单位。
根据《支付结算办法》的规定,办理托收承付的收付双方必须()。
Theideathatsomegroupsofpeoplemaybemoreintelligentthanothersisoneofthosehypothesesthatdarenotspeakitsnam
Youaregoingtoreadatextoftipsoninterview,followedbyalistofexplanations(orexamples).Choosethebestexplanation
最新回复
(
0
)