首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设在工程中有一个标准模块,其中定义了如下记录类型: TyPe Record ID A3 Integer Name As String*20 End TyPe 在窗体中添加一个名为Command1的命令按
设在工程中有一个标准模块,其中定义了如下记录类型: TyPe Record ID A3 Integer Name As String*20 End TyPe 在窗体中添加一个名为Command1的命令按
admin
2009-02-13
47
问题
设在工程中有一个标准模块,其中定义了如下记录类型: TyPe Record ID A3 Integer Name As String*20 End TyPe 在窗体中添加一个名为Command1的命令按钮,假设d:\F1.dat文件中含有5个用户自定义类型的记录。要求当执行事件过程Command1_Click时,随机访问该文件,并把文件中的第4条记录读出。下列能够完成该操作的程序段是
选项
A、Private Sub Command1_Click( ) Dim MyRecord As Record,Position Open"d:\F1.dat"For Random As#1 Len=Len(My RecorD)Position=4 Get#1,Position,Myrecord Close #1 End Sub
B、Private Sub Command1_Click( ) Dim MyRecord As Record,Position Open"d:\F1.dat"For Random As #1 Len=Len(MyRecorD)Position=4 Put #1,Position,MyRecord Close#1 End Sub
C、Private Sub Command1_Click( ) Dim MyRecord As Record,Position Open"d:\F1.dar"For OutPut As #1 Len=Len(My RecorD0Position=4 Get #1,Position,MyRecord Close#1 End Sub
D、Private Sub Command1_Click( ) Dim MyRecord As record,Position Open"d:\F1.dat"For lnput As #1 Len=Len(MyRecorD)Position=4 Get #1,Position,MyRecord Close#1 End Sub
答案
1
解析
由于是以随机方式访问该文件,故打开方式为Random。选项C以Output方式打开,选项D以Input方式打开都是错误的。同时由于要读出第四条记录,故使用Get#语句。
转载请注明原文地址:https://kaotiyun.com/show/P91p777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
执行完语句int[]x=newint[25];后,则下列哪个说法是正确的?()
下面说法哪个是正确的?()
一元算术运算符中,运算符+的功能是()。
下列叙述中正确的是
请完成Java程序:本题是一个冒泡排序程序的实例。冒泡排序的含义是将相邻的两个数作比较,如果是升序排列的话,如果前边的数大,则将两个数交换。从第一个数开始两两比较一次,就可以将最大的数移动到最后。注意:请勿修改main()主方法和其他已有语句内容,
软件工程概念的出现源自【】。
下列代表十六进制整数的是
程序流程图中的箭头代表的是()。
软件工程研究的内容主要包括:【】技术和软件工程管理。
下列Applet在窗口中实现一个不可编辑的TextField,并且显示“ok”。请填写正确的程序在横线处。importjava.applet.Applet;importjava.awt.*;publicclassTest14
随机试题
普通话中同义词的差别表现在哪些方面,请举例说明。
遗精的发病机制,主要责之于尿浊的发病机制,主要责之于
在其他条件不变的情况下,股票分割会使发行在外的股票总数增加,进而降低公司资产负债率。()
32,2,4,16,8,8,1,()
火中取栗:坐享其成
简述行政征收和行政征用的区别。
判断级数的敛散性。
以下选项中不属于C语言的类型的是______。
)窗体中有命令按钮Command32,其Click事件代码如下。该事件的完整功能是:接收从键盘输入的10个大于0的整数,找出其中的最大值和对应的输入位置。PrivateSubCommand32_Click()max=0
A、Hewillhelpthewomanwithherreading.B、Theloungeisnotaplaceforhimtostudyin.C、Hefeelssleepywheneverhetries
最新回复
(
0
)