首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设在当前目录下有一个名为"file.txt"的文本文件,其中有若干行文本。编写如下程序: Private Sub Command1_Click() Dim ch$, ascii As Integer Open "file.txt" For Inpu
设在当前目录下有一个名为"file.txt"的文本文件,其中有若干行文本。编写如下程序: Private Sub Command1_Click() Dim ch$, ascii As Integer Open "file.txt" For Inpu
admin
2018-09-19
38
问题
设在当前目录下有一个名为"file.txt"的文本文件,其中有若干行文本。编写如下程序:
Private Sub Command1_Click()
Dim ch$, ascii As Integer
Open "file.txt" For Input As #1
While Not EOF(1)
Line Input #1, ch
ascii=toascii(ch)
Print ascii
Wend
Close #1
End Sub
Private Function toascii(mystr As String)As Integer
n=0
For k=1 To Len(mystr)
n=n+Asc(Mid(mystr, k, 1))
Next k
toascii=n
End Function
程序的功能是( )。
选项
A、按行计算文件中每行字符的ASCII码之和,并显示在窗体上
B、计算文件中所有字符的ASCII码之和,并显示在窗体上
C、把文件中所有文本行按行显示在窗体上
D、在窗体上显示文件中所有字符的ASCII码值
答案
A
解析
过程toascii的功能是依次取出传入字符串中的每个字符,用Asc函数将这个字符转换为相应的ASCII码值,通过For循环将这些值累加。累加值由过程名返回。Click事件中以顺序输入方式打开file.txt文件,即以读取方式打开文件。While循环的结束条件是到达文件尾部,在循环体中,Line Input #语句读取文件中的一行数据存入变量ch中,然后以ch为参数调用过程toascii,即计算这一行字符中所有字符的ASCII码值的和,返回值赋给变量ascii,在窗体上输出ascii的值。所以While循环结束时,将在窗体上显示输出file.txt中每一行数据的ASCII码值的和。因此答案为A。
转载请注明原文地址:https://kaotiyun.com/show/K2Fp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上建立三个菜单(名称分别为Read、Calc和Save,标题分别为“读入数据”、“计算并输出”和“存盘”),然后再添加一个文本框,名称为‘Textl,MultiLine属性设置为True,ScrollBars属性设置为2(如图所示)。程序运行后,如果
有如下程序代码:PrivateSubForm_Click()Dima(10)AsInteger,b(5)AsIntegerFori=1To10a(i)=iNexti
有如下过程代码:Subvar_dim() StaticnumaAsInteger DimnumbAsInteger numa=numa+2 numb=numb+1 printnuma;numbEndSub连续3次
设有以下程序:PrivateSubForm_Click() x=50 Fori=1To4 y=InputBox("请输入一个整数") y=Val(y) IfyMod5=0Then a=a+y
关于水平滚动条,如下叙述中错误的是( )。
如果在过程A中用语句:Callproc(a,b)调用下面的过程PrivateSubproc(bAsInteger,ByValaAsInteger)a=a+1b=b*2EndSub则调用结束后
为了用形状控件画出不同的图形,应设置的属性是
有如下数据定义语句:DimX,YAsInteger以上语句表明( )。
为了调整图像框的大小以与其中的图形相适应,必须把它的Stretch属性设置为( )。
一个运动队有多个队员,一个队员仅属于一个运动队,一个队一般都有一个教练,则实体运动队和队员的联系是
随机试题
什么是走向线和走向?走向标志着什么?它有几个值?相差的度数是多少?
一个流程由流程线、物料流向、名称及物料的来源和去向构成。
患者男,57岁。因严重肝病导致昏迷,呼吸微弱,浅而慢。护士为其测量呼吸的正确方法是()
下列项目中不属于营业外支出的是()。
商业银行在理财工作中必须建立健全有关规章制度和内部审核程序,并对()进行全面规范。
宏观经济政策的目标是()。
下列有关书法艺术的表述,正确的是()。
一种产品的价值由其质量与价格之间的比率决定。一种产品的价值越高,其会处于越好的竞争地位。所以对于既定产品而言或者通过提高质量,或者通过降低价格,都会提高消费者选择这种产品而不选择竞争性产品的概率。下面哪项,如果正确,最能支持以上得出的结论?
空想社会主义思潮经历了若干个历史发展阶段,其中成为科学社会主义的直接思想来源的是
Howmenfirstlearnedtoinventwordsisunknown;inotherwords,theoriginoflanguageisamystery.Allwereallyknowistha
最新回复
(
0
)