首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设在当前目录下有一个名为"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
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/K2Fp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。以下程序的功能是从顺序文件中读取数据:PrivateSubCommand1_Click() Dims1AsString,s2AsString Open"
设在窗体上有一个名称为Check1的复选框数组,并有以下事件过程:PrivateSubCheck1_Click(IndexAsInteger) …EndSub则下面叙述中错误的是( )。
(1)在考生文件夹下有一个工程文件sjt3.vbp。其窗体文件上有一个标题为“得分”的框架,在框架中有一个名称为Text1的文本框数组,含6个文本框控件;文本框Text2用来输入难度系数。程序运行时,在左边的6个文本框中输入6个得分,输入难度系数后,单击“
(1)在名称为Forml,标题为“图片”的窗体上添加1个名称为Imagel的图像框,其高为2500,宽为2000。请通过属性窗口设置适当属性,将考生文件夹下的图片文件piel.jpg插入图像框,并使图片自动适应图像框的大小(如图所示)。注意:存盘
有如下程序代码:PrivateSubForm_Click()Dima(10)AsInteger,b(5)AsIntegerFori=1To10a(i)=iNexti
在考生文件夹下有一个工程文件sjt5.vbp,其名称为Forml的窗体上已有三个文本框Text1、Text2、Text3,以及部分程序代码,请完成以下工作。①在属性窗口中修改Text3的适当属性,使其在运行时不显示,作为模拟的剪贴板使用,窗体如图
设有以下程序:PrivateSubForm_Click() x=50 Fori=1To4 y=InputBox("请输入一个整数") y=Val(y) IfyMod5=0Then a=a+y
下面不能作为结构化方法软件需求分析工具的是
下面描述不属于软件特点的是
数据字典(DD)所定义的对象都包含于
随机试题
针对许多企业过于偏重制造与销售产品,强调卖方需求,忽视顾客需求,人们逐渐认识到以顾客为导向的重要性,“顾客满意”日益成为企业能否赢得市场的关键。在这样的时代风潮下,应运而生的营销观念是()
患者,男性,65岁。肝硬化病史15年,昨日下午给予穿刺放腹水治疗,今晨言语不清,举止反常,昼睡夜醒,脑电图有特征性改变。医嘱给予醋酸灌肠,是为了
A.举元煎B.大补元煎C.保阴前D.固阴煎E.失笑散治疗月经过多气虚证,应首选
正常人清晨浓缩尿中偶可见的管型是
未来净收益越大,房地产的价值就越高,反之就越低。()
关于仲裁裁决效力的说法,正确的是()。
“申报日期”栏应填()。“运输工具名称”栏应填()。
电脑的发明与普及虽然拓展了人脑的意识功能,但是,再先进的电脑也不可能代替人脑。因为人脑的思维活动都是有意识的,包含着某种创造性,而电脑的一切行为都是由预先编好的程序控制的,它不具有主动性和创造性。以下哪项为真,将最有力地支持题干的观点?
为了实现VLAN1,VLAN2和VLAN3的虚拟网络划分,在ATM和RT路由器中应设置哪几种服务协议(如BUS)?试述从PC1发送一个IP包到PC2的路由计算过程和传送路径。
AGUIDETOTOXICSINTHEHOMEThisfactsheetbringsgoodnews.Therearealternativesto"householdtoxics".Someofthesep
最新回复
(
0
)