首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名为Command1的命令按钮,其Command1_Click事件过程如下。 Sub Command1_Click() Dim student As studtype Dim record_no As Integer
在窗体上画一个名为Command1的命令按钮,其Command1_Click事件过程如下。 Sub Command1_Click() Dim student As studtype Dim record_no As Integer
admin
2013-04-11
31
问题
在窗体上画一个名为Command1的命令按钮,其Command1_Click事件过程如下。 Sub Command1_Click() Dim student As studtype Dim record_no As Integer record n=1 With student .ino=12 .strname="Smith" .strsex=“男” .smark=89 End With ______ Put # 1,record_no,student Close # 1 End Sub 要求在c:\的随机文件student..dat写入一条记录。应在程序中空行处填入以下哪条语句使该功能完整
选项
A、Open"c:\student.dat"For Input As # 1 len=len(student)
B、Open"c:\student.dat:For random As # 1 len=len(student)
C、Open"c:\student.dat"For Output As # 1 len=len(student)
D、Open"c:\student.dat"For Append As # 1 len=len(student)
答案
2
解析
打开随机文件的一般格式为Open“文件名”For Random As#文件号[Len=记录长度]随机文件的写操作通过Put语句来实现,其格式为: Put#文件号,[记录号],变量
转载请注明原文地址:https://kaotiyun.com/show/tYhp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列可作为VisualBasic变量名的是______。
为了在运行时把图形文件piefile.jpg装入图片框对象Picture1之中,应该使用的语句为【】。
以下能够触发文本框Change事件的操作是______。
设有如下变量声明DimTestDateAsDate为变量TestDate正确赋值的表达方式是______。
窗体在屏幕上显示后有______种方法可以清除它。
在文本框中,要使键入的所有字符都显示“*”号,这时应该设置______属性为“*”号。
在窗体上利用菜单编辑器设计一个主菜单项“菜单控制”(Name属性值为mnuMenu),然后为其设计两个子菜单项“增加菜单”(Name属性值为mnuAdD)和“减少菜单”(Name属性值为mnuDel),另外设置一个标题为空的菜单项
对变量名说法不正确的是______。
下列说法中,不属于数据模型所描述的内容的是______。
下列说法中,不属于数据模型所描述的内容的是______。
随机试题
按照公文的内容性质与作用划分机关公文的类别,公文可分为()
违法违规储存危险化学品,极可能发生生产安全事故,威胁人民群众的生命财产安全。下列对危险化学品储存的要求中,错误的是()。
道路交通违法行为人应当在()内到公安机关交通管理部门接受处理。无正当理由逾期未接受处理的,吊销机动车驾驶证。
转托管可以是一只证券或多只证券,也可以是一只证券的部分或全部。()
利率作为货币资金价格的表现形式,在市场机制的作用下,不同市场的利率水平将趋于一致。()
从词性上说,幼儿对()掌握得最早。
事实一:甲(17岁)整天游手好闲,无所事事,却又好吃懒做,花钱大手大脚。为了满足日常花销,甲利用虚假的身份证明骗开了多张信用卡,每张信用卡都进行透支,但是从不还款。银行催收多次,甲都不予理睬。事实二:一日,甲实在没钱花了,于是偷偷进入奶奶家,将奶
甲、乙、丙、丁四公司之间形成了三角债。甲建材公司拖欠丙钢铁公司货款170万元。乙建筑工程公司欠甲建材公司材料款180万元。乙建筑工程公司在给丁科研所建好一幢大楼后,因资金尚未到位,丁科研所尚欠乙建筑工程公司工程款180万元。为了尽早了结债务,2008年8月
已知方程x3+2x2-3x-4=0的根为x1=-1,x2,x3,则1/x2+1/x3=()。
Maplesarealwaysusedtosymbolize______.
最新回复
(
0
)