首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
某人编写了下面的程序,希望能把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
37
问题
某人编写了下面的程序,希望能把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://kaotiyun.com/show/IwFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
编写如下程序:PrivateSubCommand1_Click() DimiAsInteger,jAsInteger n=InputBox("输入一个大于1的正整数") Fori=2Ton Forj=2To
VisualBasic中的"启动对象"是指启动VisualBasic应用程序时,被自动加载并首先执行的对象。下列关于VisualBasic"启动对象"的描述中,错误的是( )。
阅读程序:OptionBase1SubP(b()AsInteger)Fori=1To4b(i)=2*iNextiEndSubPrivateSubForm_Click()
在窗体上画一个组合框,其名称为Combo1,然后编写如下事件过程:PrivateSubForm_Load()Combo1.Text="1"Fori=1To10Sum=Sum+iNe
对于文本框Text1,能够获得按键的ASCII码值的事件过程是
设窗体名称为frmTest,为了在程序代码中将窗体的标题改为"等级考试",其代码应该是
窗体上有1个名称为Text1、内容为空的文本框。编写如下事件过程:PrivateSubText1_KeyUp(KeyCodeAsInteger,ShiftAsInteger) PrintText1.Text;EndSub运行程序,
PrivateFunctionf(yAsInteger) f=y*yEndFunction运行上述程序,如下叙述中正确的是( )。
标准模块中有如下程序代码:PublicxAsInteger,yAsIntegerSubvar_pub() x=10∶y=20EndSub在窗体上有1个命令按钮,并有如下事件过程:PrivateSubCommand1_Clic
以下能够正常结束循环操作的程序段是
随机试题
狂证常见何证
A.卡马西平B.D一青霉胺C.麦角胺制剂D.溴吡啶斯地明E.皮质类固醇治疗特发性面神经麻痹急性期,应选用
全断面法适用于地质条件好的地层,围岩必须有足够的()。
单因素敏感性分析的步骤中,如果主要分析产品价格波动对技术方案超额净收益的影响,则可选用()作为分析指标。
根据《会计法》的规定,下列行为中,属于违法会计行为的是()。
关于投资者要求的投资报酬率,下列说法中正确的有()。
下列各项中,应计入营业费用的有( )。
A企业2004年11月1日借款7500万元用于固定资产建造,借款利率为12%,5年期,借款时发生的辅助费用为75万元(金额较大)。A企业2005年1月1日开始建造,2005年2月1日支出1500万元,2005年5月1日支出3000万元,2005年12月1日
一、注意事项1.申论考试是对应考者阅读能力、综合分析能力、提出和解决问题能力、文字表达能力的测试。2.参考时限:阅读资料40分钟,参考作答110分钟。3.仔细阅读给定资料,按照后面提出的“作答要求”作答。二、给定资料200
设f(x)=,试证明:E∈(0,1),使得f’(ξ)=0.
最新回复
(
0
)