首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
某人编写了向随机文件中写一条记录的程序,代码如下: Type RType Name As String*10 Tel As String * 20 End Type Private Sub Commandl_Click() Di
某人编写了向随机文件中写一条记录的程序,代码如下: Type RType Name As String*10 Tel As String * 20 End Type Private Sub Commandl_Click() Di
admin
2020-07-22
43
问题
某人编写了向随机文件中写一条记录的程序,代码如下:
Type RType
Name As String*10
Tel As String * 20
End Type
Private Sub Commandl_Click()
Dim p As RType
P.Name=InputBox(”姓名”)
P.Tel=InputBox(”电话号”)
Open”Books.dat”For Random As#1
Put#1..P
Close#1
End Sub
该程序运行时有错误,修改的方法是( )。
选项
A、在类型定义“Type RType”之前加上“Private”
B、Dim P As RType必须置于窗体模块的声明部分
C、应把Open语句中的For Random改为For Output
D、Put语句应该写为Put#1,P.Name,P.Tel
答案
A
解析
记录类型的定义必须放在模块的声明部分,当在标准模块中定义时,关键字Type前可以有Public(默认)或Private,而如果在窗体模块中定义,则必须在前面加上关键字Private。Open语句中使用For Random表示文件以随机方式存取。Put语句的语法为:Put#文件号,[记录号],变量。其中“变量”是除对象变量和数组变量外的任何变量。
转载请注明原文地址:https://kaotiyun.com/show/IrHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
从键盘上输入一个浮点数asingle,利用字符串函数对该数进行处理后,如果输出的内容不是“非浮点数”,则对程序输出的内容分析正确的是()。asingle=InputBox("请输入一个浮点数:")str1$=Str$(asing
有下面程序代码:OptionBase1PrivateSubCommand1_Click()Dima(10)AsInteger,x,bx=InputBox("请输入一个多位整数")
如果要在窗体上画一个标签,应在工具箱窗口中选择的图标是( )。
以下关于过程及过程参数的叙述中,错误的是
运行下列程序时,输出的结果是()。PrivateSubForm_Click()Dimxx=Array(”Software”,”and”,”Hardware”,”System”)For
线性表常采用的两种存储结构是()。
(1)在考生文件夹下有一个工程文件sit3.vbp,其功能是:①单击“读数据”按钮,则把考生文件夹下in3.dat文件中的0~999之间的100个整数读入数组a中:②单击“计算”按钮,则找出这100个整数巾所有水仙花数,并将它们的最大值与最小值分别显示
以下关于VB文件的叙述中,正确的是
在标准模块中,将a定义为全局整型变量的语句是
下列关于算法复杂度叙述正确的是
随机试题
CT的像素范围为
A.天麻钩藤饮B.羚羊钩藤汤C.参附汤合生脉散D.桃仁承气汤E.涤痰汤中风闭证属痰火瘀闭者,证选方为
性成熟期一般自
全社会政治、经济和文化生活的主题之一是()。
动植物性包装物、铺垫材料进境时,货主或者其代理人应当及时向口岸出入境检验检疫机构申报;检验检疫机构可以根据具体情况对申报物实施检疫。( )
旗形与楔形大多为整理形态,楔形偶尔也可能出现在顶部或底部而作为反转形态。()
()发布了《加强银行公司治理的原则》,提出银行实现稳健公司治理的14条原则。
甲公司是ABC会计师事务所的常年审计客户,是一家集粮食收储、大米和油脂加工、保健品系列产品生产销售及科研开发为一体的股份有限公司。A注册会计师负责审计甲公司2017年度财务报表,拟于2018年3月30日出具审计报告。财务报表整体的重要性水平为50万元。资
试分析期货价格与远期价格的关系。
简述原保险市场与再保险市场的关系。
最新回复
(
0
)