首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
文件d:\city.txt的内容如下: BeiJing TianJin ShangHai ChongQing 编写如下事件过程: Prirate Sub Form_Click() Dim InD Open"d:\city.txt"For Input As
文件d:\city.txt的内容如下: BeiJing TianJin ShangHai ChongQing 编写如下事件过程: Prirate Sub Form_Click() Dim InD Open"d:\city.txt"For Input As
admin
2018-06-21
39
问题
文件d:\city.txt的内容如下:
BeiJing
TianJin
ShangHai
ChongQing
编写如下事件过程:
Prirate Sub Form_Click()
Dim InD
Open"d:\city.txt"For Input As #1
Do While Not.EOF(1)
Line Input #1.InD
Loop
Close1
Print InD
End Sub
运行程序,单击窗体,输出结果是( )。
选项
A、文件city.txt的全部内容
B、BeiJing
C、ChongQing
D、空白
答案
C
解析
#1文件以读操作的方式打开。在文件结尾的部分退出。退出时InD内存储的内容是ChongQing,打印的内容就是ChongQing,选D)。
转载请注明原文地址:https://kaotiyun.com/show/SpGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。在名称为Forml的窗体上画一个标签,其名称为Labell,标题为”等级考试”,BorderStyle属性为1,可以根据标题自动调整大小;然后再画一个命令按钮,其名称和标题均为
在考生文件夹下有一个工程文件sjt4.vbp,请在Forml窗体上建立一个名称为Opl的单选按钮数组,含有三个单选按钮,其标题分别为”10!”、”11!”、”12!”,Index属性分别为0、1、2;再画一个名称为C1的命令按钮,标题为”计算”;画一个
在考生文件夹中有一个工程文件Sjt=5.vbp。该程序的功能是:分别统计7*7数组四周元素之和及四周元素中能够被7整除的元素的个数,并将统计结果在相应的标签中显示。请仔细阅读已有程序,然后在标出的位置编写适当的程序,实现上述的功能。 要求:不得修改原有
编写如下程序:PrivateSubForm_Click()Print“Welcome!”EndSubPrivateSubForm_MouseDown(ButtonAsInteger,Shi
已知图片框Picturel中已装入一个图形,为了在不删除图片框的前提下,清除该图形,应采取的正确操作是()。
在名称为Framel的框架中,有两个名称分别为opl、op2的单选按钮,标题分别为“单程”、“往返”,如图所示。
以下关丁VB的叙述中,错误的是()。
如果在窗体模块中所有程序代码的前面有语句:DimX,则x是()。
在标准模块中用Public关键字定义的变量,其作用域为()。
下列说法中,错误的是( )。
随机试题
牡螈散的功用是固冲汤的功用是
肝脏最基本的结构单位是( )。
某项目第1年投资500万元,第2年又投资500万元,从第3年进入正常运营期。正常运营期共18年,每年净收入为110万元,设行业基准收益率为8%,该项目的财务净现值为( )万元。
下列选项中,属于审核记账凭证主要工作的有()。
如果纳税人刘某利用其他方法减少计税依据,当地税务机关则有权重新核定计税依据,这样处理体现了税法基本原则中的()。
乙公司是一家上市公司,该公司2014年末资产总计为10000万元,其中负债合计为2000万元。该公司适用的所得税税率为25%。相关资料如下:资料一:预计乙公司净利润持续增长,股利也随之相应增长。相关资料如表1所示:资料二:乙公司认为2014年的资本结
ABC会计师事务所在承接对X公司和Y银行的2006年年报审计时,以下行为没有违背职业道德准则的是( )。以下事项中,不会影响注册会计师或会计师事务所独守性的是( )。
设z=z(x,y)由ex+ysin(x+z)=1所确定,试求
设3阶矩阵A有3个特征向量η1(1,2,2)T,η2=(2,-2,1)T,η3=(-2,-1,2)T,它们的特征值依次为1,2,3,求A.
A.PlanfortheFinancialTransitionB.ExamineYourInvestmentPortfolioC.ContributetoanIRAD.SavebeforeYou
最新回复
(
0
)