首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
当前文件夹中设有一个文本文件Filel.txt,并有下面程序代码: Private Sub Command1_Click() Dim ch As String Open"Filel.txt"For Input As #1 D
当前文件夹中设有一个文本文件Filel.txt,并有下面程序代码: Private Sub Command1_Click() Dim ch As String Open"Filel.txt"For Input As #1 D
admin
2016-08-24
70
问题
当前文件夹中设有一个文本文件Filel.txt,并有下面程序代码:
Private Sub Command1_Click()
Dim ch As String
Open"Filel.txt"For Input As #1
Do While Not EOF(1)
ch=Input(1,#1)
If"A"
Print"&":
End If
Print ch:
Loop
Close#1
End Sub
上述代码运行时产生的结果是( )。
选项
A、在窗体上原样显示文件中的所有内容
B、把文件中所有大写字母改为“&”字符后显示,其他内容原样显示
C、把文件中的所有内容显示在窗体上,但在每个大写字母前显示一个“&”字符
D、把文件中所有大写字母改为“&”字符后显示,小写字母原样显示,其他字符不显示
答案
C
解析
本题中,利用Open语句,以顺序输入方式打开文本文件“Filel.txt”,然后执行Do While循环结构,利用Input(1,#1)函数,从文本文件中依次取出一个字符并将其赋值给字符串变量ch,若取出的字符是大写字母,则在其前面显示一个“&”符号,所以C选项叙述正确。
转载请注明原文地址:https://kaotiyun.com/show/cYLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列程序的执行结果是()。PrivaaeSubForm_ActivateDimscore(3)AsInteger,totalAsIntegerDimaa_scoreAsVariantscore(1)
下列程序的输出结果为()。PrivateSubCommand1_Click()Dima(20)Forj=1To20Step2 a(j)=jNextiPrinta(1)+a(2)+a
假定有如下事件过程:PrivteSubForm_Click0 DimxAsInteger,nAsInteger x=1 n=0 DoWhilex<28 x=x*3
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Crick()DimIAsInteger,nAsIntegerForj=0T
下面程序是由鼠标事件在窗体上画图,如果按下鼠标将可以画图,双击窗体可以清除所画图形。补充完整下而的程序。首先在窗体层定义如下变量:DimPaintStartAsBoolean编写如下事件过程:PrivateSubF
在用通用对话框的ShowOpen显示“打开”文件对话框时,若要指定其中的文件类型为文本文件,正确的描述格式是()。
有时候需要暂时关闭计时器,这可以通过______属性来实现。
在运行阶段,要在文本框Text1获得焦点时选中文本框中的所有内容,则对应的事件过程是()。
在窗体上画一个文本框(其Name属性为Text1),然后编写如下事件过程:PrivateSubForm_Load()Text1.Text=""Text1.SetFocusFori=1To9Sum=Sum+
随机试题
民族自治地方制定变通或补充规定的内容有()
A、低钾血症B、高钾血症C、高渗性缺水D、等渗性缺水E、低渗性缺水肌无力为最早临床表现的疾病是()
羊水过少是指妊娠晚期羊水量少于
应治以何方()更兼喘促、汗出、脉虚浮数之急症,应吞服何药急救()
架空电力线路导线架设程序中,导线展放的紧后工序是()
关于普通混凝土小砌块施工的做法,正确的有()。
海关行政复议适用的范围包括()。
待估企业预计未来5年的预期收益为100万元、120万元、150万元、160万元和200万元。假定折现率与资本化率均为10%,采用年金法估测的企业价值最有可能是()万元。
下列各项中,契税计税依据可由征收机关核定的是()。(2005年)
企业组织信息采集的主要来源有()。
最新回复
(
0
)