首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有一个事件过程,其功能是:从已存在于磁盘上的顺序文件NM1.txt中读取数据,计算读出数据的平方值,将该数据及其平方值存入新的顺序文件NM2.txt中。请填空。 Private Sub Form_Click() Dim x As Single, y As
有一个事件过程,其功能是:从已存在于磁盘上的顺序文件NM1.txt中读取数据,计算读出数据的平方值,将该数据及其平方值存入新的顺序文件NM2.txt中。请填空。 Private Sub Form_Click() Dim x As Single, y As
admin
2010-11-20
34
问题
有一个事件过程,其功能是:从已存在于磁盘上的顺序文件NM1.txt中读取数据,计算读出数据的平方值,将该数据及其平方值存入新的顺序文件NM2.txt中。请填空。
Private Sub Form_Click()
Dim x As Single, y As Single
Open "NM1.txt" For Input As #1
Open "NM2.txt" For Input As #2
Do While Not EOF( 1 )
【 】
Print x
y=x ^2
【 】
Print y
Loop
Close #1, #2
End Sub
选项
答案
Input #1, x , Print #2, x, y
解析
本题考查顺序文件的读写操作,事件过程中,顺序文件的打开和关闭语句都正确,循环语句使用也正确。事件过程的功能是:从NM1.txt中读取数据,向NM2.txt中写入数据。程序中没有对数据文件进行读写的语句,故空白处要填写的是对顺序文件读数据和写数据的语句。
转载请注明原文地址:https://jikaoti.com/ti/uQg0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在一个有n个元素的顺序表的第i个元素(1≤i≤n)之前插入一个新元素时,需要向后移动【】个元素。
下列关于实型变量书写正确的是
下列赋值语句中错误的是()。
Applet的默认布局管理器是FlowLayout,而SwingApplet的内容面板的默认布局管理器是
下面程序的输出结果是()。importjava.awt.*;importjava.applet.*;publicclassHelloAppletextendsApplet{publicvoi
下面程序段的输出结果为()。packagetest;publicclassClassA{intx=20;staticinty=6;publicstaticvoidmain(Stringargs[])
在Java中,线程的模型就是一个CPU、程序代码和【】的封装体。
编译JavaApplet源程序文件产生的字节码文件的扩展名为______。
在JavaApplet程序用户自定义的Applet子类中,一般需要重载父类的()方法宋完成主类实例的初始化工作。
在长度为64的有序线性表中进行顺序查找,最坏情况下需要比较的次数为( )。
随机试题
在WindowsXP中,要关闭当前应用程序,可按Alt+_________键。
急性细菌性心内膜炎的瓣膜赘生物十的成分包括
关于护士与患者的关系,不正确的说法是
根据个人所得税法的有关规定,下列对个人所得的捐赠的处理正确的有()。
D公司2015年销售收入为5000万元,销售净利率为10%,股利支付率为70%。2015年12月31日的资产负债表(简表)如下表所示:公司现有生产能力已经达到饱和,2016年计划销售收入达到6000万元,为实现这一目标,公司需新增设备一台,需要200万
阅读下列材料,回答问题。李某放假回老家,在乘坐客运汽车的途中,被车窗外飞进的一块小石头击中左眼球,当场出血,被送往就近医院治疗,但因伤情严重导致失明。李某要求运输公司赔偿,但运输公司拒绝赔偿,理由是:李某的伤是外来的原因造成的,运输公司没有过错。
Whereverpeoplehavebeen,theyhaveleftwastebehind,whichcancauseallsortsofproblems.Wasteoftenstinks,attractsverm
A、Thewomanisgoingouttolunch.B、Thewomanwantstoeatsomechocolate.C、Thewomanwillgotoaconveniencestore.B
Politicsisanemotionalbusiness.Still,manypeoplefoundthemselvesunusuallymovedbythehistoricpresidentialinauguration
Whodoesn’tlovebeinginlove?Atruelovelistenstoyoutalkaboutwork,letsyouhavethatlast【C1】______ofpie,andusuall
最新回复
(
0
)