19VB程序改错题收集(答案在后面)

1、 /8、运行下面的、运行下面的中常见的错误程序，单击命令按钮，出现如下图所示的提示信息:出现该错误的原因是A语句缺少.语句缺少变量的数据类型说明错误.变量的数据类型说明错误、某程序的事件过程如下所示：后弹出如下图所示的错误提示。导致该错误的原因可能是（运行程序，单击按钮后弹出如下图所示的错误提示。导致该错误的原因可能是（函数应用不正确.变量数据类型定义错误A函数应用不正确.变量数据类型定义错误窗体上缺少文本框对象、某程序段如下：运行该程序段，会出现的错误提示为（）下标越界（）子程序或函数未定义（）要求对象（）溢出类型范围在，而到相乘超出这个范围4某程序如下：运行程序，单击命令按钮后，出现的错误

2、提示为(A)下标越界(B)子程序或函数未定义运行程序，单击命令按钮后，出现的错误提示为(C)溢出(D)类型不匹程序:面积为、有如下的程序:面积为程序运行后，单击命令按钮,出现如图所示的错误提示，下列原因分析正确的是()常量不能用小数()是常量，不允许赋值()文本框中输入的数据不是常量()表达式结果超过了变量类型的范围、某程序如下:运行程序，单击命令按钮(A)Fori运行程序，单击命令按钮(A)Fori=1To(C)Nexti7某程序如下:后后出弹现出1如图所示的出错信息提示，此时程序正执行的语句是()()运行程序，单击命令按钮后弹出如图所示的出错信息提示，此时程序正执行的语句是（A）a=1（B

3、）b=5（C）c=Sqr（a-b）（D）Text1.Text=Str（c）8某同学正编写一个判断酒驾行为的程序，其窗体和代码窗口如下图所示。根据代码窗口中的程序，要在程序运行时获取输入的值，窗体上必须增加的对象是标签标签文本框文本框9运行下面的程序，单击命令按钮，出现如下图所示的提示信息:PrivateSubCommand1_Click()DimiAsInteger,cAsString,sAsString,tAsStrings=2012Herot=Fori=1ToLen(s)c=Mid(s,i,1)Ifc=aAndc=zt=t+cEndIfNextiText1.Text=tEndSub出现该错

4、误的原因是A语句缺少.语句缺少变量的数据类型说明错误.变量的数据类型说明错误0某程序在调试中弹出如图所示的错误窗口，产生该错误的可能原因是l）.该程序代码中，缺少B该程序窗体界面中，缺少某控件该程序代码中，某个常量或变量没有声明D该程序设计软件没有正确安装运行如下程序，单击命令按钮，出现如图所示的出错信息。发生下标越界错误时所执行的语句是（）（）（）运行如下误时所执行的语句是程序，单击命令按钮（）（）（）运行如下误时所执行的语句是程序，单击命令按钮command1_5)AsInTo6（）a出现如图所示的出错信息。发生下标越界错（）（）（）（）某程序如下i运行程序，单击命令按钮后弹出如图所示的出

5、错信息提示，此时程序正执行的语句是（A）Fori=0To10（B）a（i）=i*i（C）Nexti（D）List1.AddItemStr（a（运行如下程序，单击命令按钮，出现如图所示的出错信息。发生除数为零错误时所执行的语句是a=2b=a+1ndSub（）（）（）（）有如下的程序arivateSubCom面积为程序运行后，单击命令按钮a出现如图所示的错误提示，下列原因分析正确的是（）常量不能用小数（）是常量，不允许赋值（）文本框中输入的数据不是常量（）表达式结果超过了变量类型的范围16.题目如上题，问具体是哪条语句出错（）（）（）（）运行如下程序，单击命令按钮，出现如图所示的出错信息。发生类型

6、不匹配错误时所执行的语句是()()()()运行程序，单击命令按钮(A)a=1(C)c=Sqr(a-某程序如下i后弹出如图所示的出错信息提示，此时程序正执行的语句是(B)b=5(D)Text1.Text=Str运行程序，单击命令按钮(A)a=1(C)c=Sqr(a-某程序如下i后弹出如图所示的出错信息提示，此时程序正执行的语句是(B)b=5(D)Text1.Text=Str运行程序，单击命令按钮(A)Sum=0后弹出如图所示的出错信息提示，此时程序正执行的语句是(B)Fori=10To2(C)(D)某.程序如下i运行程序，单击命令按钮后弹出如图所示的出错信息提示，此时程序正执行的语句是(A)a=

7、d(B)(C)a=Chr(Asc(a)-32)(D)某.程序如下i运行程序，单击命令按钮后弹出如图所示的出错信息提示，引起该错误的语句是（A）Fori=1To10Step3（B）x=i*（i+2（C）List1AddItemStr（x）（D）Nexti某程序如下i运行程序，单击命令按钮后弹出如图所示的出错信息提示，引起该错误的语句是（A）Fori=1To12（B）c=c+1（C）Nexti（D）Text1.Tex=Str（c）下图所示是一个求和程序，程序界面上有标签、标签和一个命令按钮a程序运行时，单击命令按钮后弹出“编译错误”信息提示并指向错误语句所在代码。请问下面修改方法可以让程序正确运行

8、的是：（pBt）（xCt）（sD）（A）4某.程序如下，执行该程序后，将会出现的错误提示为（pBt）（xCt）（sD）（A）4某.程序如下，执行该程序后，将会出现的错误提示为（）下标越界（）子程序或函数未定义（）下标越界（）子程序或函数未定义（）溢出（）类型不匹配小王同学在调试程序时，会出现下图错误提示信息的是：(A)Functionsina(n)AsIntegerEndFunction(B)PrivateSubabc(a,b)asdoubleEndSub(C)PrivateSubCommand1_click()EndSub(D)PrivateSubCommand1_click()Privat

9、eSubCommand1_click()EndSub.VB语句s=s+Val(Key)在运行时出现“类型不匹配”信息，则变量s的数据类型可能是：(A)Integer(B)double(C)single(D)string.某VB程序段代码如下，它的作用是计算1*2*3*99*100的值:PrivateSubCommand1_Click()TOC o 1-5 h zDimsAsIntegers=1Fori=1To100s=s*iNextiPrintsEndSub程序运行后出现“溢出”错误信息，下面对于出错原因分析正确的是：（A）把语句改为dimsasdouble，原来s的数据类型不适合（B）把语句改为s=0，这样就不会出现数据溢出错误（C）