首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Text1的文本框和一个名称为Command1的命令按钮,要求程序运行时,单击命令按钮(如图所示),就可以把文本框中的内容写到文件Out.txt中,每次写入的内容附加到文件原有内容之后。以下能正确实现上述功能的程序是( )。
窗体上有一个名称为Text1的文本框和一个名称为Command1的命令按钮,要求程序运行时,单击命令按钮(如图所示),就可以把文本框中的内容写到文件Out.txt中,每次写入的内容附加到文件原有内容之后。以下能正确实现上述功能的程序是( )。
admin
2020-07-22
42
问题
窗体上有一个名称为Text1的文本框和一个名称为Command1的命令按钮,要求程序运行时,单击命令按钮(如图所示),就可以把文本框中的内容写到文件Out.txt中,每次写入的内容附加到文件原有内容之后。以下能正确实现上述功能的程序是( )。
选项
A、Private Sub Command1_Click()
Open"Out.txt"For Input As #1
Print #1.Text1.Text.
Close #1
End Sub
B、Private Sub Command1_Click()
Open"Out.txt"For Output As #1
Print #1.Text1.Text
Close #1
End Sub
C、Private Sub Command1_Click()
Open"Out.txt"For Append As #1
Print #1,Text1.Text
Close #1
End Sub
D、Private Sub Command1_Click()
Open"Out.txt"ForRandom As #1
Print #1.Text1.Text
Close #1
End Sub
答案
C
解析
本题考查文件的打开方式。题目中要求在命令按钮单击事件中,往文件中写入信息,并且是追加到原有信息的后面,因此,要用Append方式打开文件。
转载请注明原文地址:https://kaotiyun.com/show/iXHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设子程序过程定义的首部为:PublicSubS(XAsInteger,YAsSingle)则以下正确的调用形式为()。
如果把程序的启动对象设置为:SubMain,则SubMain过程
能够存放组合框的所有项目内容的属性是
若在窗体模块的声明部分声明了如下自定义类型和数组PrivateTyperecCodeAsInteger:CaptionAsStringEndTypeDimarr(5)Asrec则下
窗体上有一个名称为Textl的文本框,一个名称为Commandl的命令按钮。以下程序的功能是从顺序文件中读取数据:PrivateSubCommandlClick()DimslAsString,s2AsStringOpen“c:\d4.
窗体上有一个名称为Command1的命令按钮,其单击事件过程如下:PrivateSubCommand1_Click()DimxAsInteger,yAsIntegerStaticzAsIntegerx=3:y=5:z=yCall
数据库中对概念模式内容进行说明的语言是()。
数据库系统的三级模式不包括
有数据定义语句:Dima,bAsIntegerDimx%,YasInteger执行语句后,不是整型变量的是
随机试题
A.affectionB.awareC.befriendD.blindlyE.directlyF.drivesG.dumbH.dwellI.enormousJ.murderK.
树枝状角膜炎是由_________感染所致。
女性,60岁,绝经后5年,近2个月来阴道不规则出血,子宫内膜活体检查,病理诊断为子宫内膜腺癌。支持该诊断的病理变化是
在三角窝内,对耳轮上、下脚分叉处分稍上方的耳穴是()
秘书与领导沟通会议有关事宜时,做法正确的有()
腐烂对于()相当于()对于电脑
唯物辩证法是一个完整的科学体系,包括一系列的基本规律和范畴,其中对立统一规律是唯物辩证法体系中的实质和核心。这是因为
下列不能打开工具箱窗口的操作是()。
Extensivenewstudiessuggestthattheworldhasmadeextraordinaryprogressinreducingpovertyinrecentdecades.Theresearch
CertainphrasesonecommonlyhearsamongAmericanscapturetheirdevotiontoindividualism:"Doyouownthing.""Ididitmyway
最新回复
(
0
)