首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim s1 As String, s2 As String Open "D:\data.txt" For Input
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim s1 As String, s2 As String Open "D:\data.txt" For Input
admin
2015-06-30
61
问题
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:
Private Sub Command1_Click()
Dim s1 As String, s2 As String
Open "D:\data.txt" For Input As #1
Seek #1, 5
s1 = Input$(2, #1)
s2 = Input$(3, #1)
Print Seek(1)
Close #1
End Sub
假设有磁盘文件D:\data.txt,且文件足够长,当程序运行时,单击Command1,在窗体上输出的结果是
选项
A、5
B、9
C、10
D、11
答案
C
解析
文件的打开,[格式]Open文件说明[For方式][Access存取类型][锁定]As #文件号[Len=记录长度]。其功能,为文件的输入输出分配缓冲区,并确定缓冲区所使用的存取方式。Input$函数,[格式]Input $(n,#文件号)。该函数返回从指定文件中读出的n个字符的字符串(即它可以在数据文件中读取指定数目的字符)。文件指针Seek, [格式]Seek #文件号,位置,用于实现文件指针的定位。程序开始执行时,先定义了两个字符串变量s1,s2。Open "D:\data.txt" For Input As #1,上面的代码是以顺序输入方式打开已经存在于D盘下的data.txt文件,并为其起个别名为文件号1,Seek #1,5将文件指针定位于位置5;s1 = Input$(2,#1)从D盘下的data.txt文件中读出的2个字符,当前文件指针向后移2位,文件指针位于位置7;s2 = Input$(3,#1)从D盘下的data.txt文件中读出的3个字符,当前文件指针向后移3位,文件指针位于位置10;Print Seek(1)返回文件指针当前的位置,当前文件指针位于10。Close #1关闭文件1,即D盘下的data.txt文件。故本题正确答案为C。
转载请注明原文地址:https://kaotiyun.com/show/YNQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体中添加一个命令按钮,然后编写如下代码:PrivateSubCommand1_Click()a=InputBox("请输入一个整数")b=InputBox("请输入一个整数")PrintVa
在程序运行期间,如果拖动滚动条上的滚动块,则触发的滚动条事件是______。
下面程序运行后,窗体中显示【】。PrivateSubCommand1_Click)()aS="*":b$="$"Fork=1To3x$
设置复选框中或单选按钮的标题对齐方式的属性是______。
在窗体上画一个命令按钮(其名称为Command1),然后编写如下事件过程:PrivateSubCommand1_Click()Fori=1To4Ifi=1Thenx=iIfi<=4
启动VisualBasic中,用鼠标右键单击窗体时所显示的菜单是()
以下语句错误的是:______。
为了防止一个用户的工作不适当地影响另一个用户,应该采取______。
表达式Fix(-32)+Int(-24)的值为【】。
公司中有多个部门和多名职员,每个职员只能属于一个部门,一个部门可以有多名职员,从职员到部门的联系类型是
随机试题
慢性淋巴细胞白血病
维持蛋白质二级结构的主要作用力是
下列固定资产中应计提折旧的有()。
根据海关规定,对加工贸易货物物品备案征收的担保资金属于:
特别准备金的计提基数为()。
通过编制应收账款账龄分析表并加以分析,可以了解各顾客的欠款金额、欠款期限和偿还欠款的可能时间。()
已知双曲线的离心率为3,且左焦点F1的坐标为(-3,0).若双曲线上有一点M,满足MF1⊥x轴,则△MF1F2的面积等于().
学校情境中的学习驱力由以下三个方面组成:认知内驱力、自我提高内、驱力和_______内驱力。
Sendforadoctorquickly.Theoldman______.
HospitalityAnAmericanfriendhas【T1】________________youtovisithisfamily.Butif【T2】________________anAmerican’sh
最新回复
(
0
)