首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
某人编写了下面的程序,希望能把Text1文本框中的内容写到out.txt文件中: Private Sub Command1_Click() Open"out.txt"For Output As #2 Print"Text1"
某人编写了下面的程序,希望能把Text1文本框中的内容写到out.txt文件中: Private Sub Command1_Click() Open"out.txt"For Output As #2 Print"Text1"
admin
2018-12-20
62
问题
某人编写了下面的程序,希望能把Text1文本框中的内容写到out.txt文件中:
Private Sub Command1_Click()
Open"out.txt"For Output As #2
Print"Text1"
Close #2
End Sub
调试时发现没有达到目的,为实现上述目的,应做的修改是( )。
选项
A、把Print"Text1"改为Print #2,Text1
B、把Print"Text1"改为Print Text1
C、把Print"Text1"改为Write"Text1"
D、把所有#2改为#1
答案
A
解析
要把文本框中的内容写入文本文件中,首先要用Open语句的For Output模式打开文本文件.并为文件制定一个文件号,然后,用Print语句将文本写入文本文件,最后关闭文件。
本题中Click事件过程中第1、3条语句正确。
第2条语句Print语句的格式是:Print #文件号,要写入的内容,原语句错误。
根据格式按选项A修改正确,故A选项正确。
转载请注明原文地址:https://www.kaotiyun.com/show/IwFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
VisualBasic中的"启动对象"是指启动VisualBasic应用程序时,被自动加载并首先执行的对象。下列关于VisualBasic"启动对象"的描述中,错误的是( )。
阅读程序:OptionBase1PrivateSubForm_Click()Dima(3,3)AsIntegerFori=1To3Forj=1To3a(
在窗体上画一个组合框,其名称为Combo1,然后编写如下事件过程:PrivateSubForm_Load()Combo1.Text="1"Fori=1To10Sum=Sum+iNe
窗体上有一个名称为Command1的命令按钮。要求编写程序,把文件f1.txt的内容写到文件f2.txt中,然后将f1.txt删除。命令按钮的单击事件过程如下:PrivateSubCommand1_Click()Open"c:\f1.tx
窗体上有一个名称为Command1的命令按钮,其单击事件过程如下:PrivateSubCommand1_Click()Fori=3To1Step-1Sum=0Forj=1Toi
设窗体名称为frmTest,为了在程序代码中将窗体的标题改为"等级考试",其代码应该是
设有以下程序:PrivateSubForm_Click() x=50 Fori=1To4 y=InputBox("请输入一个整数") y=Val(y) IfyMod5=0Then a=a+y
PrivateFunctionf(yAsInteger) f=y*yEndFunction运行上述程序,如下叙述中正确的是( )。
设循环队列的存储空间为Q(1:35),初始状态为front=rear=35。现经过一系列入队与退队运算后,front=15,rear=15,则循环队列中的元素个数为
随机试题
下列关于蛇毒的描述,哪项是错误的
女,26岁,2个月前因外伤致一上前牙脱落,今要求烤瓷修复。口腔检查左上侧切牙缺失,间隙正常,牙槽嵴无明显吸收。左上中切牙牙冠1/2缺损,已露髓,探稍敏感,叩诊阴性,无松动。左上尖牙牙冠良好,叩诊阴性,无松动余牙未见异常。最适合的治疗方案是
A.阴阳B.表里C.寒热D.虚实E.经络用以分辨疾病属性的是
替代原则要求土地价格结果不得不合理偏离()在同等条件下的正常价格。
发包人在()情况下,有权要求解除合同。
某公司7月份发生下列经济业务(不考虑相关税费)(1)销售材料一批。货款2000元,当即存入银行。(2)销售产晶一批,贷款5000元。当即收到4000元存入银行,其他贷款暂欠。(3)预付7~12月的固定资产租金3000元。(4)收到3月份的应收销贷款
教师应该如何培养学生的观察力?
公安机关在刑事诉讼活动中,必须坚持同人民检察院、人民法院分工负责,互相配合,必要时可互相代替,同时又要互相制约。()
设有两个非零矩阵A=[a1,a2,…,an]T,B=[b1,b2,…,bn]T.求矩阵ABT的秩r(ABT);
设A为n阶矩阵(n≥2),A*为A的伴随矩阵,证明
最新回复
(
0
)