首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设在当前目录下有一个名为“file.txt”的文本文件,其中有若干行文本。编写如下程序: Private Sub Command1_Click() Dim eh$,ascii As Integer Open "fil
设在当前目录下有一个名为“file.txt”的文本文件,其中有若干行文本。编写如下程序: Private Sub Command1_Click() Dim eh$,ascii As Integer Open "fil
admin
2015-08-13
87
问题
设在当前目录下有一个名为“file.txt”的文本文件,其中有若干行文本。编写如下程序:
Private Sub Command1_Click()
Dim eh$,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/ZvQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
单击命令按钮时,下列程序代码的执行结果为()FunctionFirProc(xAsInteger,yAsInteger,zAsInteger)FirProc=2*x+y+3*zEndFu
设有语句Open"c:\Test.Dat"ForOutputAs#1则以下错误的叙述是______。
下列程序段的显示结果为______。x=0Printx-1x=3
下面程序运行后,单击命令按钮,输出的结果是【】PrivateSubCommand1_Click()Dima%(1To4),b%(2To6),i%,str1#,str2#Fori=1To4
要把一个命令按钮设置成无效,应设置属性______的值为False。
下面程序的功能是统计字符串中“i”的个数,请填空。SubCOU()DimnAsIntegera$="BeijingUniversityofTechnology"n
工程中有Form1、Form2两个窗体。Forml窗体外观如图1所示。程序运行时,在Forml中名称为Text1的文本框中输入一个数值(圆的半径),然后单击命令按钮“计算并显示”(其名称为Commandl),则显示Form2窗体,且根据输入的圆的半径计算圆
窗体上有一个名为Commandl的命令按钮,并有下面的程序:PrivateSubCommand1_Click()Dimart(5)AsIntegerFork=1TO5arr(k)=kNextkprogart()Fork=1
如果要改变窗体的标题,需要设置窗体对象的______属性。
在一个容量为32的循环队列中,若头指针front=3,尾指针rear=2,则该循环队列中共有______个元素。
随机试题
Agoodmodernnewspaperisanextraordinarypieceofreading.Itisremarkablefirstforwhatitcontains:therangeofnewsfro
诊断早孕的辅助检查方法首选
《城市区域环境振动标准》(GB10070—88)规定的环境噪声标准值适用于( )。
土地利用总体规划实行()审批。
管涵管节安装应()。
企业有下列行为吊销注册证书:( )
在美国发行的外国债券被称为()。
某企业2009年度的资产负债状况如下表所示(单位:元):根据上表资料,该企业的速动比率为()。
关于我国民主集中制原则,下列说法错误的是
ThefamilyisthecenterofmosttraditionalAsians’lives.Manypeopleworryabouttheirfamilieswelfare,reputation,andhono
最新回复
(
0
)