首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在当前目录下有—个名为“myfile.txt”的文本文件,其中有若干行文本。下面程序的功能是读入此文件中的所有文本行,按行计算每行字符的ASCII码之和,并显示在窗体上。请填空。 Private Sub Command1_ Click() Dim c
在当前目录下有—个名为“myfile.txt”的文本文件,其中有若干行文本。下面程序的功能是读入此文件中的所有文本行,按行计算每行字符的ASCII码之和,并显示在窗体上。请填空。 Private Sub Command1_ Click() Dim c
admin
2009-09-28
86
问题
在当前目录下有—个名为“myfile.txt”的文本文件,其中有若干行文本。下面程序的功能是读入此文件中的所有文本行,按行计算每行字符的ASCII码之和,并显示在窗体上。请填空。
Private Sub Command1_ Click()
Dim ch$, ascii As Integer
Open "myfile.txt" For【 】 As #1
While Not EOF(1)
Line Input #1 ,ch
ascii=toascii(【 】)
Print ascii
Wend
Close #1
End Sub
Private Function toascii(mystr$)As Integer
n=0
Fork=1 To【 】
n=n+ Asc(Mid(mystr,k,1))
Next k
toascii=n
End Function
选项
答案
Input、ch、Len(mystr)
解析
Line Input #语句格式:Line Input # 文件号,字符串变量。Line Input #语句可以从顺序文件中读取一个完整的行,并把它赋给一个字符串变量。文件号是一个整型表达式,其值在1~511范围内。执行Open语句时,打开文件的文件号与一个具体的文件相关联,其它输入输出语句或函数通过文件号与文件发生关系。“字符串变量”是一个字符串简单变量名,也可以是一个字符串数组元素名,用来接收从顺序文件中读出的字符行。
本题要求读入文本文件“myfile.txt”,“myfile.txt”中有若干行文本,并按行计算每行字符的ASCII码之和,显示在窗体上。在按钮的点击事件中,先定义了两个变量,变量ch$为字符型数据,变量ascii是数值型数据,应使用Input读入文本文件,所以使用的读取文本文件的语句应该为Open "myfile.txt" for input As #1,以读的方式打开文本文件myfile.txt,并给myfile.txt文件一个文件号1。当文件1没有到达文件尾时,读取myile.txt文件的一行,赋给变量ch。题目定义了一个Function过程toascii,功能是计算每行字符的ASCII码之和,先给变量n赋值,变量n的值等于数值0。要统计每行字符的ASCII码之和,那么要分别取出每行的每个字符,计算出它的码值,取字符从每行的第一个字符开始,到每行的字符个数为止。所以循环的终值为Len(ch),用变量n存放每行ASCII码之和,并赋给变量toascii。所以传值时,传字符串ch给过程toascii。将ASCII码的和赋给变量ascii,最后在屏幕上显示各行的码值之和。
转载请注明原文地址:https://kaotiyun.com/show/Zc1p777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
当使用SomeThreadt=newSomeThread()创建一个线程时,下列叙述中正确的是()。
算法的时间复杂度是指()。
构造方法的作用是()。
下列哪个成员变量声明是正确的?()
阅读下列代码publicclassTest{publicstaticvoidmain(Stringargs[]){Strings="Test";
在JDK1.4的java.util.regcx正则表达式包中,有一个【】类,该类的staticPatterncompile方法用于将正则表达式字符串编译成模式对象来进行快速模式匹配。
在压缩文件流中,用于缓冲阅读器阅读文本的方法是()。
在结构化方法中,软件功能分解属于下列软件开发中的哪个阶段?()
数据的物理独立性是指当数据的【】改变时,通过系统内部的自动映象或转换功能,保持了数据的逻辑结构不变。
如下的代码段中,如果方法unsafe()正常运行,那么结果是()。publicvoidexample(){try{unsafe();System.out.pri
随机试题
下列关于教学评价的表述,正确的是()
C
某物流公司租用一设备,10年中每年年初支付租金8000元,年利息9%则租金现值为()
为了保持模块的独立性,要努力避免(),应消除任何形式的非法耦合。
关于铁剂的用药指导错误的是
男性,54岁,2~3年前颈椎摄片示骨质增生。1个月来双下肢麻木,逐渐由双足向上发展至双侧腹股沟处。近1周出现双上肢麻木及无力,无排尿排便障碍,曾在当地进行针灸治疗症状无缓解。若经检查确诊为颈椎问盘突出症、椎管狭窄,选择手术治疗的主要目的是
A、氯霉素B、甲砜霉素C、米诺环素D、四环素E、多西环素可致剂量相关性贫血的药物是
_______是指在课堂教育之外的,有目的、有计划、有组织地对学生进行的形式多样的教育活动。
“遇物则诲”的教育方式,反映的是现代教育中的()特点。
10年前,癌症病人在发现疾病后平均生存5.4年,现在已经达到6.7年。这说明,医疗水平的提高使癌症病人存活的时间延长了。上述结论依赖于下述哪一假设?
最新回复
(
0
)