首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
以下事件过程的功能是:从已存在于磁盘上的顺序文件Numl.txt中读取数据,计算读出数据的平方值,将该数据及其平方值存入新的顺序文件Nurn2.txt中。则在以下横线处合适的语句是( )。 Private Sub Form_Click() Dim文A
以下事件过程的功能是:从已存在于磁盘上的顺序文件Numl.txt中读取数据,计算读出数据的平方值,将该数据及其平方值存入新的顺序文件Nurn2.txt中。则在以下横线处合适的语句是( )。 Private Sub Form_Click() Dim文A
admin
2020-07-22
61
问题
以下事件过程的功能是:从已存在于磁盘上的顺序文件Numl.txt中读取数据,计算读出数据的平方值,将该数据及其平方值存入新的顺序文件Nurn2.txt中。则在以下横线处合适的语句是( )。
Private Sub Form_Click()
Dim文As Single,YAs Single
Open“Numl.txt”For Input As#1
Open“Num2.txt”For Output As#2
Do While Not EOF(1)
Print x
y=x^2
Print y
Loop
Close#1.#2
End Sub
选项
A、Input#1,Y’Print#2x,y
B、Input#2,x Print#1,x,y
C、Print#1,x Input#2,x,y
D、Input#1,x Print#2,x,y
答案
D
解析
本题考查顺序文件的操作。打开文件Num1和文件Num2,文件号为1和2。如果1号文件不为空,则利用Input读出数据,Input使用格式为:Input#文件号,变量列表。计算平方以后,利用Print将信息结果写入到2号文件中,Print的使用格式为;Print#文件号’[输出列表]。
转载请注明原文地址:https://www.kaotiyun.com/show/vNHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
VB的数值型数据分为()两种。
窗体上有一个名称为Timerl的计时器控件,一个名称为Shapel的形状控件,其Shape属性值为3(Circle)。编写程序如下:PrivateSubForm—Load()Shapel.Top=0Timerl.Inter
在窗体上画一个文本框(名称为Text1)和一个标签(名称为Label1),程序运行后,在文本框中每输入一个字符,都会立即在标签中显示文本框中字符的个数。以下可以实现上述操作的事件过程是()。
在窗体中添加一个命令按钮、一个标签和一个文本框,并将文本框的Text属性置空,编写命令按钮Command1的Click事件代码:PrivateFunctionfun(xAsLong)AsBooleanIfxMod2=0
(1)在考生文件夹下有一个工程文件sjt3.vbp。程序运行时,单击窗体则显示如图所示的图案。请去掉程序中的注释符,把程序中的?改为正确的内容。注意:不能修改程序的其他部分和控件属性。最后将修改后的文件按原文件名存盘。(2)在考生文件夹下有一个
数据库设计过程不包括
下面关于数据库三级模式结构的叙述中,正确的是()。
为了通过传值方式来传送过程参数,在函数声明部分应使用的关键字为
以下选项中,不合法的VisualBasic的变量名是
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。在名称为Form1的窗体上画一个名称为List1的列表框,在属性窗口中为列表框添加三个选项:北京、上海、天津。再建立一个下拉菜单,菜单标题为“文件”,名称为File,此菜单下
随机试题
税法调整对象的性质。
简述企业的流程要素。
在评价一项公共卫生服务时,以下指标哪项指标是效用指标
霍乱患者最早出现的病理生理改变是
职能式组织结构的主要特点是()。
执业资格是指从业人员具有相应的注册执业资格证书,目前国家已实行涉及建筑业勘察设计类的主要执业资质是()。
-1,1,7,25,79,()
目前的乡镇干部,白天到乡镇上班,晚上回城镇休息,我们称他们为走读干部。对此你怎么看?
WhichofthefollowingstatementsabouttheEuropeansoldiersiscorrect?Accordingtotheauthor,itishardforasocietyto
ManyforeignerswhohavenotvisitedBritaincallalltheinhabitantsEnglish,fortheyareusedtothinkingoftheBritishIsle
最新回复
(
0
)