首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设在当前目录下有一个名为“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
27
问题
设在当前目录下有一个名为“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全国计算机二级
相关试题推荐
用下面的语句所定义的数组的元素个数是()Dimarr(3To5,—2To2)
在VisualBasic中按文件的访问方式不同,可将文件分为【】。
使用PublicConst语句声明一个全局的符号常量时,该语句应放在______。
软件维护活动包括以下几类:改正性维护、适应性维护、【】维护和预防性维护。
对用MsgBox显示的消息框,下面______是错的。
为了使一个窗体从屏幕消失但仍在内存中,所使用的方法或语句为______。
(1)在名称为Forml标题为“选课”的窗体上添加一个复选框数组,名称为CHl,共有四个复选框,按顺序其标题分别是“数学”、“语文”、“外语”、“计算机”,其中“语文”、“计算机”复选框处在选中状态下,程序运行时的窗体如图68—1所示。请按要求添加控件并设
(1)在名称为Forml的窗体上建立一个名称为P1的图片框和两个命令按钮,名称分别为Cmdl和Cmd2,标题分别为“输出”和“清除”,如图22—1所示。要求程序运行后,每单击一次“输出”按钮,不使用任何变量而直接在图片框中显示小写字母“loadme’’;
设a="MicrosoftVisualBasic",则以下使变量b的值为“VisualBasic”的语句是______。
已知二叉树BT的后序遍历序列是dabec,中序遍历序列是debac,它的前序遍历序列是______。
随机试题
缺铁性贫血患儿为改善贫血症状最佳的食物是
(2003年第70题)缺铁性贫血病人发生Plummer—Vinson综合征时的临床特点是
关于社会主义法的适用说法正确的有()。
( )是对保险经纪从业人员工作态度的基本要求。
甲公司2015年年初开始研发某项新产品专利技术,2015年度投入研究费用600万元,2016年度进入开发阶段,发生开发支出1200万元,其中符合资本化条件的开发支出为1000万元,至2017年1月获得成功并达到预定可使用状态,并向国家专利局提出专利权申请且
传统节日有了法定假期,未必就不会渐行渐远,一个古老节日之所以沿袭不衰真正原因不在于它有多热闹能带来多少商机,而在于它承载着中国人代代累积下来的那份感情,流淌着中华民族赖以生存的精神血脉和文化基因,如今社会进步经济发展,人们对传统节日有了更高期待和要求,期待
Howbesttosolvethepollutionproblemsofacitysunksodeepwithinsulfurouscloudsthatitwasdescribedashellonearth?
•Readthearticlebelowaboutinternationaltaxation.•Inmostofthelines41--52thereisoneextraword.Itiseithergramm
IshouldstartbysayingasclearlyasIcanthatIloveantibiotics.RecentlyIhaddinnerwithapediatricianfriend,andshe
Ifyoueverneedhelpsavingmoneyoncarinsurance,contactyourlocalGEICOoffice.You’llgetthegreatratesfromGEICO.And
最新回复
(
0
)