首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
下列程序实现的功能是:当在窗体上单击时,将输出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
38
问题
下列程序实现的功能是:当在窗体上单击时,将输出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://kaotiyun.com/show/kOhp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列表达式有错误,正确的写法应该是【】。[(a+B)+c]/80-5÷(d+e)
以下事件过程可以将打开对话框的标题改为“新时代”的是
Sub过程与Function过程最根本的区别是
随机文件使用Put语句写数据,使用【】语句读数据。
对窗体编写如下事件过程:PrivateSubForm_MouseDown(ButtonAsInteger,ShiftAsInteger,XASSingle,YAsSingle)IfButton=2Then
在数据库的三级模式结构中,描述数据库中全体数据的全局逻辑结构和特性的是______。
已知学生关系是;学生(学号,姓名,性别,专业号,班长),其中“学号”是主码,“班长”属性表示该学生所在班级的班长的学号,则学生关系是______。
在过程内用Dim语句声明的变量只能在本过程中使用,而其他的过程不可访问,这种变量称之:为______。
在窗体上画一个名称为CommonDialogl的通用对话框,一个名称为Command1的命令按钮。要求单击命令按钮时,打开一个保存文件的通用对话框。该窗口的标题为Save,默认文件名为SaveFile,在“文件类型”栏中显示*.txt。则能够满足上述要求的
以下Case语句中错误的是______。
随机试题
水平战略联盟
女,42岁,右腰部疼痛剧烈难忍,伴恶心、呕吐1天,疼痛放射至同侧下腹、会阴及大腿内侧,尿常规检查:RBC10~15/HP,血常规检查:WBC8.2×109/L,N75%最可能的诊断是
十二指肠球部溃疡表现为胆道蛔虫病表现为
张某、王某和刘某签订合伙协议,设立合伙企业,约定张某于企业成立之日起3个月内出资10万元,企业成立后,张某拒绝出资,以下说法正确的是:()
经济法律关系的( )是指经济法律关系主体的权利义务共同指向的事物。
背景资料:某公司承建一项地铁车站土建工程,车站长236m,标准段宽19.6m,底板埋深16.2m,地下水位标高为13.5m,车站为地下二层三跨岛式结构,采用明挖法施工,围护结构为地下连续墙,内支撑第一道为钢筋混凝土支撑,其余为800mm钢管支撑,基坑内设
某新建项目,建设期为3年,共向银行贷款1800万元。贷款分别为:第1年400万元,第2年800万元,第3年600万元。年利率为5%,则建设期利息为()万元。
SQL支持集合的并运算,在VisualFoxPro中SQL并运算的运算符是
(Eventhough)he(hadbeenstudying)Englishforthreeyears(before)hecametoEngland,itisstilldifficultforhimtomake
(1)WhenIwasayounggirllivinginIreland,Iwasalwayspleasedwhenitrained,becausethatmeantIcouldgotreasurehunti
最新回复
(
0
)