首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设在当前目录下有一个名为"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
2020-06-30
22
问题
设在当前目录下有一个名为"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/f2Hp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
有两个关系R,S如下,由关系R和S通过运算得到关系T,则所使用的操作为
执行语句DimX,YAsInteger后,()。
若程序中有语句:y=proc(6),则proc应该是
窗体上有一个名称为Cb1的组合框,程序运行后,为了输出选中的列表项,应使用的语句是()。
编写如下程序:PrivateSubCommand1_Click()Dima(3,3)AsIntegerDimiAsInteger,jAsIntegerFori=1To3
有一个数列,第一个数和第二个数分别为0和1,其后每一个数均为前两个数之和。下面是输出该数中小于10000的最大数的程序:PrivateSubForm_Click()a=0b=0DoWhileb>10000
随机试题
以下四部作品按完成的先后顺序排列正确的一项是()
下列哪项因素与血液病病人的出血无关()
对狂犬病患者的正确治疗原则是
下列哪种情况首选MRI检查?()
下列有关城市居民委员会的说法中,正确的是:()
测算确定工程预付款额度的因素不包括()。
A股份有限公司(以下简称“A公司”)为上市公司,2018~2019年的有关资料如下:(1)甲公司欠A公司6300万元购货款。由于甲公司发生财务困难,短期内无法支付该笔已到期的货款。2018年1月1日,经协商,A公司同意与甲公司进行债务重组,重组协议规定,
【北京航空航天大学2012翻译硕士】请你结合自身情况和所学专业,写一份新学期的学习计划。要求:1.计划必备要素应完整。2.结构上采取条文式。3.字数不得少于450字。4.题目自拟。5.其他信息请酌情虚拟。
“充分授权给下属,发挥下属的自觉能动性”属于领导行为连续体理论中的()
已知二次型f(x1,x2,x3)=4x2-3x3+4x1x2-4x1x3+8x2x3.写出二次型f的矩阵表达式;
最新回复
(
0
)