首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
当前文件夹中设有一个文本文件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
66
问题
当前文件夹中设有一个文本文件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全国计算机二级
相关试题推荐
在窗体上画一个命令按钮,然后编写如下事件过程:OptionBase1PrivateSubCommand1_Click()Dimaa=Array(1,3,5,7,9)j=1Fori=5To1St
在窗体上画一个文本框,其名称为Text1,然后编写如下事件过程:PrivateSubText1_KeyPress(KeyAsciiAsInteger)DimstrAsString,nAsIntegerStr=UCas
在以下程序中,变量S为()。DefDblA-HO-ZDefIntI-NS=1ForI=1To20 S=S*INextIPrintf"S=",S
下面程序运行后,单击命令按钮,输出的结果是______。PrivateSubCommand1_Click()Dima%(1To5),i%,s# Fori=1To5 a(i)=i Next
在窗体上画一个命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click() Fori=1To4 x=4 Forj=1To3 x=3 F
窗体上有Text1、Text2两个文本框及一个命令按钮Command1,编写下列程序:DimyAsIntegerPrivateSubCommand1_Click()DimxAsInteger x=2
下面的数组声明语句中正确的是
对已在窗体中控件的操作不正确的是()。
图案■表示______。
在窗体上绘制一个命令按钮和一个文本框,名称分别为Command1和Text1,然后编写如下程序:PrivateSubCommand1_Click()a=InputBox("请输入日期(1~31)")t="旅游景点:"_
随机试题
以下有关肾梗死CT表现哪一项是正确的
老年人皮肤瘙痒的最常见原因是
A.财产关系B.财产赔偿C.行政责任D.民事责任E.刑事责任可以由当事人协商解决的是
人民检察院对于公安机关侦查终结后移送起诉的案件所作出的不起诉的决定书,应当送达给( )。
根据《民事诉讼法》规定,我国法院与外国法院可以进行司法协助,互相委托,代为一定的诉讼行为,但哪些情况下我国法院应予以驳回或说明理由退回外国法院?()
对于架空线路杆塔的接地装置,当接地装置由较多水平接地极或垂直接地极组成时,垂直接地极的间距不应小于其长度的两倍,水平接地极的间距不宜小于()。
根据《水电工程验收管理办法》(2015年修订版),以下关于枢纽工程专项验收的说法,正确的是()。
甲公司是一家上市公司,在应监管部门要求进行自查的过程中,发现公司财务部经理李某自2017年11月起,未经董事会批准,私自将2.85亿元以存单质押的方式为A公司及其关联公司提供全额银行承兑保证。该项业务于2018年6月到期,A及其关联公司表示不能如期归还,公
Videogamesgetabadpress.Manyareunquestionablyviolentand,ashasbeenthewaywithnewmediafromnovelstocomicbooks
OneofthesaddestthingsabouttheperiodinwhichweliveisthegrowingestrangementbetweenAmericaandEurope.Thismaybe
最新回复
(
0
)