首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设在当前目录下有一个名为"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
2015-08-28
64
问题
设在当前目录下有一个名为"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/AKQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
当一个工程含有多个窗体时,其中的启动窗体是______。
下列不属于软件调试技术的是______。
程序段如下:PrivateSubCommand1_Click()a=0for1=15To15Step-2a=a+1NextIPrinta,IEndSub发生Command1
下列______表达式的值是1239。
数据库DB、数据库系统DBS、数据库管理系统DBMS之间的关系是()。
滚动条控件中,用来设置鼠标单击滚动箭头时滚动条移动的大小的属性是______。
语句DimArt(3To5,-2To2)定义的数组的元素个数是()。
过程共有3种,它们分别是()。
在数据管理技术的发展过程中,经历了人工管理阶段、文件系统阶段和数据库系统阶段。其中数据独立性最高的阶段是______。
下列说法中,不属于数据模型所描述的内容是______。
随机试题
社会发展过程的决定性()
目前我国常用的临床常规测定血浆葡萄糖的方法是
下列关于肿瘤化疗的叙述,错误的是
患者柳某,女,32岁,胁肋隐痛日久,口干咽燥,心中烦热,头晕目眩,舌红少苔,脉弦细数。此属胁痛何类型
A.麦角菌科B.多孔菌科C.马尾藻科D.松萝科E.棕榈科灵芝来源于()
根据《海关法》规定,进口货物的完税价格,由海关以进出口货物的()为基础审定完税价格。
我国现行采用的签证制度一次签证多次有效。()
安定:动荡
朋友的亲人病了,朋友叫你带他家人去看病,可是你手头有工作,你怎么办?
Entertheinformationage.Informationistherawmaterialformanyofthebusinessactivities【C1】______thisnewera,justasir
最新回复
(
0
)