首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设在当前目录下有一个名为"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-12-20
14
问题
设在当前目录下有一个名为"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://jikaoti.com/ti/WAm0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
A、选择B、差C、交D、并B关系T是关系R的一部分,并且是关系R去掉R和S相同的元素,符合差操作。
下列有语法错误的赋值语句是( )。
数据库系统的三级模式不包括( )。
下列叙述中正确的是( )。
一般情况下,当对关系R和S进行自然连接时,要求R和S含有一个或者多个共有的
公司中有多个部门和多名职员,每个职员只能属于一个部门,一个部门可以有多名职员。则实体部门和职员间的联系是
结构化程序设计中,下面对goto语句使用描述正确的是
下面不能作为结构化方法软件需求分析工具的是
设有如下程序:OptionBase1Dima(3,4)AsInteger,b(4,3)AsIntegerPrivateSubCommand1_Click() ’循环1 Fori=1To3 Forj=1To4
结构化程序包括的基本控制结构是
随机试题
佝偻病常见的胸部改变是()
消渴病,小便频数,混浊如膏,甚至饮一溲一,面容憔悴,耳轮干枯,腰膝酸软,四肢欠温,畏寒肢冷,阳痿,舌苔淡白而干,脉沉细无力。宜选下述何方加减治疗( )
在生产过程中,把生产性噪声归纳为()类型。
设立期货交易所,负责审批的机构是()。
税务机关实施的下列具体行政行为中,属于行政复议受案范围的有()。
病毒无_______结构,由_______和_______组成。
物体知觉可以分为()。
在新世纪新阶段,维护和实现社会公平的根本途径是()。
教育制度有两个方面,一是义务教育,一是高等教育。一种合理的教育制度,要求每个人都享有义务教育的权利并且有通过公平竞争获得高等教育的机会。以下哪项是上述题干的推论?
有如下类声明和函数声明:classBase{intm;public:intn;protected:intp;};classDe
最新回复
(
0
)