《Visual Basic6.0程序设计教程》复习题 一 判断题 在多窗体应用程序中,若不设置启动窗体,则默认将第一个窗体作为启动窗体.(*) Visible属性用来设置对象的可见性.(√) 3、事件驱动编程是非常适用于图形用户界面的编程形式.(√) 4、文本框获得焦点的方法是GotFocus.(*) 5、VB 程序中所有用到的控件都可以在标准工具箱中找到.(*) 6、标签和文本框都用于显示文本,它们的区别是文本框中是只读文本,标签中的文本是可编辑文本.(*) 7、VB中的ActiveX控件,使用时必须从"部件"中添加到"工具箱"后才能使用.(√) 8、文本框控件中显示文本内容用Caption属性.(*) 9、设置标签的BorderStyle属性可以改变标签的外观.(√) 10、控件的Top属性和Left属性共同决定了控件在窗体上的位置.(√) 11、VB中规定,字符串常量必须用一对西文单引号将字符序列括起来.(*) 12、过程级变量可以在多个过程中使用.(*) 13、表达式8 mod 9的值是0 .(*) 14、VB表达式中的乘号不能省略,用符号·代替.(*) 15、InputBox函数的返回值是一个整数类型.(*) 16、在多窗体应用程序中,Hide方法和Unload语句的功能是相同的,都是卸载窗体.(*) 17、命令按钮只能显示文字不能加载图片.(*) 18、文本框所显示的内容用Caption属性设置,在程序设计和运行期间,可以对它的内容进行编辑.(*) 15、选择结构的程序内部可以嵌套另一选择结构.(√) 16、3≤x<10 是VB中合法的关系表达式.(*) 17、用Dim a(-1 to 5 )定义一个一维数组,该数组中元素个数是6.(*) 18、循环语句的嵌套可以是同一种类的循环语句的嵌套,也可以是不同种类的循环语句嵌套循环.(√) 19、列表框中项目的序号是从1开始的.(*) 20、Borderstyle属性用来设置标签的边框样式.(√) 21、VB代码中的所有符号,都必须是英文半角字符表示,不能使用汉字或全角字符.(√) 22、表示条件00 And y<10 Or x<0 .(√) 23、逻辑运算符"Or"表示"或"关系.(√) 24、MsgBox函数可以有带回返回值和不带回返回值两种调用格式.(√) 25、数组声明语句dim a(5) as integer 声明的数组a下标最小的元素是a(1). 用于循环次数已知.(*) 26、在列表框中,RemoveItem方法是按照项目的序号来删除项目的.(√) 27、Alignment属性用来确定标签中显示内容的位置.(√) 28、FOR I=2 TO 100 循环结束后 I 的值为100.(*) 29、Name(名称)属性是一个控件区别于其他控件的特征.(√) 30、VB程序设计的特点是事件驱动.(√) 31、在Visual Basic6.0中所有对象都具有相同的属性.(*) 32、文本框和标签控件运行后都可以接受用户的输入(*). 33、如果要删除窗体上的多余控件,先要选定该控件,然后按"Delete"键.(√) 34、VB工具箱中提供的控件是标准控件,这些控件可以直接使用,也叫内部控件.(√) 35、数组声明语句dim a(5) as integer 声明的数组a中元素个数是5 .(*) 36、FOR I=2 TO 100 循环结束后 I 的值为100. (*) 37、试如果每隔5秒产生一个timer事件,则interval属性应设置为500.(*) 38、Borderstyle属性用来设置标签的边框样式.(√) 39、为了使一个控件在运行时无效,应对控件的visible 属性进行设置.(*) 40、用户在代码窗口书写代码时,在用户输入对象名称和点号后,系统回自动出现一个下拉列表,自动列出属性和方法.(√) 41、要实现图象框中显示图形的大小自动适应图像框大小,需设置属性Autosize值为True.(*) 42、给变量起名时,不能用VB的保留字作为变量名,但可以将保留字嵌入变量名中.(√) 43、表达式"12"+"456"与表达式12+456是相同的.(*) 44、表达式8\9的值是0 .(√) 45、如果一个变量未经定义而直接使用,则该变量的类型是可变型.(√) 46、MsgBox函数的返回值是一个整数类型.(√) 47、逻辑运算符"Not"表示"非"关系.(√) 48、计时器控件有唯一的属性Interval.(*) 49、Enabled属性用于激活或禁用对象.(√) 50、当进入vb的集成开发环境,若发现不显示"工具箱"时,可以使用"视图" 中的"工具箱"打开.(√) 51、在Visual Basic中所有对象都具有Click事件.(*) 52、若要对窗体上的控件调整大小,先要保证该控件是活动控件, 标签中的文本是可编辑文本.(√) 53、计时器控件只可以触发一个事件,即Timer事件.(√) 54、在VB中默认数组下标的下限是1.(*) 55、在代码中要关闭应用程序的功能可以用End语句实现.(√) 56、删除列表的项目所用方法为DeleteItem.(*) 57、VB中对于数值型数据,根据是否带小数部分,分为整型数和浮点数两类.(√) 58、VB中规定日期时间型常量数据必须用一对西文#将数据括起来.(√) 59、模块级变量的声明既可以用关键字Private,也可以用关键字Dim.(√) 60、随机函数Rnd的功能是产生一个小于1但大于或等于0的随机小数.(√) 61、逻辑运算符"And"表示"与"关系.(√) 62、计时器控件在运行时不会显示在屏幕上.(√) 63、在VB中,所有数组都是变长的,也就是说所有数组都是动态数组.(*) 64、"23"+"56"的运算结果是79.(*) 65、Print方法除了可以在窗体上显示信息外,还可以用于在图片框中显示信息.(√) 66、在VB中,对象是指具有特殊属性和行为方式的实体,各种控件都是对象,但窗体不属于对象.(*) 67、响应某个事1、控件放置到窗体中后,其大小和位置就不能再进行调整.(*) 68、VB有三种工作模式分别是设计模式、运行模式、中断模式.(√) 69、双击控件或窗体本身会打开属性窗口.(√) 70、VB程序一行写不下,可以直接换行继续写.(*) 71、如果把光标置于控件内部,按住鼠标左键不放,移动鼠标,就可以把控件拖到窗体上任何位置.(√) 72、在VB程序中播放音乐,需要用到MMcontrol控件,该控件属于ActiveX控件.(√) 73、要使框架和框架内的控件成为一个整体,在设计界面时必须先添加框架, 然后直接在框架内添加需要的控件.(√) 74、当Label控件中Autosize属性为True时,控件的文本发生变化时,控件会随文本的大小自动调整.(√) 75、控件的Visible属性同Enabled属性的功能是相同的,都使控件处于失效状态.(*) 76、给变量起名时,可以用VB中的保留字作为变量名.(*) 77、Vb中的取模运算符是Mod.(√) 78、表达式8/9的值是 0.(*) 79、VB中的变量名中可以包含字母、数字、下划线和标点符号.(*) 件后所执行的操作通过一段代码来实现,这样的一段程序代码叫做事件过程.(√) 80、属性、事件、方法构成了对象的三要素.(√) 81、命令按钮只能响应单击click事件.(*) 82、当在窗体上单击某控件时,控件的边框上就会有8个黑色小方块,此时该控件就是活动控件.(√) 83、在VB程序中播放Flash动画,需要用到Shockwave Flash控件,该控件属于VB标准控件.(*) 84、在多窗体应用程序中,若工程中添加了多余的窗体,可以在工程资源管理器中删除该窗体.(√) 85、要在命令按钮上显示"复制"的内容,应将其Name,属性设为"复制". (*) 86、命令按钮主要是接受用户输入的命令,最常用的事件是"鼠标单击". (√) 87、变量名只能由西文字母、汉字、数字及下划线组成.(√) 88、表达式 (2*3)>=5 and 12/3 <= 4 的值为false.(*) 89、逻辑型数据只有True和False两个值.(√) 90、组合框是列表框和文本框的集成,具有列表框和文本框的功能.(√) 91、给变量起名时,可以以数字字符开头.(*) 92、列表框中删除所有项目使用的方法是Remove.(*) 93、将文本框的Selstart属性设为0,表示当前选择的文本的起始位置在第一个字符之前.(√) 94、控件的Top属性和Left属性共同决定了控件在窗体上的位置.(√) 95、VB中规定,字符串常量必须用一对西文单引号将字符序列括起来.(*) 96、过程级变量可以在多个过程中使用.(*) 97、表达式8 mod 9的值是0 .(*) 98、VB表达式中的乘号不能省略,用符号·代替.(*) 99、InputBox函数的返回值是一个整数类型.(*) 100、选择结构的程序内部可以嵌套另一选择结构.(√) 二、选择题 1、在VB中,所有的窗体和控件都必定具有的一个属性是:(A ) A、Name B、Font C、Caption D、FillColor 2、命令按钮上要显示的内容用下列哪个属性设置:( A ) A、Caption B、Text C 、Font D、Picture 3、下面哪个语句用于关闭退出应用程序:( A ) A、End B、End Sub C、Endif D、End Else 4、确定控件在窗体的位置的属性是: (B ) A、Width和Height B、Top和Left C、Width或Height D、Top或Left 5、下面有关于控件的Visible属性,说法正确的是: (A ) A、默认情况下Visible属性值是True B、如果设置控件的Visible属性值为False,则该控件消失 C、Visible的值可设为0或1 D、设Visible属性同设置Enabled属性的功能是相同的,都使控件处于失效状态 6、要使标签中显示的文本靠右显示, 应设置Alignment 的值为:(B ) A、 0 B、 1 C、2 D、3 7、以下说法错误的是:(C A、事件是由VB预先设置好的、能够被对象识别的动作 B、响应某个事件后所执行的操作通过一段程序代码来实现, 这段程序代码称为事件过程 C、一个对象对应一个事件,一个事件对应一个事件过程 D、事件过程的一般格式为: Private Sub 对象名称_事件名称() 事件响应程序代码 End Sub 8、在VB中,以下方式不能进入运行模式的是( D ) A、F5 B、"运行"菜单下的"启动"命令 C、工具栏的启动按钮 D、"调试"菜单下的"启动"命令 9、设置标签上文字的颜色的属性是( C ) A、Backstyle B、Backcolor C、Forecolor D、Borderstyle 10、在Visual Basic中,要将一个窗体装载到内存进行变量初始化等预处理,应使用的方法是 (C ) A、Show B、UnLoad C、Load D、Hide 11、下列变量名中,合法的变量名是(A ) A.C24 B、A B C、A:B D、1+2 12、比较图片框(PictureBox)和图像框(Image)的使用,正确的描述是(D ) A. 两类控件都可以设置AutoSize属性,以保证装入的图形可以自动改变大小 B. 两类控件都可以设置Stretch属性,使得图形根据物件的实际大小进行拉伸调整,保证显示图形的所有部分 C. 当图片框(PictureBox)的AutoSize自属性为Jlase时,只在装入图元文件(*.wmf)时,图形才能自动调整大小以适应图片框的尺寸 D. 当图像框(Image)的Stretch属性为True时,图像框会自动改变大小以适应图形的大小,使图形充满图像框 13、在窗体上添加一个命令按钮和一个文本框,并在命令按钮中编写如下代码: Private Sub Command1_Click( ) A=1.2 C=Len(Str$(A)+Space(10) Text1.text=C End Sub 程序运行后,单击命令按钮,在文本框中显示( C) A.3 B.8 C.14 D.10 14、在窗体中添加两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(其Name属性为Command1),然后编写如下程序: Private Sub Command1_Click() X = 0 Do While X < 10 X = (X + 1) * (X + 2) n = n + 1 Loop Text1.Text = Str(n) Text2.Text = Str(X) End Sub 14、程序运行后,单击命令按钮,在两个文本框Text1和Text2中分别显示的值是(B ) A.1和0 B.2和12 C.2和72 D.3和12 15、以下哪类控件能用来显示图形(B ) A.Label B.PictureBox C.TextBox D.OptionButton 16、在窗体中添加一个名称为Command1命令按钮和一个名称为text1的文本框,然后编写如下程序: Private Sub Command1_Click() Dim x, y, z As Integer x = 5: y = 7: z = 0 Text1.Text = "" Call p1(x, y, z) Text1.Text = Str(z) End Sub Sub p1(ByVal a As Integer, ByVal b As Integer, c As Integer) c = a + b End Sub 程序运行后,如果单击命令按钮,文本框中显示的是( B) A.0 B.12 C.Str(z) D.没有显示 17、在窗体中添加名称为Command1和名称为Command2的命令按钮测验文本框Text1,然后编写如下代码: Private Sub Command1_Click() Text1.Text = "AB" End Sub Private Sub Command2_Click() Text1.Text = "CD" End Sub 首先单击Command2按钮,然后再单击Command1按钮,在文本框中显示(A ) A.AB B.CD C.ABCD D.CDAB 18、可获得当前系统日期的函数是(A ) A、Date( ) B、Time( ) C、IsDate( ) D、Year( ) 19、X是小于100的非负数,用VB表达式表达正确的是(C ) A、0≤X≤100 B、0<=X<100 C、0<=X and X<100 D、0≤X<100 20、以下能够触发文本框Change事件的操作是 D A、文本框失去焦点 B、文本框获得焦点 C、设置文本框的焦点 D、改变文本框的内容 21、要使标签中显示的文本居中显示, 应设置Alignment 的值为:(C ) A、 0 B、 1 C、2 D、3 22、下面四项中不属于面向对象系统的三要素的是:(A) A、变量 B、事件 C、属性 D、方法 23、对象的性质,来描述和反映对象特征的参数是对象的( A) A、属性 B、方法 C、事件 D、过程 24、文本框没有(D )属性 A、Enabled B、Backcolor C、Visible D、Caption 25、下述选项中,属于VB的程序设计方法是 (B) A、面向对象、顺序驱动 B、面向对象、事件驱动 C、面向过程、事件驱动 D、面向过程、顺序驱动 26、用于获得字符串S从第2个字符开始的3个字符的函数是(A ) A.Mid$(S,2,3) B、Middle(S,2,3) C、Right$(S,2,3) D、Left$(S,2,3) 27、确定一个窗体或控件大小属性是(B ) A.Width或Height B.Width和Height C.Top或Left D.Top和Left 28、要使窗体的标题为"演示实例",应修改窗体的(A )属性. A.Caption B.Tip C.Item D.Text 29、下面语句中错误的是(B ) A. Redim Preserve Matrix(10,Ubound(Matrix,2)+1) B. Redim Preserve Matrix(Ubound(Matrix,1)+1,10) C. Redim Preserve DynArray(Ubound(DynArray)+1) D. Redim DynArray(Ubound(DynArray)+1) 30、在MsgBox函数中哪一个参数是必须的(A ) A.prompt B.buttons C.title D.context 31、在窗体中添加两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(Name属性为Command1),然后编写如下两个事件过程: Private Sub Command1_Click() a = UCase$(Text1.Text) + Left$(Text2.Text,2) Print a End Sub Private Sub Form_Load() Text1.Text = "aB" Text2.Text = "123456" End Sub 程序运行后,单击命令按钮,输出结果为(B ) A.ab12 B.AB12 C.AB56 D.ab56 32、下列关于属性设置的叙述正确的是( D) A. 所有的对象都有同样的属性 B. 控件的属性只能在设计时修改,运行时无法改变 C. 控件的属性都有同样的默认值 D. 引用对象属性的格式为:对象名称 . 属性 33、在窗体中添加一个名称为Command1的命令按钮,然后编写如下程序: Function fun(x As Integer) Static z y = y + 1: z = z + 1 fun = x + y + z End Function Private Sub Command1_Click() Dim x As Integer x = 1 For i = 1 To 2 Print fun(x) Next i End Sub 程序运行后,如果单击命令按钮,窗体中显示的内容是(D ) A.3 3 B.3 4 C.3 D. 3 34、下列叙述中不正确的是( B) A. VB中的函数功能类似于Sub过程 B. Sub过程不可以递归 C. 子过程不返回与其特定子过程名相关联的值 D. 过程是没有返回值的函数,又常被称为Sub过程,在事件过程或其他子过程中可以按名称调用过程 35、退出For循环可使用的语句为( A ) A、Exit For B、Exit Do C、End For D、End Do 36、当一个命令按钮的Default属性设置为True时,按哪个键和单击该命令按钮作用相同.(D ) 37、当我们输入代码时,VB可以自动检测下面那个错误:(A ) A、语法错误 B、编译错误 C、运行错误 D、逻辑错误 38、下列哪个属性决定命令按钮是否能够接受用户的输入,即命令按钮是否可用:(C ) A、Caption B、Style C、Enabled D、Name 39、以下叙述中正确的是(A ) A、窗体的Name属性指定窗体的名称,用来标识一个窗体 B、窗体的Name属性的值是显示在窗体标题栏中的文本 C、可以在运行期间改变对象的Name属性的值 D、对象的Name属性值可以为空 40、以下选项中,不属于文本框的属性是( D ). A.Enabled B Caption C.Name D Min 41、假定窗体的名称为(Name属性)为form1,则把窗体的标题设置为"VBTEST"的语句正确的是(B ) A.form1="VBTEST" B.Caption="VBTEST" C.form1.test="VBTEST" D.form1.name="VBTEST" 42、清除列表框中的所有项目,应调用(C )方法. A. Cls B. RemoveAt C. Clear D. Remove 43、VB项目文件即工程文件的扩展名是:(A ) A、VBP B、FRM C、VBW D、FRX 44、若窗体上有一个文本框txt_Show,如果想要在程序运行后,在文本框中便会出现"Hello!"字样,应在 ( A)事件过程中写如下代码:txt_Show.Text="hello! A 、Form_Load B、Command1_Click C 、Form_Click D、Form_Dbclick 45、下面哪个窗口用来浏览和设置窗体和控件的属性:(D ) A、窗体窗口 B、工程资源管理器 C、工具箱 D、属性窗口 46、下面说法正确的是:(B ) A、窗体文件的扩展名.vbp B、一个窗体对应一个窗体文件 C、VB中一个工程只包含一个窗体 D、VB中一个工程最多可以包含256个窗体 47、以下说法错误的是: ( D ) A、方法是对象的一部分 B、方法是一种特殊的过程和函数 C、方法的调用方式是 对象名称.方法名称 D、在调用方法时,对象名时不可缺少的 48、在代码编辑器中,若一条语句过长,可以用什么续行符来换行书写语句:(B ) A、一个下划线"B、一个空格加一个下划线"_" C、一个连字符"D、一个空格加一个连字符"-" 49、下列选项中,更改哪个属性,可以对窗体的标题内容进行修改:(D ) A、Text B、Name C、Font D、Caption 50、在VB集成环境中创建应用程序时,除了工具箱、窗体窗口、属性窗口外,必不可少的窗口是:(C A、窗体布局窗口 B、立即窗口 C、代码窗口 D、监视窗口 51、VB预先设置好的,能够被对象识别的动作是 (C ) A、属性 B、方法 C、事件 D、过程 52、为了使标签框的大小根据里面显示的内容的长度进行扩展或缩小,应对(C )属性进行设置 A、Alignment B、Backstyle C、Autosize D、Backcolor 53、当一个命令按钮的Cancel属性设置为True时,按哪个键和单击该命令按钮作用相同.(C ) A、Ctrl B、Tab C、Esc D、回车 54、要改变新建对象的名称,应使用属性: ( C ) A、Font B、ForeColor C、Name D、Height 55、VB的工程资源管理器可管理多种类型的文件,下面叙述不正确的是(C ) A. 窗体文件的扩展名为.frm,每个窗体对应一个窗体文件 B. 标准模块是一个纯代码性质的文件,它不属于任何一个窗体 C. 用户通过类模块来定义自已的类,每个类都用一个文件来保存,其扩展名为.bas D. 资源文件是一种纯文本文件,可以用简单的文字编辑器来编辑 56、在窗体中添加一个命令按钮,名称为Command1,两个文本框名称分别为Text1、Text2,然后编写如下程序: Private Sub Command1_Click( ) a=Text1.text b=Text2.text C=Lcase(a) D=Ucase(b) PrintC;D End Sub 程序运行后,在文本框Text1、Text2中分别输入AbC和Efg,结果是(A) A.abcEFG B.abcefg C.ABCefg D.ABCEFG 57、以下关于窗体描述正确的是(B ) A. 只有用于启动的窗体可以有菜单 B. 窗体事件和其中所有控件事件的代码都放在窗体文件中 C. 窗体的名字和存盘的窗体文件名必须相同 D. 开始运行时窗体的位置只能是设计阶段时显示的位置 58、有关列表框的属性和方法的正确描述是( D) A. 列表框的内容由属性Item Data来确定 B. 当多选属性(MultiSelect)为True时,可通过Text属性获得所有内容 C. 选中的内容应通过List属性来访问 D. 选中的内容应通过Text属性来访问,并且每次只能获得一条内容 59、如果变量a、b、c均为整型,下列程序段的输出结果为(C ) a=2 b=3 c=a*b Print a & "*" & b & "="& c A.c=6 B.a*b=c C.2*3=6 D.a*b=6 60、在窗体中添加一个名称为Command1的命令按钮,然后编写如下程序: Private Sub Command1_Click() Print Tab(1); "第一", Print Tab(6); "第二"; End Sub 程序运行后,如果单击命令按钮,在窗体上显示的内容是(表示空格)(C ) A.第一第二 B.第一第二 C.第一第二 D.第一第二 61、如果希望一个窗体在显示的时候没有边框,应该设置的属性是(C ) A. 将窗体的标题(Caption)设成空字符 B. 将窗体的Enabled属性置成False C. 将窗体的BorderStyle属性置成None D. 将窗体的ContalBox置成False 62、设有如下程序: Option Base 1 Private Sub Form_Click() Dim a(10), P(3) As Integer k = 5 For i = 1 To 10 a(i) = i Next i For i = 1 To 3 P(i) = a(i * i) Next i For i = 1 To 3 k = k + P(i) * 2 Next i Print k End Sub 程序运行后,单击窗体,则在窗体上显示的是(A ) A.33 B.35 C.37 D.38 63、以下不属于键盘事件的是( C ) A、KeyDown B、KeyUp C、Unload D、KeyPress 64、当用户在窗体上单击鼠标时,不会触发的事件是(D ) A、Click B、MouseDown C、MouseUp D、DblClick 65、下列逻辑表达式中,能正确表示条件"x,y都是奇数"的是(C ) A.x Mod 2 =1 Or y Mod 2 =1 B.x Mod 2 =0 Or y Mod 2=0 C.x Mod 2 =1 And y Mod 2 =1 D.x Mod 2 =0 And y Mod 2=0 66、在窗体中添加两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(其Name属性为Command1),然后编写如下事件过程: Private Sub Command1_Click() x = 0 Do While x < 10 x = (x - 2) * (x + 3) n = n + 1 Loop Text1.Text = Str(n) Text2.Text = Str(x) End Sub 67、程序运行后,单击命令按钮,在两个文本框中显示的值分别为(B ) A.1和0 B.2和24 C.3和50 D.4和68 68、在窗体上添加标签Label1后,标签控件默认的名称Name为:( A ) A、Label1 B、Label C、Text D、Text1 69、在Visual Basic中,建立一个文本编辑区域,可采用下列哪个控件:(C ) A、命令按钮 B、标签控件 C、文本框控件 D、定时器控件 70、在VB中的每个对象都具有自己的属性、(C )和方法. A、控件 B、函数 C、事件 D、公用过程 71、将文本框的Multiline属性设为False, 则文本框中只能输入: ( C) A、一个字符 B、两个字符 C、单行文本 D、多行文本 72、下列关于属性设置的叙述错误的是 (A ) A、一个控件具有什么属性是Visual Basic预先设计好的,用户不能改变其属性值 B、一个控件具有什么属性是Visual Basic预先设计好的,但用户可以改变其属性值 C、一个控件的属性既可以在属性窗口中设置,也可以用程序代码设置 D、一个控件的属性在属性窗口中设置,还可以利用程序代码为其设置新值 73、关于复选框和单选钮的比较中正确的是(D ) A. 复选框和单选钮都只能在多个选择项中选定一项 B. 复选框和单选钮的值(value)都是(True/False) C. 单选钮和复选框都响应DblClick事件 D. 要使复选框不可用,可设置Enabled属性(False)和value属性(Grayed) 74、在窗体中添加一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后编写如下程序: Private Sub Command1_Click() Dim x, y, z As Integer x = 10 y = 5 z = 23 Text1.Text = "" Call p1(x, y, z) Text1.Text = Str(z) End Sub Sub p1(ByVal a As Integer, ByVal b As Integer, c As Integer) c = a + b End Sub 75、程序运行后,如果单击命令按钮,则文本框中显示的内容是(B ) A.0 B.15 C.Str(z) D.23 76、VB中可用(D )语句产生一消息框. A、InputBox B、Shift C、Both D、MsgBox 77、在设计阶段,当双击窗体上的某个控件时,所打开的窗口是C A、工程资源管理器窗口 B、工具箱窗口 C、代码窗口 D、属性窗口 78、执行以下语句后,输出的结果是(B ) s$ = "ABCDEFGHIJK" Print Mid$(s$, 3, 4); prin Len(s$) A.ABCD 11 B.CDEF 11 C.EFGH 11 D.HIJK 11 79、在窗体中添加一个命令按钮(其Name属性为Command1),然后编写如下代码: Private Sub Command1_Click() Dim a(10) As Integer Dim p(3) As Integer k = 1 For I = 1 To 10 a(I) = I Next I For I = 1 To 3 p(I) = a(I * 1) Next I For I = 1 To 3 k = k + p(I) * 2 Next I Print k End Sub 80、程序运行后,单击命令按钮,输出结果是(B ) A.15 B.13 C.30 D.37 81、当复选框被选中时,复选框Value属性的值是:(B ) A、0 B、1 C、2 D、3 82、在Visual Basic中,欲显示静态的文本,可采用下列哪个控件:(B ) A、命令按钮 B、标签控件 C、文本框 D、定时器控件 83、当运行程序时,系统自动执行启动窗体的( A )事件过程. A、Load B、 Click C、Unload D、Minbutton 84、将光标移动指定的文本框的方法是:( C A、Change B、GotFocus C、SetFocus D、LostFocus 85、在一个语句行内写多条语句时,语句之间应该用(D )分隔 A、逗号 B、顿号 C、分号 D、冒号 86、在Passwordchar中设置*,但运行后仍显示文本内容,原因是:(B) A、文本框的Multiline属性值为False B、文本框的Multiline属性值为True C、文本框的Locked属性值为False D、文本框的Locked属性值为True 87、以下各项中,可以作为VB的变量名的是:( A A、English B、11_English C、123.45 D、English-1 88、用X,Y,Z表示三角形三条边, 条件:三角形任意两边之和大于第三边的逻辑表达式是:( A) A、X+ Y>Z And X+Z>Y And Y+Z>X B、X+Y=Z Or X+Z<=Y Or Y+Z>=X 89、如果要在文本框中设置密码, 应设置的属性是:( D) A、Caption B、Text C、Name D、Password 90、下列说法不正确的是:(B) A、变量名的长度不能超过255个字符 B、变量名可以包含小数点或者内嵌的类型声明字符 C、变量名不能使用关键字 D、变量马的第一个字符必须是字母或汉字. 91、下面哪个属性决定文本框控件是否能够接受多行显示文本:(C ) A、Caption B、Text C 、Multiline D、Alignment 92、确定控件尺寸的属性是: ( A ) A、Width和Height B、Top和Left C、Width或Height D、Top或Left 93、针对下列程序代码,说法正确的是: (A ) Text1.Top=2000 Text1.Left=800 A 、Text1对象左边界距离窗体左边界800twip,上边界距离窗体上边界2000twip B、 Text1对象左边界距离屏幕左边界800twip,上边界距离屏幕上边界2000twip C、Text1对象的高度是800twip,宽度是2000twip D 、Text1对象的高度是800点,宽度是2000点94、要使标签中显示的文本靠左显示, 应设置Alignment 的值为:(A ) A、 0 B、 1 C、2 D、3 7、为了使标签能个显示所指定的文本, 应设置哪个属性:(A ) A、Caption B、Text C、Seltext D、Name 95、打开代码窗口的快捷键是(B A、F4 B、F7 C、F2 D、Shift+F7 96、设置标签边框样式的属性是 ( B A、Backstyle B、Borderstyle C、Autosize D、Alignment 97、如果窗体上有命令按钮"确定",在代码编辑窗口有与之相对应的OK_Click()事件过程,则命令按钮控件的名称属性和Caption属性分别为: (A ) A、"OK"和"确定 B、"确定"和"OK" C、"Command1"和"确定"D、"Command1"和"OK" 98、表达式Y+1 >X是一个:(B ) A、字符串表达式 B、关系表达式 C、算术表达式 D、不合法的表达式 99、在设计应用程序时,哪个窗口可以查看到工程中包含的所有文件:( D ) A、代码窗口 B、窗体设计窗口 C、属性窗口 D、工程资源管理器窗口 100、文本框中所显示的内容用下列哪个属性设置:( B ) A、Caption B、Text C 、Font D、Picture 11、4、下面对哪一种变量的类型说明符的使用是正确的(D ) A、Dim a:a@=2000 B、Dim a:a%=50000 C、Dim a:a&=True D、Dim a:a$="OK" 101、某个菜单的名称是Menucase,在程序中要使菜单不可见,使用的语句是:(B ) A、Menucase.Enabled=False B、Menucase.Visible=False C、Menucase.Visible=True D、Menucase.Enabled=True 103、在VB的基本数据类型中,通用类型(Variant)可以表示任何类型的变量,如果有定义Dim a,则以下变量赋值中正确的是(D ) A.a="OK" B.A$=OK C.a=04/01/2001 D.a$="OK" 104、在VB中,按下鼠标键触发事件,正确的程序段是(A ) A.Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) …… End Sub B.Private Sub Form_MouseUP(Button As Integer, Shift As Integer, X As Single, Y As Single) …… End Sub C.Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) …… End Sub D.Private Sub Form_Load() …… End Sub 105、要使Esc键可以代替命令按钮的单击事件,可以通过将命令按钮的哪个属性设为True实现:(C) A、Default B、Enabled C、Cancel D、 Caption 106、当一个工程含有多个窗体时,其中的启动窗体是( D A、启动 Visual Basic.net 时建立的窗体 B、第一个添加的窗体 C、最后一个添加的窗体 D、在"工程/工程属性"对话框中指定的启动窗体 107、能显示窗体的方法是(B ). A、Visible B、Show C、New D、Open 108、下列关于do while …loop 和do…loop until循环执行循环体次数的描述正确的是( D) A. do while …loop循环和do…loop until循环至少都执行一次 B. do while …loop循环和do…loop until循环可能都不执行 C. do while …loop循环至少执行一次,do…loop until循环可能不执行 D. do while …loop循环可能不执行,do…loop until循环至少执行一次 109、设有如下程序: Private Sub Form_Click() a = 1 For i = 1 To 3 Select Case i Case 1, 3 a = a + 1 Case 2, 4 a = a + 2 End Select Next i Print a End Sub 程序运行后,单击窗体,则在窗体上显示的内容是(A ) A.6 B.5 C.4 D.3 110、在过程定义中,Private表示(D ) A. 此过程要以被其他过程调用 B. 此过程不可以被任何其他过程调用 C. 此过程只可以被本工程中的其他过程调用 D. 此过程只可以被本窗体模块中的其他过程调用 111、用于从字符串左边截取字符的函数是(C ) A、Ltrim( ) B、Trim( ) C、Left( ) D、Instr( ) 112、下列符号中哪个是VB程序中合法的变量名(A ) A、ab7 B、7ab C、If D、a*bc 113、要改变控件的宽度,应改变控件的哪个属性: (A ) A、Width B、Height C、Top D、Left 114、用于显示窗体的方法是:(B) A、Hide B、Show C、Unload C、Load 115、.当把框架的哪个属性设为False时,其标题变灰,框架内所有的控件都不可用:(C ) 116、产生[10,37]之间的随机整数的Visual Basic表达式是 (B ) A、Int(Rnd()*27)+10 B、Int(Rnd()*28)+10 C、Int(Rnd()*27)+11 D、Int(Rnd()*28)+11 117、下列可以将变量A和B互换的语句是:( A) A、C=B B=A A=C B、A=B B=A C、A=(A+B)/2 B=(A-B)/2 D、A=A+B B=A-B 118、在VB中,认为下面哪两个变量名是相同的:(B ) A、English 和Engl_ish B、English和ENGLISH C、English 和Engl D、English 和England 119、以下关于运算符的说法,错误的是:(A ) A、表达式中的乘号*不能省略,但可以用符号·代替 B、通常不允许两个运算符相连,两个运算符应当用括号隔开 C、括号可以改变运算符的运算顺序 D、在表达式中只能用圆括号,不能使用方括号. 120、设a="Visual Basic",下面使b="Visual"的语句是 D A、b=Left(a,8,12) B、b=Mid(a,8,5) C、b=Rigth(a,6) D、b=Left(a,6) 121、设置复选框或单选按钮标题对齐方式的属性是( B) A.Align B.Alignment C.Sorted D.value 122、在VB.NET中,用(B )属性标识不同的对象. A. Text B. Name C. Index D. Title 123、将文本框的Multiline属性设置为False ,则文本框中只能输入:(C ) CA、一个字符 B、两个字符 C、单行文本 D、多行文本 124、在VB中,Integer 类型数的表示范围是:( A) A、-32768--32767 B、-32768--32768 C、-2147483648--2147483647 D、-2147483648--2147483648 125、根据变量的作用范围,可以将变量分为3 类,它们是:(A ) A、过程变量、模块变量、全局变量 B、过程变量、模块变量、标准变量 C、过程变量、模块变量、窗体变量 D、过程变量、标准变量、全局变量 126、表达式Left("This is a book",3)的值是:( C) A、 a B、is a book C、Thi D、ook 127、要使文本框中的内容写满一行后自动换行,,应将文本框的哪个属性设为TRUE (A ) A、Multiline B、Text C 、Scrollbars D、 Caption 128、以下说法正确的是( A) A、对象是又特殊属性和行为方法的实体 B、属性是对象的特性,所有的对象都有相同的属性 C、属性的一般格式为:对象名_属性名 D、属性值的设置只可以在属性窗口中设置 129、一个新建的窗体,运行后发现屏幕上没有显示,任务栏上也无最小化图标,可能原因是:( B) A、该窗体的Enabled属性为False B、该窗体的Visible属性为False C.该窗体的WindowsState属性为Minisized D、该窗体为多窗体的一个 A、Ctrl B、Tab C、Esc D、回车 130、要改变控件的高度,应改变控件的哪个属性: ( B) A、Width B、Height C、Top D、Left 131、用于隐藏窗体的方法是:(A ) A、Hide B、Show C、Unload C、Load 132、对于一个含有计时器控件的窗体, 每经过一段由(D )属性指定的时间间隔, 就会产生一个Timer事件: A、Name B、Enabled C、Caption D、Interval 133、窗体能够响应的事件是(C A、ActiveForm B、Drive C、Load D、Change 134、以下各项中,不是字符串常量的是:( D) A、" Visual" B、"等级考试" C、D、//Basic// 135、有变量定义语句:Dim max,min as Single,可知变量max的类型是:(B ) A、可变类型 B、单精度型 C、双精度型 D、字符串型 136、Int(100*Rnd)产生随机数的闭区间是:(C ) A、[1,100] B、[0,100] C、[0,99] D、[1,99] 三编程 1、求100以内偶数的和,并将结果输出在窗体上.将结果存入变量SUM中 代码:Dim i As Integer For i =1 To 100 If i Mod 2 =0 Then Sum=sum+i End If Next Print sum 2、编写程序求10*11*12+11*12*13+….+15*16*17的结果,并将结果输出到窗体上.将结果存入变量M中. 代码:Dim m As Long For i = 1 To 6 t =(i+9)*(i+10)*(i+11) m=m+t Next Print m 3、求出100~200之间,能被5整除,但不能被3整除的数,并求出所有数之和,存入变量SUM中 代码:Dim sum As Integer sum=0 For i = 100 To 200 If i Mod 5 = 0 And i Mod 3<> 0 Then sum = sum +i End If Next Print sum 4、求100以内偶数的和,并将结果输出在窗体上.将结果存入变量SUM中 代码:Dim i As Integer For i =1 To 100 If i Mod 2 =0 Then Sum=sum+i End If Next Print sum 5、求1—1/2+1/3—1/4+….+1/99—1/100的值.将结果存入变量J中 代码:Dim j As Single Dim i As Single j=0 For i = 1 To 100 k=(-1)^(i+1)/i j=k+j Next i Print j 6、求50以内所有偶数的和,并在窗体上输出来. 代码:Dim s As Integer s = 0 For i = 2 To 50 Step 2 s = s + i Next i Print s 7、求3+6+9+12+15+18+…..+300的和,并将结果输出到窗体上.将结果存入变量SUM中 代码:Dim sum As Integer sum = 0 For i = 3 To 300 Step 3 sum= sum +i Next i Print sum 8、求s=1+1*2+1*2*3+….+1*2*3*….*10并将结果存入变量S中. 代码:Dim i,j As Integer Dim k As Long k=1 s=0 For i =1To 10 For j=1 To i k=k*j Next s=s+k k=1 Next Print(CStr(s)) 9、求1+1*2+1*2*3+….+1*2*3*….*10,并将结果存到变量S中. 代码:Dim s As Long j=1 For i = 1 To 10 j= j*i Sum = Sum + j Next Print Sum 10、编写程序求10*11*12+11*12*13+….+15*16*17的结果,并将结果输出到窗体上.将结果存入变量M中. 代码:Dim m As Long For i = 1 To 6 t =(i+9)*(i+10)*(i+11) m=m+t Next Print m 11、求1—1/2+1/3—1/4+….+1/99—1/100的值.将结果存入变量J中 代码:Dim j As Single Dim i As Single j=0 For i = 1 To 100 k=(-1)^(i+1)/i j=k+j Next i Print j 12、求50以内所有偶数的和,并在窗体上输出来. 代码:Dim s As Integer s = 0 For i = 2 To 50 Step 2 s = s + i Next i Print s4、求出100~200之间,能被5整除,但不能被3整除的数,并求出所有数之和,存入变量SUM中 代码:Dim sum As Integer sum=0 For i = 100 To 200 If i Mod 5 = 0 And i Mod 3<> 0 Then sum = sum +i End If Next Print sum 13、求出100以内所有素数的和,并将结果输出到窗体上,并存入所给变量SUM中 代码:Dim i As Integer Dim j As Integer Dim k As Integer Dim b As Boolean b = False For i = 2 To 100 b = False j = CInt(Sqr(i)) For k = 2 To j If i Mod k = 0 Then b=True End If Next If b = False Then sum=sum+i End If Next Print sum 14、求50以内所有偶数的和,并在窗体上输出来.将结果存入变量S中. 代码:Dim I As Integer For i = 2 To 50 If (i Mod 2)=0 Then S=s+i End If Next Print (CStr(s)) 15、已知S=1+1/4+1/9+1/16+1/25+…+1/100,结果输出在窗体上 代码:Dim s As Single For i=1 To 10 a=i*i Sum =1/a + Sum Next Print Sum 16、求3+6+9+12+15+18+…..+300的和,并将结果输出到窗体上.将结果存入变量SUM中 代码:Dim sum As Integer sum = 0 For i = 3 To 300 Step 3 sum= sum +i Next i Print sum