首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名称为Command1的命令按钮,并编写如下程序: Privme Type Record ID As Integer:Name As String*20 End Type Private Sub Comma
在窗体上画一个名称为Command1的命令按钮,并编写如下程序: Privme Type Record ID As Integer:Name As String*20 End Type Private Sub Comma
admin
2019-03-08
37
问题
在窗体上画一个名称为Command1的命令按钮,并编写如下程序:
Privme 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、Nun
答案
A
解析
LOF函数返回给文件分配的字节数(即文件的长度),与DoS下用Dir命令所显示的数字相同。EOF函数用于判断文件指针是否已到文件结尾,如果到达文件末尾,则返回True。通过使用EOF函数,测试是否到达文件末尾。本题中的循环遍历了整个文件,因此循环结束时文件指针在文件结尾。
转载请注明原文地址:https://jikaoti.com/ti/v7m0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
为计算1+2+22+23+24+…+210的值,并把结果显示在文本框Text1中,若编写如下事件过程:PrivateSubCommand1Click() Dima&,s&,k& s=1 a=2 Fork=2To10
窗体上有1个名称为Text1的文本框,1个名称为Label1的标签。程序运行后,如果在文本框中输入信息,则立即在标签中显示相同的内容。以下可以实现上述操作的事件过程为( )。
(1)在名称为Form1、标题为“菜单”的窗体上,设计满足如卜要求的菜单。程序运行后的窗体如图所示,存盘时,将文件保存至考生文件央下,且工程文件名保存为sjt1.vbp,窗体文件名保存为sjt1.frm。(2)在名称为Form1的窗
若要清除列表框控件中的所有列表项,应该使用的方法是
VB中,若没有显式声明变量的数据类型,则默认的类型是
表达式2*3^2+4*2/2+3^2的值是()。
函数表达式Sgn(-10)的值是
(1)在名称为Form1的窗体上添加一个名称为C1、标题为“改变颜色”的命令按钮,窗体标题为“改变窗体背景色”。编写程序,使得单击命令按钮时,将窗体的背景颜色改为红色(&HFF&)。运行程序后的窗体如图所示。要求:程序中不得使用变量,每个事件过程
随机试题
当前,社会治理形势复杂,仅靠职能部门、专业力量远远不够,迫切需要人民群众和社会各界的积极支持与参与,共同创造公共价值。众包是公众和外包的组合词,意指发包方依托互联网或其衍生工具,在数字平台上设计规则与任务并向广泛、非确定的公众发包,公众根据自身能力自愿接包
以下各项属古代人口户籍登录管理制度的有
A.油脂性基质B.吸水性C.硬脂酸D.黏度调节剂E.水溶性基质羊毛脂不仅可提高软膏剂的渗透性,也可以增强软膏剂的()。
按照我国《合同法》的有关规定,下列关于效力待定合同的说明,正确的是()。
可转换公司债券的()是指债券持有人可按事先约定的条件和价格,将所持债券卖给发行人。
Paperisdifferentfromotherwasteproducebecauseitcomesfromasustainableresource:trees.(21)themineralsandoilused
根据企业所得税法规定,下列保险费不可以税前扣除的是()。
目前有两种主要的闪存技术,一种是【61】Flash,其特点是以字节为单位随机存取;另一种是【62】Flash,以页(行)为单位随机存取。(填写用英文大写字母表示的简称)
ThewholeoftheUnitedStatescheereditslatesthero,AshleySmith,withtheFederalBureauofInvestigationsayingitwaspla
Itwastwoyearsagotodaythatthehuntingbancameintoforce,supposedlyendingcenturiesoftradition.However,thelawhas
最新回复
(
0
)