38vb练习题(有答案)(打印)

1《大学VisaulBasic程序设计》复习题第一章VisualBasic程序设计概述第一题：是非题（共10分，每项1分）1.VB6.0只能运行在Windows2000下，不能运行在Windows98下。13A.对B.错√2.用户控件和系统控件都可以加载到工具箱上，并且永久保留。4A.对B.错√第二题、单选题（共45分，每项1.5分）1.VB中的工具栏可以从______菜单上的“工具栏”命令中移进或移出。15A.工具B.编辑C.视图√D.调试2.在VB的集成环境中创建VB应用程序时，除了工具箱窗口、窗体设计窗口、属性窗口外，必不可少的窗口是______。2A.窗体布局窗口B.立即窗口C.代码窗口√D.监视窗口第二章VB的编程机制第一题：是非题（共10分，每项1分）1.在事件驱动的应用程序中，代码是按照预定的路径执行的。15A.对B.错√2.标签控件即可以用来显示用户不能编辑和修改的文本，也可以用来编辑和修改文本。9A.对B.错√3.每一个控件实质上都是一个微型程序。2A.对√B.错4.窗体上的控件同样可以借助于剪贴板进行剪切、复制和粘贴。A.对√B.错第二题、单选题（共45分，每项1.5分）1.文本框没有_____属性。21A.EnabledB.VisibleC.BackColorD.Caption√2.文本框（Text1）中有选定的文本，执行Text1.SelText=”Hello”的结果是＿＿＿。9A.“Hello”将替换掉原来选定的文本√B.“Hello”将插入到原来选定的文本之前C.Text1.SelLength为5D.文本框中只有“Hello”3.要判断“命令按钮”是否被鼠标单击，应在“命令按钮”的______事件中判断。3A.ChangB.KeyDownC.Click√D.KeyPress4.如果文本框的Enabled属性设为False，则＿＿＿。6A.文本框的文本将变成灰色，并且此时用户不能将光标置于文本框上B.文本框的文本将变成灰色，用户仍然能将光标置于文本框上，但是不能改变文本框中的内容√C.文本框的文本将变成灰色，用户仍然能改变文本框中的内容D.文本框的文本正常显示，用户能将光标置于文本框上，但是不能改变文本框中的内容第三题、简单程序（共15分，每项1.5分）1.以下程序的输出结果是______。22PrivateSubCommand1_Click()DimxAsSinglex=0.000000075PrintxEndSubA.0.000000075B..000000075C.7.5E-8D.7.5E-08√2.在窗体中添加Command1和Command2两个命令按钮来测验文本框Text1的值，然后编写如下代码：4PrivateSubCommand1_Click()Text1.Text=ABEndSubPrivateSubCommand2_Click()Text1.Text=CDEndSub首先单击Command2按钮，然后再单击Command1按钮，在文本框中显示______。A.AB√B.CDC.ABCDD.CDAB第二卷主观题填空题（共30分，每项2分。注意：填两个空的题的时候，要按照从上至下，从左至右的顺序添入答题卡！）1.下列程序段的运行结果。2PrivateSubForm_Click()Form1.CurrentX=500Form1.CurrentY=500Form1.Print”您好！”EndSubA.在距离窗体左边框500单位处，显示“您好”B.在距离窗体标题栏500单位处，显示“您好”C.在窗体的中心处，显示“您好”D.在距离窗体左边框和标题栏500单位处，显示“您好”√第三章Visual_Basic语言基础第一题：是非题（共10分，每项1分）1.一条VisualBasic语句如果不超过80个字符是不能运行的。3A.对B.错√2.以Rem开头的注释可以直接出现在语句后面。1A.对B.错√3.变量名是以字母或汉字开头，由字母、汉字、数字或下划线组成，长度可以任意的字符序列。9A.对B.错√4.逻辑型数据的值只有True与False两个值，非零为True，0为False。2A.对√B.错5.是一个字符串，而不是一个字符串。7A.对B.错√6.表达式“ab”&34的结果是“ab34”。5A.对√B.错7.用Dim语句声明变量时，VB系统不仅为变量分配相应数据类型的内在空间，而且还为变量赋所需的初值。83A.对√B.错8.在VB系统中，没有用Dim语句声明的变量不能使用，因为它没有数据类型。8A.对B.错√9.在程序运行过程中，变量中的值不会改变，而常量中的值会被改变。7A.对B.错√10.用Const语句定义的符号常量的名字必须用大写字母构成。4A.对B.错√11.函数Mid(abc123,3,3)的返回值为c12。A.对√B.错12.在VB中，运算符“/”与“\”都是除法运算符，所以表达式5/2与5\2的结果一样。A.对B.错√第二题、单选题（共45分，每项1.5分）1.在下列表达式中，非法的是______。8A.a=b+cB.ab+cC.a≠bc√D.ab+c2.下面语句语法正确的是______。4A.a=1b=2c=3B.a=1:b=2:c=3√C.a=1,b=2,c=3D.a=1;b=2;c=33.表达式34And7=5的返回值为______。12A.0B.TrueC.-1D.False√4.表达式Int(23.4)+Round(-35.5)的计算结果为______。16A.-11B.-12.1C.-13√D.-12.55.Integer类型的数据由______字节组成。16A.1B.2√C.3D.46.在VisualBasic中，用于获得字符串S最左边4个字符的函数是______。7A.Left(S,4)√B.Left(1,4)C.LeftStr(S)D.LeftStr(S,4)7.以下______不能作为VB中的变量名。12A.Abx45B.P1234C.89TasFF√D.xy8.下面四项中，______是VB中的数值变量。6A.ABC√B.E+2C.TrueD.1.35E-29.表达式a+b=c是______。6A.赋值表达式B.字符表达式C.算术表达式D.关系表达式√10.下列四个字符串进行比较，最小的是______。9A.9977√B.B123C.BASED.DATA11.在VisualBasic中，语句Print39的输出结果为______。14A.0B.1C.-1D.False√12.语句PrintFormat(HELLO,)的输出结果是______。7A.HELLOB.hello√C.HeD.he13.常量2.7856E-6的类型是______。7A.整型B.实型√C.字符型D.双精度14.VB表达式Cos(0)+Abs(-1)+Int(Rnd(1))的值是______。5A.1B.2√C.0D.-115.在VB中，变量的默认类型是______。9A.IntegerB.DoubleC.Variant√D.Currency16.在VisualBasic中，最简单的数据类型包括______。10A.整型、实型、布尔型、字符型√B.整型、实型、字符型C.整型、实型、逻辑型D.实型、逻辑型、字符型17.在VB中，常量987654,987654#的数据类型是______。8A.整型B.实型C.长整型D.双精度√418.数学表达式xyz的正确VB逻辑表达式是______。12A.xyAndzB.xyzC.xyAndzD.xyAndyz√19.函数Int(Rnd*11)+10产生的数值的范围是______。8A.（0,10）B.[10,10]C.[10,20]√D.(0,20)20.下列逻辑表达式中，其值为真的是______。4A.bABC√B.THATTHEC.9HD.Aa第三题、简单程序（共15分，每项1.5分）1.以下程序的输出结果是______。12PrivateSubCommand1_Click()a=1234b$=Str$(a)c=Len(Trim(b))printc;LenB(b)EndSubA.38B.410√C.510D.482.以下程序的输出结果是______。12PrivateSubCommand1_Click()DimsumAsIntegersum%=19sum=2.32Printsum%,sumEndSubA.192.32B.1919C.2.322.32D.22√3.执行下面程序段后，变量c$的值为______。7a$=VisualBasicProgrammingb$=Quickc$=b$&Ucase(Mid$(a$,7,6))&Right$(a$,12)A.VisualBASICProgrammingB.QuickBasicProgrammingC.QUICKBasicProgrammingD.QuickBASICProgramming√4.以下程序的输出结果是______。6PrivateSubCommand1_Click()a=ABCDb=efghc=Lcase(a)d=Ucase(b)Printc+dEndSubA.abcdEFGH√B.abcdefghC.ABCDefghD.ABCDEFGH5.下面程序运行后，输出的结果为________。8PrivateSubCommand1_Click()A$=”Beijing”B$=”dalian”C$=”shanghai”C$=Instr(Left(A$,2)+Right$(B$,2),C$)PrintC$EndSubA.10B.0√C.8D.65第四章控制结构第二题、单选题（共45分，每项1.5分）1.If结构的结束语句是______。5A.EndSelectB.EndSubC.EndIf√D.EndDo2.InputBox函数的返回值的类型为______。4A.数值B.字符串√C.逻辑值D.日期值3.MsgBox函数的返回值的类型为______。5A.整数√B.字符串C.逻辑值D.日期值4.通过代码在运行时设置属性的语法格式为______。14A.对象名＝属性.新值B.对象名.属性＝新值√C.对象名.新值=属性.新值D.对象名.属性=属性.新值第三题、简单程序（共15分，每项1.5分）1.从键盘输入一个实数mm，利用字符串函数对输入的数进行处理，如果输出的内容不是字符则输出“END“，程序的输出结果是______。11PrivateSubCommand1_Click()mm=Val(InputBox(请输入一个实数))n$=Str$(mm)p=InStr(n,.)‘InStr()函数：指定一字符串在另一字符串中最先出现的位置Ifp0ThenPrintMid(n,p)‘Mid语句来得到某个字符串中的几个字符ElsePrintENDEndIfEndSubA.用字符方式输出数据mmB.输出数据的整数部分C.输出数据的小数部分√D.只去掉数据部分的小数点，保留所有数码输出2.运行下面程序后，在弹出的消息窗口中显示的是______。7PrivateSubForm_Click()score=Int(Rnd)+5‘当参数为负数时，Int函数返回小于或等于该参数之最大整数，rem而Fix函数则返回大于或等于该参数之最小整数。SelectCasescoreCase5a$=GoodCase4a$=OkCase3a$=PassCaseElsea$=BadEndSelectMsgBoxa$EndSubA.BadB.PassC.OkD.Good√3.以下程序的输出结果是______。8PrivateSubCommand1_Click()6a=100Dos=s+aa=a+1LoopUntila100printaEndSubA.100B.120C.201D.101√4.以下程序的循环次数是______。11PrivateSubCommand1_Click()Forj=8