首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
以下事件过程的功能是:从已存在于磁盘上的顺序文件Num1.txt中读取数据,计算读出数据的平方值,将该数据及其平方值存入新的顺序文件Num2.txt中。则在以下横线处合适的语句是( )。 Private Sub Form_Click() Dim x
以下事件过程的功能是:从已存在于磁盘上的顺序文件Num1.txt中读取数据,计算读出数据的平方值,将该数据及其平方值存入新的顺序文件Num2.txt中。则在以下横线处合适的语句是( )。 Private Sub Form_Click() Dim x
admin
2017-06-22
69
问题
以下事件过程的功能是:从已存在于磁盘上的顺序文件Num1.txt中读取数据,计算读出数据的平方值,将该数据及其平方值存入新的顺序文件Num2.txt中。则在以下横线处合适的语句是( )。
Private Sub Form_Click()
Dim x As Single,y As Single
Open"Num1.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#2,x,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/ADGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
关于结构化程序设计原则和方法的描述错误的是()。
下列事件过程的功能是:建立一个名为Datal的随机文件,存放角度值及这些角度的正弦函数值和余弦函数值,角度为1,2,3,...,90。请在空白处填入适当的内容,将程序补充完整。PrivateTypeAngKAsIn
下面属性中,用于自动调整图像框中图形内容的大小的是
下面叙述中正确的是()。
对关系S和R进行集合运算,结果中既包含S中的所有元组也包含R中的所有元组,这样的集合运算称为()。
关系操作的特点是______操作。
在软件生命周期法中,用户的参与主要在______。
在链表的运算过程中,能够使空表与非空表的运算统一的结构是______。
下列是一个循环结构的程序,循环体内的语句将执行的次数是k=0Fori=1to100 Forj=1to10 k=k+1 NextNext
以下循环的执行次数是【】。k=0DoUntilk>=10k=k+1Loop
随机试题
“一两遗传胜过一吨教育”是()的观点。
区别新民主主义革命与旧民主主义革命的根本标志是【】
Asuccessionof______visitsbythetwocountries’leadershavetakentheirrelationsoutofthecooleroverthepast20months.
经、带、胎、产诸病,凡出现肾阴不足之证,其治则为
以下属手太阳小肠经的穴位是
产权比率越高,通常反映的信息是()。
思运公司2011年的有关资料如下:(1)息税前利润800万元。(2)所得税税率25%。(3)负债2000万元均为长期平价债券,利息率为10%,利息每年支付一次,本金到期偿还;(4)预期普通股报酬率15%。(5)普通股股数600000股(每股面值1
Woman:MycousinBobisgettingmarriedinCaliforniaandIcan’tdecidewhethertogo.Man:It’salongtrip,butIthinkyo
Despitehelpingtorecordevents,photoscoulddamageourmemories.Researchersfoundpeoplewhotakepictureshave【C1】______rem
Itwas3am,acoldandwetnight,onAugust21,2010.IhadjustleftalocalclubtotraveltenkilometershomewhenIlost【C1
最新回复
(
0
)