首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Text1的文本框和一个名称为Command1的命令按钮,要求程序运行时,单击命令按钮(如图1所示),就可以把文本框中的内容写到文件Out.txt中,每次写入的内容附加到文件原有内容之后。以下能正确实现上述功能的程序是( )。
窗体上有一个名称为Text1的文本框和一个名称为Command1的命令按钮,要求程序运行时,单击命令按钮(如图1所示),就可以把文本框中的内容写到文件Out.txt中,每次写入的内容附加到文件原有内容之后。以下能正确实现上述功能的程序是( )。
admin
2016-03-21
85
问题
窗体上有一个名称为Text1的文本框和一个名称为Command1的命令按钮,要求程序运行时,单击命令按钮(如图1所示),就可以把文本框中的内容写到文件Out.txt中,每次写入的内容附加到文件原有内容之后。以下能正确实现上述功能的程序是( )。
选项
A、Private Sub Command 1 Click()
Open“Out.txt”For Input As≠}1
Print#1.Textl.Text
Close#1
End Sub
B、Private Sub Commandl Click()
Open“Out.txt”For Output As#1
Print#1.Text1.Text
Close#1
End Sub
C、Private Sub Commandl Click()
Open“Out.txt”For Append As#1
Print#1.Text1.Text
Close#1
End Sub
D、Private Sub Commandl Click()
Open“Out.txt”For Random As#1
Print#1.Text1.Text
Close#1
End Sub
答案
C
解析
本题考查文件的打开方式。题目中要求在命令按钮单击事件中,往文件中写入信息,并且是追加到原有信息的后面,因此,要用Append方式打开文件。
转载请注明原文地址:https://www.kaotiyun.com/show/YgLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个命令按钮Command1和一个文本框Text1,然后编写下列程序:PrivateSubCommand1click()A=InputBox("请输入日期(1~31)")t="旅游景点:"_&Ⅱf(A>0AndA<=10,"长城
在窗体上添加一个文本框Text1,然后编写下列Load事件过程,则程序运行结果是()。PrivateSubForm_Load()Text1.Text=""Text1.SetFocusFork=1To5t=t*kNextkT
下列程序段的执行结果为______。N=0ForI=1To3ForJ=5To1Step-1N=N+1NextJNextIPrintN;J;I
线性表的顺序存储结构和线性表的链式存储结构分别是______。
数据结构中,与所使用的计算机无关的是数据的______。
VisualBasic中的控件分为3类,它们是标准控件、______和可插入对象。
函数过程Fun1的功能是:如果参数b为奇数,则返回值为1,否则返回值为0。FunctionFun1(bAsInteger)if_____ThenFun1=0ElseFun1=
以下程序的功能是:先将随机产生的10个不同的整数放人数组a中,再将这10个数按升序方式输出。请填空。PrivateSubFormClick()Dima(10)AsInteger,iASIntegerRandomi
表达式X+1>X是()。
对象是既包含数据又包含对______的方法,并将其封装起来的一个逻辑实体。
随机试题
论述注册会计师在设计进一步审计程序时应考虑的因素。
窦房结P细胞4期自动去极化的原理是()
国际抗癌联盟组织TNM分期法中的N是指
引起小叶性肺炎的常见原因是
下列选项中,不属于表里经配穴法的是
库欣综合征的病因有
商标权的处置方式有()。
2019年6月,全国发行地方政府债券8996亿元,同比增长68.37%,环比增长195.63%。其中,发行一般债券3178亿元,同比减少28.33%,环比增长117.08%,发行专项债券5818亿元,同比增长540.04%,环比增长268.46%;按用途划
ThemiserablefateofEnron’semployeeswillbealandmarkinbusinesshistory,oneofthoseawfuleventsthateveryoneagreesm
HaveYouFilledUpTheForm?Ofallthingsintheworld,Imostdislikefillingupforms.Infact,Ihavea______【51】horror
最新回复
(
0
)