首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
下列程序实现的功能是:当在窗体上单击时,将输出a1.txt 文件中的数字字符的个数。 Private Sub form_ Click() Dim Ch As String * 1 Dim n As Integer Open "c:\a1. txt" for
下列程序实现的功能是:当在窗体上单击时,将输出a1.txt 文件中的数字字符的个数。 Private Sub form_ Click() Dim Ch As String * 1 Dim n As Integer Open "c:\a1. txt" for
admin
2013-04-11
20
问题
下列程序实现的功能是:当在窗体上单击时,将输出a1.txt 文件中的数字字符的个数。
Private Sub form_ Click()
Dim Ch As String * 1
Dim n As Integer
Open "c:\a1. txt" for Input As #10
do while【 】
Ch = Input(1, #10)
if【 】 then
n=n+1
End if
Loop【 】
Close #10
End Sub
选项
答案
Not EOF(10), Ch>=“0” And Ch<=“9”,Print n
解析
要求算出a1.txt中的数字字符的个数,可采用下述方法:首先定义一个记录数字字符个数的变量n并打开文件,然后从文件中读取一个字符,判断该字符是否为数字字符,若是数字字符,则变量n的值加1。重复上述过程直到文件结尾。在读字符前应要测试文件内部读写指针是否位于文件尾,只有不是在文件结尾处才能读取字符,故[7]处应填“Not EOF(10)”,读取一个字符后,应判断该字符是否为数字字符,故[8]处应填“Ch>=“0”And Ch<=“9””,当文件中的所有字符都读出一遍后,n的值就是数字型字符的个数,最后应输出n,所以[9]处应填“Print n”。
转载请注明原文地址:https://jikaoti.com/ti/dYO0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列可作为VisualBasic变量名的是______。
决定一个窗体有无控制菜单的属性是______。
假设在窗体Form1上加一个通用对话框控件CommonDialog1,用语句CommonDialog1.ShowOpen建立打开文件对话框,那么从该对话框中单击“确定”按钮退出对话框时,为了得到用户所选择的文件的路径以及文件名,应该使用CommonDial
下列事件过程的功能是:建立一个名为Datal的随机文件,存放角度值及这些角度的正弦函数值和余弦函数值,角度为1,2,3,…,90。请在空白处填入适当的内容,将程序补充完整。PrivateTypeAngKAsInteger
在面向对象的程序设计中,类描述的是具有相似性质的一组【】。
如果在窗体Form1上添加一个通用对话框控件CommonDalogl,那么语句CommonDialog1.Action=4的作用是______。
软件的结构化开发过程各阶段都应产生规范的文档,以下选项中,在设计阶段应产生的文档是______。
设有以下循环结构:Do循环体LoopWhile<条件>则以下叙述中错误的是______。
在窗体上画一个名称为CommonDialogl的通用对话框,一个名称为Command1的命令按钮。要求单击命令按钮时,打开一个保存文件的通用对话框。该窗口的标题为Save,默认文件名为SaveFile,在“文件类型”栏中显示*.txt。则能够满足上述要求的
下列叙述中正确的是______。
随机试题
五行调节事物整体动态平衡的机制是
无功补偿的投切方式,在()情况下,宜装设无功自动补偿装置。
将废物直接作为原料进行利用或者对废物进行再生利用是循环经济的()
审查施工图预算的方法中,()的优点是重点突出,审查时间短、效果好。
下列关于风险监管的说法中,不正确的是()
新疆的葡萄庄园的产量逐年上升,葡萄的供过于求导致价格的下降。如果不对葡萄庄园种植葡萄加以限制,葡萄的价格还将进一步下跌。政府为了提高葡萄价格,让葡萄田闲置,并给这些农民提供直接的补偿金。每个庄园的补偿金都有一个明确的最高限额。政府的该计划如果成功实施,不会
下面不能作为结构化方法软件需求分析工具的是
Queusearelong.Lifeisshort.Sowhywastetimewaitingwhenyoucanpaysomeonetodoitforyou?InWashingtonD.C.—acity
Whatisthepatientsufferingfrom?
Wisebuyingisapositivewayinwhichyoucanmakeyourmoneygofurther.The【C1】______goaboutpurchasinganarticleoraserv
最新回复
(
0
)