首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名称为Command1的命令按钮,并编写如下程序: Private Type Record ID As Integer:Name As String*20 End Type Private Sub Command1_Click() Dim M
在窗体上画一个名称为Command1的命令按钮,并编写如下程序: Private Type Record ID As Integer:Name As String*20 End Type Private Sub Command1_Click() Dim M
admin
2016-12-13
48
问题
在窗体上画一个名称为Command1的命令按钮,并编写如下程序:
Private Type
Record ID As Integer:Name As String*20
End Type
Private Sub Command1_Click()
Dim MaxSize,NextChar,MyChar
Open"d:\temp\female.txt"For Input As#1
MaxSize=LOF(1)
For NextChar=MaxSize To 1 Step-1
MyChar=Input(1,#1)
Next
NextChar
Print EOF(1)
Close#1
End Sub
运行程序,单击命令按钮,其输出结果为
选项
A、True
B、False
C、0
D、Null
答案
A
解析
LOF函数返同给文件分配的字节数(即文件的长度),与DOS下用Dir命令所显示的数字相同。EOF函数用于判断文件指针是甭已到文件结尾,如果到达文件末尾,则返回True。通过使用EOF函数,测试是甭到达文件末尾。本题中的循环遍历了整个文件,因此循环结束时文件指针在文件结尾。
转载请注明原文地址:https://kaotiyun.com/show/h6Gp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上设计两个复选框,一个显示粗体,另一个显示斜体,通过对复选框的选择,在一个文本框中显示相应效果的文本,请完成下列程序。PrivateSubFormLoad()Check2.Caption=“显示斜体”Textl.T
设R是一个二元关系,S是一个三元关系,则下列运算中正确的是()。
在面向对象方法中,类之间共享属性和操作的机制称为__________。
建立一个新的标准模块,应该选择()下的“添加模块”命令。
在窗体上画一个名称为Timerl的计时器控件,其Enabled属性值设为False,Interval属性值设为100。要求程序运行后,当鼠标在窗体上移动时,沿鼠标经过的轨迹画出一系列半径为100的小圆。其效果如图所示,以下是实现上述功能的程序,请填空。
窗体上有一个名称为Picturel的图片框控件,一个名称为Timerl的计时器控件,其Interval属性值为1000。要求每隔5秒钟图片框右移100。现编写程序如下:PrivateSubTimerlTimer()Static
要使文件列表框中的文件随目录列表框中所选择的当前目录的不同而发生变化,应该
耦合和内聚是评价模块独立性的两个主要标准,其中【】反映了模块内各成分之间的联系。
为了在运行时能显示窗体左上角的控制框(系统菜单),必须______。
如果一个顶级菜单项的访问键为D,则以下等同于单击该菜单项的操作为
随机试题
串励式电动机常用于减速型起动机。()
在队列研究中,暴露组的疾病发病率与对照组的疾病发病率的差值称为
背景资料:某单位办公楼工程,总建筑面积2.6万平方米,地上16层,该工程基础采用桩基础,主体为框架一剪力墙结构,由某建筑施工企业负责施工。在工程施工过程中,发生了如下事件:事件一:在土方填筑过程中发现,回填土经夯实后检测,其密
会计法律制度是指国家权力机关和行政机关制定的,用以调整会计关系的各种法律、法规、规章和规范性文件的总称。()
(一)资料某公司目前拥有资金2000万元。其中,长期借款800万元,年利率10%;普通股1200万元,上年支付的每股股利2元,预计股利增长率为5%,发行价格20元,目前价格也为20元。该公司计划筹集资金100万元,企业所得税税率为25%,有两种筹资方案
某产品由3道工序加工而成,原材料在每道工序中陆续投入,各工序的材料消耗定额分别为70千克、30千克和50千克,用约当产量法分配原材料费用时,下列选项中,正确的有()。
刺激一反应的联结学习理论最初的代表人物是()
实践是认识的基础,它对认识具有决定作用,主要表现在()
AccordingtothestudybyAPA,intensifiedaggressionhadnothingtodowith______.Whichofthefollowingstatementsistrue?
有以下程序,在VC6平台上编译运行,程序运行后的输出结果是#includemain(){ints,t,A=10;doubleB=6;s=sizeof(A);t=sizeof(B);printf
最新回复
(
0
)