首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设在当前目录下有一个名为“file.txt”的文本文件,其中有若干行文本。编写如下程序: Private Sub Commandl—Click() Dim ch$.ascii As Integer Open”file.txt”For
设在当前目录下有一个名为“file.txt”的文本文件,其中有若干行文本。编写如下程序: Private Sub Commandl—Click() Dim ch$.ascii As Integer Open”file.txt”For
admin
2020-04-18
48
问题
设在当前目录下有一个名为“file.txt”的文本文件,其中有若干行文本。编写如下程序:
Private Sub Commandl—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
toastii=n
End Function
程序的功能是( )。
选项
A、按行计算文件中每行字符的ASCⅡ码之和,并显示在窗体上
B、计算文件中所有字符的ASCⅡ码之和,并显示在窗体上
C、把文件中所有文本行按行显示在窗体上
D、在窗体上显示文件中所有字符的ASCⅡ码值
答案
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/xZTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有一个名称为Commandl的命令按钮。其单击事件过程如下:PrivateSubCommandl_Click()Open”c:\f1.txt”ForInputAs#1:Open”c:\f2.txt”ForOutputAs#
窗体上有一个名称为Commandl的命令按钮。要求编写程序,把文件f1.txt的内容写到文件f2.txt中,然后将fl.txt删除。命令按钮的单击事件过程如下:PrivateSubCommandl_Click()Open”c:\f1.tx
窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。以下程序的功能是从顺序文件中读取数据:PrivateSubCommandl_Click()DimslAsString,s2AsStringO
以下关于文件的叙述中,错误的是
某人编写了下面的程序,希望能把Textl文本框中的内容写到out.txt文件中PPrivateSubCommandl_Click()Open”out.txt”ForOutputAs#2Print”Text1”
窗体上有1个Timerl计时器,1个Shapel形状控件,还有下面程序代码:DimflagAsBooleanPrivateSubForm_Load()flag=TrueTimer1.Enabled=TrueTim
设有如下程序:PrivateSubForm_Click0num=InputBox(”请输入一个实数”):P=InStr(num,”.”)Ifp>0ThenPrintMid(num,P+1)Else
把窗体的KeyPreview属性设置为True。然后编写如下事件过程PrivateSubForm_KeyPress(Key.AsciiAs
窗体上有1个名称为CD1的通用对话框,1个名称为Commandl的命令按钮。命令按钮的单击事件过程如下:PrivateSubCommandl_Click()CD1.FileName=“”CD1.Filter=”AllFi
随机试题
具有趋化作用的物质有
具有控制腠理开合、汗液排泄之气是
癫痫小发作首选药物是()
下述哪一点关于利尿药作用部位的描述是错误的
胰岛素注射部位是
如果被审计单位是上市实体,注册会计师在就其独立性与被审计单位的治理层进行沟通时,下列通常不属于沟通内容的是()。
阅读材料,回答121~125题。 8月份,规模以上工业原煤生产增速回升,煤炭进口保持较高水平:原油生产增速由负转正,进口继续增加;天然气生产保持较快增长,进口持续高速增长;电力生产加快。 一、原煤生产增速回升,煤炭进口保持较高水平,市场价格小幅波动
法律对同一事项的新的一般规定与旧的特别规定不一致,不能确定如何适用时,由()裁决。
Veryfewscientists______withcompletelynewanswerstotheworld’sproblems.
InJapan,wherecareeropportunitiesforwomenarefew,wheredivorcecanmeanalifeofhardship,andwheremostfemalenamesa
最新回复
(
0
)