首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设在当前目录下有一个名为"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-09-19
23
问题
设在当前目录下有一个名为"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/K2Fp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设有如下事件过程:PrivateSubCommand1_Click() Dima a=Array(12,3,8,5,10,3,5,9,2,4) Fork=1To9 Printfun(a(k-1),a(
设窗体上有2个直线控件Line1和Line2,若使两条直线相连接,需满足的条件是( )。
表达式12/2\4的值是( )。
(1)在名称为Forml,标题为“图片”的窗体上添加1个名称为Imagel的图像框,其高为2500,宽为2000。请通过属性窗口设置适当属性,将考生文件夹下的图片文件piel.jpg插入图像框,并使图片自动适应图像框的大小(如图所示)。注意:存盘
有如下程序代码:PrivateSubForm_Click()Dima(10)AsInteger,b(5)AsIntegerFori=1To10a(i)=iNexti
假定把计时器控件Timer1的Interval属性设置为1000,Enabled属性设置为True,并编写下面的事件过程:PrivateSubTimer1_Timer()DimxAsIntegerFori=1To
假定把计时器控件Timer1的Interval属性设置为10,Enabled属性设置为True,并编写下面的程序:DimxAsIntegerPrivateSubTimer1_Timer()Fori=1To100
能够产生1到50之间(含1和50)随机整数的表达式是( )。
窗体上有一个名称为Command1的命令按钮,编写如下事件过程:PrivateSubCommand1_Click()i=0DoWhilei<6Forj=1Toin
下列说法中错误的是
随机试题
下列药物中,可能引起白细胞、中性粒细胞减少的是()。
简述干粉灭火系统的巡查内容及方法。
世界上第一家近代连锁商店是()。
文学活动的全部真理在于对世界的模仿。()
Futuristshaveidentifiedtwochangesthatseemtobecentraltocontemporarysociallife.First,theUnitedStatesisbeingres
按照规则对人们行为规定或限定的范围或程度,法律规则可以分为()。
价值评价在实践中所起的作用主要有()
Therewasatimewhenparentswhowantedaneducationalpresentfortheirchildrenwouldbuyatypewriter,aglobeoranencyclo
Ininterviews,famouspeopleoftensaythatthekeytobecomingbothhappyandsuccessfulisto"dowhatyoulove."Butmasterin
Alltheusefulenergyatthesurfaceoftheearthcomesfromtheactivityofthesun.Thesunheatsandfeedscreaturesandmank
最新回复
(
0
)