vb复习题1及答案

vb复习题1及答案（精选6篇）

vb复习题1及答案 第1篇

vb练习题1

VB练习题一

一、选择题

1．Visual Basic程序设计的主要的步骤是C A、可视性程序设计 B、代码程序设计 C、可视性程序设计和代码程序设计 D、界面设计 2．窗体能响应的事件是C

A、ActiveFrom

B、Drive

C、Load

D、Change 3．获得系统时间的函数是B

A、data$

B.time$

C.date$

D.gettime$ 4．在设计一个计算器时，必须要使用的控件是C A、滚动条

B、图片框

C、文本框

D、单选框 5．下列运算符号中属于关系运算符的是_____。B A、— B、= C、AND D、+ 6.Visual Basic规定工程文件的扩展名是C

A、.for

B、.frm

C、.vbp

D、.bas 7.OOP是面向_______的程序设计的简称。C A、用户 B、问题 C、对象 D、操作者 8.设置对象中的字体应用___属性.C A、Caption B、Name C、Font D、Text 9.设置文本框中显示的内容应用___属性。D A、Caption B、Name C、Font D、Text 10.逻辑型又称_____。C A、数值型 B、字符串型 C、布尔型 D、整型 11.三种逻辑运算符号优先次序为：____。C A、AND、NOT、OR B、NOT、OR、AND C、NOT、AND、OR D、OR、NOT、AND 12.关于高级语言，下列那一项叙述是正确的。(A)A、以类似英文的句子来表示 B、写成的程序执行速度最快  C、不必编译即可直接执行 D、受电脑机种限制大 13.可将高级语言翻译成机器语言的程序为。B A、汇编程序 B、编译程序 C、解释程序

4、以上皆可。14.下列（）属性是每个控件都有的。A A、名称 B、Caption C、Font D、Interval 15.下列运算符号中属于逻辑运算符的是_____。A A、NOT B、<> C、= D、<= 16.如果要求设置定时器时间间隔为0.5秒钟，那么它的Interval属性值应该等于：B A、5000 B、500 C、50 D、5 17.下列逻辑运算结果为―true‖的是（）C A、flase or not true B、flase and not true C、true or not true D、true and not true 18.已知变量x、y为整数型，且x=4 , y=12 ,s为字符串型，且s=―a‖，Label1为标签控件，下列赋值语句合法的是（）A A、s = Label1.Caption B、Label1.Caption=s=x C、x*3=y D、Y=x*s 19.下列关于CommandButton 控件的叙述正确的是（）A A、CommandButton 控件的Caption 属性决定按钮上显示的内容 B、单击VB应用程序中的按钮,则系统激活按钮控件对应的Change 事件 C、CommandButton 控件的name 属性决定按钮上显示的内容 D、以上都不对

20.一只漂亮的酒杯被摔碎了，则漂亮，酒杯，摔，碎了是()。D A、对象，属性，事件，方法 B、对象，属性，方法，事件 C、属性，对象，方法，事件 D、属性，对象，事件，方法 21.获得系统时间的函数是B A、data$

B、time$

C、date$

D、gettime$ 22.下列关于添加―控件‖的方法正确的是（）B A、单击控件图标，将指针移到窗体上，双击鼠标 B、双击工具箱中的控件，即在窗体上出现该控件 C、单击工具箱中的控件，将指针移到窗体上，再单击 D、用鼠标左键拖动工具箱中的某控件到窗体的适当位置 23.双击窗体中的对象后，Visual Basic将显示的窗口是C A、项目（工程）窗口

B、工具箱

C、代码窗口

D、属性窗口 24.下列关于For …next 语句的说法正确的是（）A A、循环变量、初值、终值和步长都必须为数值型 B、step后的步长只为正数 C、初值必须小于终值 D、初值必须大于终值

25.存文件时，整个工程以_____（工程文件）储存。C A、*．Prg B、*．Frm C、*．Vbp D、*．Exe 26.清除图片框(Picture1)中内容的方法是_____。B A、Picture1．Clear B、Picture1．Cls C、Picture1．Delete D、Picture1．UnLoad 27.以下变量Test定义语句正确的是：B A、Dim Test，as Integer B、Dim Test as Integer C、Dim Test =Integer D、Dim Test as Integer，28.在Visual Basic中，字符型变量用来_____。B A、存放日期、时间或同时存储以上两种数据。

B、存放人名、地址等文字信息。或电话号码、邮政编码等不需要计算的数字信息。C、存储长文本信息，最多可包含1.2GB字符。D、精确表示货币钱款数值

29.通过执行通用对话框的方法，可以将其表示为不同的对话框。方法ShowColor , 显示____对话框。D A、保存文件 B、字体 C、打开文件 D、颜色

30.设置通用对话框的文件类型框中所要显示的文件类型选项，可由____属性来设置。C A、Name B、File C、Filter D、Caption 31.VB 的全名是：C A、Violin BASIC B、Very BASIC C、Visual BASIC D、View BASIC 32.下列哪一种运算的优先级最低：C A、Mod B、整数除法 C、减法 D、除法 33.设置窗体的高度用属性_______。D A、Caption B、Font C、BackColor D、Hight 34.设置窗体左上角到屏幕上方距离的属性是______。B A、Left B、Top C、Width D、Name 35.设置窗体宽度的属性是______。C A、Left B、Top C、Width D、名称(Name)36.计算数x的正弦函数值的函数是______。A A、SIN(x)B、ABS(x)C、STR(x)D、SQR(x)37.数学式3abc(d+e)改写为VB表达式为______。D A、3a*b*c(d+e)B、3abc(d+e)C、3abcd +3abce D、3*a*b*c*(d+e)38.不属于程序的三种基本结构的是。C A、顺序结构 B、循环结构 C、直线型结构 D、分支结构 39.在IF语句的条件中，M≠6应写成： C A、M<6 AND M>6 B、M≠6 C、M<>6 D、NOT M<>6 40.在VB中数据类型为长整型的―数据类型保留字‖是。B A、integer B、long C、single D、string 41.在VB中数据类型为字符串型的―数据类型保留字‖是。D A、integer B、double C、single D、string 42.下列变量名正确的是。B A、X-1 B、XX1 C、123 D、A* 43.函数ABS(X)称为。B A、算术平方根函数 B、绝对值函数

C、正弦三角函数 D、字符串转换为数值函数 44.下列说法不正确的是。A A、1

B、关系表达式的判断结果只能是“True”或“False” C、关系运算符共有6个,分别是：<、>、<=、>=、=、<> D、逻辑运算符有NOT、AND、OR 45.为了暂时关闭计时器，应把该计时器的某个属性设置为False，这个属性是C A、Visible B、Timer C、Enabled D、Interval 46.利用对象的方法Setfocus可获得焦点，对于一个对象,只有其visible属性和_____属性为true，才能接受焦点。C A、name B、Timer C、Enabled D、visible 47.使用print方法可在图片框中进行文本的输出(如：picture1.print ―信息技术‖)，用_____方法可画圆。C A、pset B、line C、circle D、move 48.设a=2,b=3,c=4,d=5,下列表达式的值是。C 3>2*b OR a=c AND b <>c OR c>d A、1 B、True C、False D、–1 49．设置标签中显示内容的属性是。C A、Text B、Name C、Caption D、BackStyle 50．通过执行通用对话框的方法，可以将其表示为不同的对话框。显示打开文件对话框方法是。A A．ShowOpen B．ShowSave C．ShowPrinter D．ShowColor

vb练习题2

二、程序设计题

51．设计一个程序，输入一个正整数N，求1＋2＋3＋…+N的和。界面如下：

当用户输入N后，单击―计算‖按钮，则输出1＋2＋3＋…+N的和。参考答案：

Private Sub Command1_Click()Dim i, a, b As Integer a = Val(Text1.Text)For i = 1 To a b = b + i Next i Label3.Caption = b End Sub

Private Sub Command2_Click()End End Sub 52．编一个求圆柱的侧面积的程序：

当用户输入半径与高后，单击―侧面积为‖按钮，输出正确结果。参考答案：

Private Sub Command1_Click()Dim r, h, c, s As Single r = Val(Text1.Text)h = Val(Text2.Text)c = 2 * 3.14159 * r s = c * h Label3.Caption = s End Sub 53．设计一个计时程序。该程序用户界面如图所示，由一个文本框（text1），和两个按钮：命令按钮1（command l）、命令按钮2（command 2）组成。程序运行后，用户按开始按钮，则开始计时，文本框中显示秒数，接停止按钮，则计时停止。单击窗口则退出。（请阅读下面程序，编写出时钟控件的计时事件中的程序代码。）Dim i, t As Integer Private Sub Command1_Click()Timer1.Interval = 1000 Timer1.Enabled = True t = 0 End Sub Private Sub Command2_Click()Timer1.Enabled = False End Sub Private Sub Form_Click()End End Sub Private Sub Timer1_Timer()End Sub 参考答案： t = t + 1 Text1.Text = t & “秒” 54．编制一个能在窗体中画出由用户指定圆心位置和半径大小的圆的程序,要求单击―绘圆‖按钮时绘圆，单击―清除‖按钮时清除绘图区中的图形及文本框中的内容。运行界面如下：

参考答案：

Private Sub Command1_Click()Dim x, y, r As Single x = Val(Text1.Text)y = Val(Text2.Text)r = Val(Text3.Text)Picture1.Circle(x, y), r End Sub Private Sub Command2_Click()Picture1.Cls Text1.Text = “" Text2.Text = ”“ Text3.Text = ”“ End Sub

信息技术教师培训自学部分VB练习题二

一、选择题

1．在 Visual Basic环境下，当写一个新的 Visual Basic程序时，所做的第一件事是B A、编写代码

B、新建一个工程

C、打开属性窗口

D、进入VB环境

2．若要求从文本框中输入密码时在文本框中只显示*号，则应当在此文本框的属性窗口中设置D A、Text属性值为* B、Caption属性值为* C、password属性值为空

D、Passwordchar属性值为* 3．能够将文本框控件隐藏起来的属性是B A、Clear B、Visible C、Hide D、New 4．获得系统日期的函数是C A、data$

B、time$

C、date$

D、gettime$ 5．下列运算符号中属于算术运算符的是_____。B A、NOT B、^ C、= D、<= 6．Visual Basic属于:A A、高级语言B、汇编语言C、机器语言D、低级语言。7．一个程序可以有_____窗体。C A、1个 B、2个 C、多个D、无穷多个 8．事件是指_____。B A、对象的外部特征。

B、预先设置好的能被对象识别的特定动作。C、对象的属性。

D、对象原来就包含的内部函数或程序。9．VB在运行中使用_______来临时存储数据。B A、常量 B、变量 C、函数 D、方法 10．布尔型又称_____。B A、数值型 B、逻辑型 C、字符串型 D、整型 11．下列运算符号中属于关系运算符的是_____。D A、— B、+ C、AND D、<= 12．关于高级语言，下列叙述正确的是。B A、不必编译即可执行 B、可读性最高 C、难学难记 D、执行速度最快。13．下列各组控件都具有Caption属性的是（）C A、窗体、文本框 B、标签、定时器 C、窗体、标签 D、文本框、定时器 14．下列运算结果中，值最大的是（）D A、34 B、3/4 C、4 mod 3 D、3 mod 4 15．Visual Basic语言中，下列那一项数值运算符号是正确的。(C)A、＠表示加 B、～表示减 C、*表示乘 D、÷表示除。16．下面程序执行的结果是________。C Private Sub Form_Click()A$ = ”123“: B$ = ”456“ C = Val(A$)+ Val(B$)Print C 100 End Sub A、123 B、3 C、5 D、579 17．函数Sqr(9)的值是（）B A、9 B、3 C、―3‖ D、―9‖

18．下列控件中可用于接受用户输入文本，又可用于显示文本的是（）B A、Label 控件 B、TextBox 控件 C、Timer 控件 D、CommandButton 控件 19．以下程序段执行后整型变量度n 的值为（）B n=0 for L=1 to 20 step 5 n=n+L next L A、50 B、34 C、15 D、210 20．如果要改变窗体的标题,需要设置窗体对象的_____属性。B A、Name B、Caption C、BackColor D、BorderStyle 21．Visual Basic提供的标签控件（LABEL）可具有功能是B A、输入文本 B、显示文本 C、计时 D、取得时间 22．以下选项中，不是 Visual Basic控件的是C A、文本框

B、定时器

C、窗体

D、命令按钮

23．若整型变量a的值为

2、b的值为3，则下列程序段执行后整型变量c的值为（）D if a>5 then c=b-a else c=a + b endif A、2 B、-1 C、1 D、5 24.下列程序执行后，整型变量n的值为（）B n=0 for I=1 to 20 if I mod 4=0 then n=n+1 next I A、5050 B、5 C、6 D、33 25.下面哪些控件是输入控件______。A A、文本框 B、标签 C、列表框 D、滚动条

26．窗体初始化程序应写在_______事件中。A A、Load B、UnLoad C、Active D、GotFocus 27．在Visual Basic中，布尔型变量用来_____。D A、存放需要计算的数字。

B、存放日期、时间或同时存储以上两种数据。C、存储长文本信息，最多可包含1.2GB字符。D、存放性别、婚否等逻辑信息。

28． 通过执行通用对话框的方法，可以将其表示为不同的对话框。方法ShowOpen , 显示____对话框。C A、保存文件 B、字体 C、打开文件 D、颜色

29． 通过执行通用对话框的方法，可以将其表示为不同的对话框。方法ShowFont , 显示____对话框。B A、保存文件 B、字体 C、打开文件 D、颜色

30．计时器的Interval属性是用来设置一时间间隔，单位是_____。D A、1秒 B、1毫秒 C、1/100秒 D、1/1000秒

31.VB 在计算三角函数时，所使用的度量单位是：B A、角度制 B、弧度制 C、角度制 D、弧度制都可以 32.设置窗体的背景色用属性_______。C A、Caption B、Font C、BackColor D、Hight 33.设置窗体中显示的文字前景色用属性_______。A A、ForColor B、Font C、BackColor D、Hight 34．设置窗体左上角到屏幕左边距离的属性是______。A A、Left B、Top C、Width D、Name 35．计算数x的算术平方根的函数是___。D A、SIN(x)B、ABS(x)C、STR(x)D、SQR(x)36．计算数x的余弦函数值的函数是______。D A、SIN(x)B、ABS(x)C、STR(x)D、COS(x)37．数学式|xy|+2(d+e)改写为VB表达式为______。C A、|xy|+2(d+e)B、-x*y+2*(d+e)C、ABS(x*y)+2*(d+e)D、|x*y|+2*(d+e)38．在IF语句的条件中，60≤F≤100应写成：D A、60<=F<=100 B、60==60 AND F<=100 39． 写成QBasic算术表达式为：B A、B、SQR（X）+ABS（Y+3）C、D、40．在VB中数据类型为单精度浮点型的―数据类型保留字‖是。C A、integer B、long C、single D、string 41．在VB中数据类型为布尔型的―数据类型保留字‖是。A A、boolean B、double C、single D、string 42．下列变量名正确的是。C A、xx-4 B、4XX C、xx_y1 D、y/t 43．函数SIN(X)称为。C A、算术平方根函数 B、绝对值函数

C、正弦三角函数 D、字符串转换为数值函数 44．下列说法不正确的是。B A、FOR语句中可省略STEP及步长值,默认步长值为1 B、循环变量只能用数值简单变量 C、步长值可正可负

D、初值、终值、步长值可以是数值表达式

45．为了在运行时把图形文件picfile.jpg装入图片框Picture1,所使用的语句为。A A、Picture1.Picture = LoadPicture(”picfile.jpg“)B、Picture1.Picture =”picfile.jpg“ C、Picture1.image = LoadPicture(”picfile.jpg“)D、Picture1.image =”picfile.jpg“ 46．使用print方法可在图片框中进行文本的输出(如：picture1.print ―信息技术‖)，用_____方法可画点。A A、pset B、line C、circle D、move 47．使用print方法可在图片框中进行文本的输出(如：picture1.print ―信息技术‖)，用_____方法可使图片框移动位置。D A、pset B、line C、circle D、move 48． 双击工具箱中某个控件，该控件将____。C A、被选中 B、出现在窗体左上角 C、出现在窗体中部 D、没变化

49.为了取消窗体的最大化功能，需要把它的一个属性设置为False，这个属性是。D A、ControlBox B、MinButton C、Enabled D、MaxButton 50.执行下面的程序段后，x 的值为。C x=0 For i=1 To 10 x=x+i5 Next i A、5 B、6 C、7 D、8

二、程序设计题

51．编写一个程序，输入任意两个整数，输出其中较大的数。界面如下：

当用户输入两个整数后，单击―输出‖按钮，则输出正确结果。参考答案：

Private Sub Command1_Click()Dim a, b As Integer a = Val(Text1.Text)b = Val(Text2.Text)If a >= b Then Label3.Caption = a Else Label3.Caption = b End If End Sub 52.设计一程序，计算1*2+2*3+3*4+4*5+…+N*（N+1）的和。程序界面如下：

当用户输入N后，单击―求1*2+2*3+3*4+4*5+…+N*（N+1）‖按钮后，输出正确结果。参考答案：

Private Sub Command1_Click()Dim i, n, s As double n = Val(Text1.Text)s = 0 For i = 1 To n s = s + i *(i + 1)Next i Label1.Caption = s End Sub 53．设计一个从键盘接收三条边的值，测试能否组成三角形，若能，则计算所组成三角形面积，否则，给出相应信息的程序，运行之后界面如下。

参考答案：

Private Sub Command1_Click()Dim a, b, c, d As Single a = Val(Text1.Text)b = Val(Text2.Text)c = Val(Text3.Text)If(a + b)> c And(a + c)> b And(b + c)> a Then d =(a + b + c)/ 2 Label3.Caption = Sqr(d *(db)*(dc 37．在IF语句的条件中，X≤-10或X>0应写成：B A、X<=-10 AND X>0 B、X<=-10 OR X>0 C、X≤-10 OR X>0 D、X≤-10或X>0 38．在VB中数据类型为整型的―数据类型保留字‖是。A A、integer B、long C、single D、string 39．在VB中数据类型为双精度浮点型的―数据类型保留字‖是。B A、integer B、double C、single D、string 40．在VB中数据类型保留字―boolean‖表示的数据类型是。C A、整型 B、长整型 C、布尔型 D、字符串型 41．函数SQR(X)称为。A A、算术平方根函数 B、绝对值函数

C、正弦三角函数 D、字符串转换为数值函数 42．数值表达式运算的先后顺序为。A A、()→函数→乘方→* /→+ C、函数→乘方→()→* /→+43． 表达式4+5 6 * 7 / 8 Mod 9 的值是。A A、4 B、5 C、6 D、7 44．由语句txtname.text=”AB“,可知txtname一定是_____控件。A A、文本框控件 B、标签控件 C、图象框控件 D、命令按钮

45．使用print方法可在图片框中进行文本的输出(如：picture1.print ―信息技术‖)，用_____方法可画线。B A、pset B、line C、circle D、move 46．使用print方法可在图片框中进行文本的输出(如：picture1.print ―信息技术‖)，用_____方法可清除图片框中的内容。C A、pset B、line C、cls D、move 47．VB中工程文件的扩展名为。A A、.vbp B、.frm C、.ds D、.bas 48.设a=2,b=3,c=4,d=5,下列表达式的值是。B a>b AND c<=d OR 2*a>c A、True B、False C、-1 D、1 49.表达式4+5-6*7/8 Mod 9的值是。A A、4 B、5 C、6 D、7 50.下列控件中，哪一个是外部控件。D A、PictureBox B、CommandButton C、Timer D、CommonDialog

二、程序设计题

51．设计一个程序，输入一个长方体的长宽高，计算并输出其体积V，界面如下： 当用户输入长宽高，后单击―计算‖按钮，则输出结果。参考答案：

Private Sub Command1_Click()Dim a, b, c As Single a = Val(Text1.Text)b = Val(Text2.Text)c = Val(Text3.Text)Label5.Caption = a * b * c End Sub

Private Sub Command2_Click()End End Sub 52．编写一个程序，输入任意三个整数，输出其中最小的自然数。界面如下：

当用户输入三个自然数后，单击―最小自然数为‖按钮，则输出正确结果，请阅读下面程序，把所缺的代码写出来。Private Sub Command1_Click()Dim a, b, c, d As Integer a = Val(Text1.Text)b = Val(Text2.Text)c = Val(Text3.Text)If a <= b Then d = a Else d = b End If

Label3.Caption = d End Sub 参考答案： If d > c Then d = c End If 53．设计一个求ax2 +bx+c=0解的程序，用户界面如下：

参考答案：

Private Sub Command1_Click()Dim a, b, c, d, x1, x2 As Single a = Val(Text1.Text)b = Val(Text2.Text)c = Val(Text3.Text)d = b ^ 2Sqr(d))/(2 * a)Label3.Caption = ”x1=“ & x1 & Chr(13)& ”x2=“ & x2 Else Label3.Caption = ”此方程无实根！“ End If End Sub Private Sub Command2_Click()End End Sub 54．编一程序，将阿拉伯数字0、1、2、……、8、9转换为汉语大写数字零、壹、贰、……、捌、玖，程序界面如下：

参考答案： Dim a As Integer Dim b As String a = Val(Text1.Text)Select Case a Case 0 b = ”零“ Case 1 b = ”壹“ Case 2 b = ”贰“ Case 3 b = ”叁“ Case 4 b = ”肆“ Case 5 b = ”伍“ Case 6 b = ”陆“ Case 7 b = ”柒“ Case 8 b = ”捌“ Case 9 b = ”玖" End Select Label1.Caption = b End Sub

vb复习题1及答案 第2篇

1．在设计应用程序时，可以查看到应用程序工程中的所有部分的窗口是（）。

A．窗体设计．代码C．属性D．工程资源管理器窗口 >> 答案：d

2．窗体的Load事件的触发时机是（）。

A．用户单击窗体时B．窗体被加载时C．窗体显示之后D．窗口被卸载时 >> 答案：ｂ

3．与传统的程序设计语言相比，Visual Basuc最突出的特点是（）。

A．结构化程序设计B．程序开发环境C．事件驱动编程机制D．程序调试技术

答案：C

4．VB6.0集成开发环境的主窗口不包括（）。

A．标题栏 B．菜单栏 C．状态栏 D．工具栏

答案：c

5．如果对象的名称为Mytext，而且对象有一个属性Text，那么在代码中引用该属性的正确格式是（）。

A．Text.Mytext B．Mytext.text C．Mytext.（Text）D．Mytext*Text

答案：b

6．下列可以激活属性窗口的操作是（）。

A．用鼠标双击窗体的任何部位 B．执行“工程”菜单中的“属性窗口”命令 C．按Ctrl+F4 D．按F4键

答案： b d

7．假定已在窗体上画了多个控件，并有一个控件是活动的，为了在属性窗口中设置窗体的属性，预先应制造的操作是（）。

A．单击窗体上没有控件的地方 B．单击任一个控件 C．不执行任何操作 D．双击窗体的标题栏

答案：a

8．如果在文本框中键入字符时，只显示某个字符，如星号（*），应设置文本框的（）属性。

A．Caption B．PasswordChar C．Text D．Char

答案：b

9．如果想让文本框中的内容在运行时不能编辑，需将文本框的（）属性设置为True。

A．Locked B．MultiLine C．TabStop D．Visible

答案：a

10．对于定时器（Timer）控件，设计其定时是否开启的属性是（）。

A．Index B．Tag C．Enabled D．Left

答案：c

11．要在窗体Form1内显示“myfrm”，使用的语句是（）。

A．Form.Caption=“myfrm” B．Form1.Caption=“myfrm” C．Form1.Print=“myfrm” D．Form.Print=“myfrm”

答案：ｂ

12．对象的性质和状态特性称为（）。

A．事件 B．方法 C．属性 D．类

答案：c

13．下列正确的赋值语句是（）。

A．x+y=20 B．y=x+20 C．3x=y D．s=π*r*r 答案：b

14．当使用上下文相关的帮助时，选择要帮助的内容，然后按（）键，就可出现MSDN窗口直接显示所需的帮助信息。

A．Help B．F10 C．ESC D．F1

答案：d

15．将调试通过的工程经“文件”菜单的“生成.exe.文件”编译成名.exe后，就该可执行文件放到其它机器上不能运行的主要原因是（）。A．运行的机器上无VB系统 B．缺少.frm文件 C．该可执行文件有病毒 D．以上原因都不对

答案： d

二、填空题

1．当进入VB集成开发环境后，发现没有显示“工具箱”窗口，应选择()菜单的()选项，使“工具箱”窗口显示。

答案：视图 工具箱

2．在VB中，事件过程名由（）和（）构成。

答案：Sub 事件名称（）

3．工程文件的扩展名是（），窗体文件的扩展名是（）。

答案：vbp.frm

4．对象是代码和数据的集合，例如，Visual Basic中的()、（）（）、等都是对象。

答案：窗体 文本框 命令按钮

5．对象的方法应用于（）。当对象不需要任何参数并且也没有返回值时，调用对象的方法的格式为（）。例如，对窗体Form1使用Show方法，应写成（）。

答案：程序代码中 对象名.方法名 Form1.Show

6．要使文本框显示滚动条，需要将其（）属性设置为（）。

答案：Multiline True

7．欲设置定时器的时间间隔为4秒，则属性的Interval属性设置为（）。

答案：4000

8．要使标签框的大小随Caption属性作自动调整，应将（）属性设置为（）。

答案：AutoSize True

9．通过（）可以在设计时直观地调整窗体在屏幕上的位置。

答案：StartUpPosition

10．要想在代码中给名为txtshow的文本框赋予文本：GOOD WORK！时，应当编写的语句是（）。

答案：txtshow.Text=”GOOD WORK!”

11．若命令按钮的名称为Cmdopen，程序要求单击以上命令按钮时，打开一个窗口frm1时，请对以下事件过程填空。Private Sub Cmdopen（）（）End Sub

答案：Click()frm1.Show

12．事件就是在对象上所方式的事情，Visual Basic中的事件如（）（）（）等。一个对象响应的事件可以有（）个，用户不能建立新的事件。事件过程是指（）。假设一个事件过程如下： Private Sub cmd1_Click()Form1.Caption=”VB示例” End Sub 则响应该过程的对象名是（），事件名是（）。

答案：Click事件 DbClick事件 Load事件 多 由事件来驱动应用程序执行一段VB代码 cmd1 cmd1_Click()True 13．对象的方法应用于（）。当对象不需要任何参数并且也没有返回值时，调用对象的方法的格式为（）。例如，对窗体Form1使用Show方法，应写成（）。

答案：程序代码中 对象名.方法名 Form1.Show 14．为了在编写代码时能自动进行语法检查，必须执行（）菜单中的（）命令，打开（）对话框，然后选择“编辑器”选项卡中的（）。

答案：“工具” “选项” “选项” “自动语法检测”

15．定时器控件可识别的事件是（），发生该事件的时间间隔由定时器的（）属性设置，其单位为（）。

答案：Timer Interval 毫秒

三、简答题

1．什么是可视化编程和事件驱动？

答案：编程人员只需针对某个事件编写程序代码称为可视化编程。应用程序是在响应不同的事件时执行不同的代码片段称为事件驱动。

2．对象、属性、事件和方法指的关系任何？

答案：窗体和控件是创建应用程序所使用的对象，方法是对象的动作，事件是对象的响应，属性可看作对象的性质。

3．简述事件驱动编程机制与传统编程方式的不同。

答案：传统编程方式是结构化程序设计，它从系统的功能入手，按照工程的标准和严格的规范将系统分解为若干功能模块，系统是实现功能模块的函数和过程的集合。事件驱动编程则是从所处理的数据入手，以数据为中心而不是以服务（功能）为中心来描述系统。它把编程问题视为一个数据集合，数据相对于功能而言，具有更强的稳定性。事件驱动编程与传统编程方式相比，最大的区别在于：前者首先关系关心的是所要处理的数据，而后者首先关心的是功能。

4．简述事件驱动的工作过程。

答案：答：事件驱动的工作过程为： 1.启动应用程序，装载和显示窗体。2.窗体或窗体上的控件等待事件的发生。3.当某个事件发生后，执行其对应的事件过程代码。4.重复执行第2和第3步，直到遇到End语句或单击结束按钮停止程序的运行。

四、程序设计题

1．在窗体上添加一个文本框和两个命令按钮，并把两个命令按钮的标题分别色绘制为“隐藏文本框”和“显示文本框”。当单击第一个命令按钮时，文本框消失；而当单击第二个命令按钮时，文本框重新出现，并在文本框显示“VB程序设计”（字体大小为16）程序运行界面如图1所示。

图一

答案：程序代码： Private Sub Command1_Click()Text1.Visible = False End Sub Private Sub Command2_Click()Text1.Visible = True Text1.Text = “VB程序设计” End Sub

2．设计一个计算程序。该程序用户界面如图2所示，由四个文本框：文本框1（text1）、文本框2（text2）、文本框3（text3）、文本框4（text4），和三个命令按钮：命令按钮1（command1）、命令按钮2（command2）、命令按钮3（command3）组成。程序运行后，用户按清除按钮，则清除文本框中显示的内容，按计算按钮，则计算三科平均成绩。单击退出按钮则退出。

图二

直肠多发类癌1例及文献复习 第3篇

1 临床资料

患者, 女, 61岁, 因“肛门肿胀10年余”入院。査体未见明显异常体征。实验室检查:CEA、AFP、C A 1 9 9、血常规均正常。C T检查:胃肠道未见明确占位性病变。结肠镜检查:距肛门5 c m至2 5 c m直肠可见散在多发大小不等的结节隆起性病变, 大小约0.3~1.0cm, 表面光滑, 呈类圆形或扁平隆起。超声内镜:距肛门25cm以远可见十余枚大小不等隆起性病变, 直径约0.3~1.0cm, 病变起源于黏膜下层, 内部呈均匀低回声, 肌层及浆膜层完整, 无增厚。活检病理:结合免疫组化CK (+) 、Vimentin (+) 、Syn (+) 、Cg A (+) 、CD56 (+) 、Ki-67指数<2%, 诊断直肠神经内分泌肿瘤 (GI级) (即类癌) 入院诊断:直肠多发类癌。经术前诊断, 于2016年3月行直肠部分切除术。术后病理:诊断直肠多发神经内分泌肿瘤, G1级 (类癌) , 肿瘤侵至黏膜下层, 脉管内未见明确癌栓, 黏膜缺损区周围未见肿物残留。两侧手术切缘干净。肠系膜淋巴结8枚均未见癌转移, 另送 (肠系膜下血管旁) 淋巴结1枚未见癌转移。免疫组化染色结果同术前。

2 文献复习

直肠多发类癌较为少见, 在既往文献报道的12例病例中, 有4例发现发生淋巴结转移和出现肌层浸润, 并通过活检在直肠壁发现存在大量的神经内分泌微巢细胞, 治疗上给予行直肠根治性切除和淋巴结清扫。其他因多发病灶范围相对局限, 浸润深度仅仅局限于黏膜下层, 无淋巴结及远处转移, 病理分级为G1期, 为低度恶性, 行内镜下的局部切除治疗。从肿瘤发生的数量上看, 大部分病例为2~3个, 极少数超过10个。相关文献总结如下 (见表1) 。

3 讨论

直肠多发类癌是一种潜在的、低度恶性肿瘤, 其生物学行为与直肠恶性肿瘤有明显不同, 因此治疗措施和预后判断也截然不同。微小的多发病灶常无明显临床症状, 肿瘤增大后则易出现排便不净感、肛门肿胀、便秘、便血、腹痛、腹泻等症状。其最常出现的转移部位是肝脏, 但由于直肠胚胎起源于后肠, 具有非嗜银性, 即使出现肝转移患者也极少出现面色潮红、喘息、水肿等类癌综合征表现。该病诊断主要依靠直肠指检、肠镜, 近年来免疫组织化学及原位杂交技术也与病理检查一起成为其确诊和鉴别诊断的必备手段。

关于病因有研究认为[12], 直肠多发类癌与神经内分泌肿瘤发病基因MENI有一定的关系, 也有学者[13]通过体外试验从不同方向试图探究胃肠道神经内分泌肿瘤的发生与转移机制, 如信号途径PI3K/AKT、Raf TMEK/ERK、Notchl、GSK-3p。

直肠多发类癌生长缓慢, 病变多位于距肛缘4~7cm处, 距肛缘8cm以内者占96.1%, 其中以直肠前壁及侧壁多见[14], 瘤体小, 直径多小于1cm。超声内镜下多表现为多个黏膜层和/或黏膜下层的低回声结节, 界限清楚, 回声大致均匀。从目前文献报道上看, 其肿瘤发生的数量较少超过10个。临床上常与内痔、直肠息肉、直肠癌等直肠常见疾病的症状相似, 易漏诊或误诊。病理及免疫组织化学检查对于其确诊十分重要。直肠类癌肿瘤细胞恒定表达神经内分泌标记物NSE和SYN, 部分肿瘤细胞可表达Cg A和CD56, 而Ki-67的表达率一般少于2%。该病的治疗方案取决于原发灶大小、部位、数量、侵润深度和局部淋巴结及肝脏是否转移。2010年直肠类癌诊治指南[15]指出, 限于黏膜层或黏膜下层的不超过1cm的直肠类癌首选内镜下切除。但当肿瘤直径超过1cm时, 发生固有肌层浸润和脉管转移的机率增加, 以及多发病例, 则需要外科手术治疗, 必要时行肿瘤根治性手术。我们所观察病例中, 患者肿瘤数量较多, 分布广泛, 大小不等, 因此采取腹腔镜辅助直肠类癌根治术 (Dixon手术) 治疗, 切除部分直肠, 以能根治、切除癌肿为原则。总体上而言, 直肠多发类癌低度恶性, 预后相对较好, 5年和10年生存率可高达88%和81%[16]。预后因素多与肿瘤大小以及浸润深度有关, 而肿瘤数量是否影响预后尚不清楚。临床医生应提高对本病的认识, 早发现、早治疗是影响本病的关键。该病患随访至今, 未有明显复发和转移, 预后良好。

课本中二句解释及习题答案的商榷 第4篇

关键词：what、 that、 one of+名词（复数）…+复数动词、the（only） one of+名词（复数）…+单数动词。

一、普通高中课程标准实验教科书（必修2）课本中第5页阅读和听力一文中有这样一句型：An opinion is what someone believes is true but has not been proved.

该句（人教出版社）必修2参考译文是：看法是人们相信是真实的但是未经证实。笔者查阅好多中学教材全解对该句的注释和人教出版社注释相同，都认为what引导的从句是表语从句，An opinion为主句的主语，is为系动词，what引导的从句是表语从句，在what引导的从句中含有由but连接的两个并列句，并解释what引导名词性从句时，what在从句中可以充当主语、宾语、表语等成分。例如：

What he said is true. 他说的是事实。

What made her upset is that she didn’t pass the exam.

她没有通过考试使她非常难过。

笔者认为该句型解释值得商榷。还得从that和what这两个词论起，that为从属连词引导名词性从句，不担任成分。例如：

She said（that）she would come. 她说她要来。（见《现代高级英汉双解辞典》第1141页）

The trouble is that we are short of money. 困难的是我们缺钱。（见《现代高级英汉双解辞典》第1141页）

The truth was that we never saw him.事实是我们从未见过他。（见《大英汉词典》第1558页）。

The reason was that he was afraid.原因是他害怕。（见《新标准中学生英语词汇用法全解》第1435页）。

She said she had bought a new car.她说她买了一辆新车。（见《外研社实用英汉词典》第1015页）。

What he says is not important. 他所说的话不重要。（见《现代高级英汉双解辞典》第1248页）

He is not what he used to be. 他已不是过去的他了。（见《外研社实用英汉词典》第1084页）

This is what I want to know. 这正是我们要知道的。（见《新标准中学生英语词汇用法全解》第1580页）。

根据以上例句笔者认为该句主语为An opinion，is为系动词，后面连接了一个省略从属连词that的表语从句，what引导的主语从句为表语从句的主语，what（相当于the thing that）在主语从句中充当believes的宾语,is true为表语从句的谓语（系表结构），but连接的两个并列句。假如把what视为表语从句的引导词，在从句中充当believes的宾语，那么is true作何解释？如该句没有is true，what从句当然为表语从句的引导词，what在表语从句中充当believes的宾语。或者假若is true是to be true也可视为表语从句引导词what的宾补（believe sth（to be）adj。

二、该书第4页Discovering useful structure练习4,（9小题）：

It’s one of the few places which is known for its good food. （划线部分为该书参考书18页所给汉译英答案）。

笔者认为1. 在“one of+名复数名词+关系代词who/that/which”引导的从句结构中，关系代词who/that/which的先行词是靠近它的复数名词而不是one，因此，从句应该是复数形式。

2. 但是当one前有the only等修饰时，关系代词的先行词是one，而不是靠近它的复数名词，因此从句的动词应是单数形式。例如：

The Great Wall is one of the world_famous buildings that draw lots of visitors.

长城是吸引大批游客的世界著名建筑之一。

The Great Wall is the only one of the buildings on the earth that is seen from the moon. 长城是地球上唯一能从月球上看到的建筑物。

He is one of the boy students who are always ready to help others.

他是乐于助人的男同学之一。

He is the only one of the students who comes from the south.

他是惟一来自南方的学生。

【考例】 He is the only one of the students who_____a winner of scholarship for three years.（2002年上海市普通高等学校春季招生英语试题）

A.is B.are C.have beenD.has been答案：D

解析：当one前有the only，just the等修饰时,谓语动词与one保持一致,故答案为D。

【考例】I wonder whether the soldier is one ofthose who____abroad to keep peace.（南通上市高三第一次調研测试。）

A.has been sentB.have been sent

C.have sentD.has sent答案：B

解析：关系代词who指代的先行词是those，所以助动词用have，战士是被派送到国外维和的，所以用被动语态。

【考例】Oscar Gold Prize is the only one of the film prizes____offered to any Chinese actor or actress by far. 答案：D

A. which is notB. that have not beenC. that has not D. that has not been答案：D

解析：当one前有the only，just the等修饰时,谓语动词与one保持一致,故答案为D。

【考例】Oscar Gold Prize is one of the film prizes_______offered to any Chinese actor or actress so far.

A. which is notB. that have not beenC. that has not D. that has not been答案：B

解析：当先行词的one前无the only，just the等修饰时,of后面的复数名词是先行词,,从句的谓语动词用复数，故答案为B。

根据以上例句，笔者认为18页所给汉译英参考答案which is应为which are。以上两处看法 ，是否正确，敬请编辑及同行指正。

参考文献:

1.《大英汉词典》

2.《外研社实用英汉词典》

3.《现代高级英汉双解辞典》

vb复习题1及答案 第5篇

1、VB的特点、运行环境、对象、属性、方法、事件各概念，尤其是方法和事件的区分。

熟悉VB的IDE，VB开发应用程序的一般步骤。

特点：GUI(集成开发环境)、OLE(对象的连接和嵌入)、OOP(面向对象);

运行环境：Windows(VB5.0以上在32位操作系统)

方法：对象可以执行的动作或行为;(主动性)

事件：使某个对象进入活动状态的一种操作或动作。(被动性)

例题：

1、VB的使用目的是()。

A.开发Windows应用程序 B.图象处理

C.制作WAV文件 D.文字处理

2、一个对象可以执行的动作和可被对象识别的动作分别称为()。

A.方法、事件 B.事件、方法 C.方法、属性 D.事件、属性

3、一只白色的足球被踢进球门，则白色、足球、踢、进球门是()。

A.属性、对象、方法、事件 B.属性、对象、事件、方法

C.对象、属性、方法、事件 D.对象、属性、事件、方法

§

2、熟练应用窗体、控件。掌握窗体的常用方法(Hide、Show、Print、Cls、Refresh、Move)、属性和事件(Load、Activate、Click)。

Load事件、Unload事件、End语句

常用控件：CommandButton(Default、Cancel、Enabled、Style、DisabledPicture、DownPicture)、Label(AutoSize)、TextBox(Alignment、MaxLength、PasswordChar、Multiline、ScrollBars注：Multiline=True)、OptionButton(Value)、ListBox(属性：listlistcountlistindexselected、方法：AddItem、RemoveItem、Clear)、ComboBox(P27)、HscrollBar、VscrollBar(min、Max、Value)、PictureBox(print方法)、Timer(运行时不可见、只有Timer事件、Interval)方法、属性、事件的掌握。

容器控件：Form、Picture、Frame 特殊控件：菜单的使用(只响应Click事件)

1、以下窗体名中哪些是非法的窗体名()。

对象名命名规则：以字母或汉字开头，后面可以是字母、数字、下划线、汉字。(变量名类似)

A._aform B.3frm C.f_1 D.frm 5 E.f_1*

2、一个名称为myfrm,标题属性为form1的窗体，它的单击事件名应为()。

A.myfrm_click B.form1_click

C.form_click D.me_click

3、执行下面语句：print ―5*20‖ 的结果是()。

A.―5*20‖ B.出现错误信息 C.5*20 D.100

4、下列语句代码哪一些可正常执行(正常执行是指系统不给出出错提示);

A、Print 32765 + 3 B、Print 5 + 7 = 14

C、Print 256 / 128 D、Print “14” + 12 E、Print “14” & 12

5、以下使用方法的代码中，正确的是()。

A、Label1.Setfocus B、Form1.Clear

C、Text1.SetFocus D、Combo1.Cls

6、在程序中可以通过复选框和单选按钮的()属性值来判断他们的当前状态。

A.Caption B.Value C.Checked D.Selected

7、将复选框的Value属性设为“2”,其效果与把它的Enabled属性设为“False”有何异同?若把一个控件的Visible属性设为“False”,意味着什么?

8、当用户单击命令按钮时，()属性可以使得命令按钮对激发事件无效。

A.Name B.Enabled C.Default D.Cancel

9、在文本框Text1和Text2中分别输入35与48，变量S与X分别为字符型与整型，以下赋值语句的执行结果是什么?

s = Text1.Text + Text2.Text x = Text1.Text + Text2.Text

s = Text1.Text & Text2.Text x = Text1.Text & Text2.Text

s = Val(Text1.Text)+ Text2.Text

x = Val(Text1.Text)+ Text2.Text

s = Val(Text1.Text)& Text2.Text

x = Val(Text1.Text)& Text2.Text

例如：

1、if 语句：

Private Sub Form_Click()

Dim x As Integer, y As Integer

Dim z As Single

x = 0.2

y = 1

If(x >= 1)Then

z = Log(x)

ElseIf x >= 0 And x < 1 And y >= 0 Then

z = 2 * x3

i = i + 1

If p >= 10 Then Exit For

Next i

Print i, p, n

End Sub

一、InputBox函数

MsgBox函数(注意参数含义及顺序)

x=InputBox(_____,______,_______)

写出显示下图信息框的MsgBox函数

§

5、数组

1、数组的上、下界：Ubound()、Lbound()

2、数组的大小的计算、数组的结构：(二维数组：以列存放)

3、Erase语句：重新初始化静态数组的元素、或释放动态数组的存储空间。

4、For Each –Next结构语句

5、用Array函数给数组赋值(只能给Variant类型的变量赋值)

6、控件数组(load/Unload Object(Index))

动态数组(Redim语句)

数组分类：

固定大小数组 Option Base语句功能

Preserve语句功能

例如：

n数组重点算法：

n一数组，求其中最大和最小;n对一数组排序(选择法、冒泡法、直接排序法)

n在一数组中查找指定的数(顺序、二分查找);n删除一数组中重复的数

2、在窗体模块的通用声明处用下面的语句声明变量、数组、正确语句有()个。

A.Public a(5)as integer B.Public n as integer

C.Public st as string*10 D.Private b()as integer

3、下列语句中的()语句可以用来正确地声明一个动态数组。

A.Private A(n)as integer B.Dim A()as integer

C.Dim A(,)as integer D.Dim a(1 to n)

4、下列关于数组的说法中正确的是()。

A.在过程中，不能用private语句定义数组

B.利用Redim语句重新定维时，不得改变已经说明过的数组的数据类型。

C.数组重新定维后，原有的数据元素内容将不予保留

5、过程的形参为数组时，以下定义语句中正确的是()。

A.private sub sort(a()as integer)

B.private sub sort(a(10)as integer)

C.private sub sort(a(,)as integer)

D.private sub sort(byval a()as integer)

6、某过程的说明语句中，正确的数组说明语句是______。

Const N As Integer=4 : Dim L As Integer

① Dim x(L)As Integer

② Dim A(K)As Integer

Const K As Integer=3

③ Dim B(N)As Integer

④ Dim Y(2000 To 2008)As Integer

A.①②④ B.①③④ C.③④ D.②③ §

7、文件管理控件

文件处理 顺序文件和随机文件的打开(open)语句，EOF函数，读写语句。

do while not eof(1)do until eof(1)

print #1, write #1，input #1,a,b,c line input #1,s input(#1,100)

get #1,a put #1,‖af‖

打开方式：

顺序文件Open “文件路径+文件名(包括文件后缀)” For Output As #1-511

Open “文件路径+文件名(包括文件后缀)” For Append As #1-511

Open “文件路径+文件名(包括文件后缀)”For Input As #1-511

随机文件：Open “文件路径+文件名(包括文件后缀)”For Random As #1-511

二进制文件：Open “文件路径+文件名(包括文件后缀)”For Binary As #1-511

Open语句打开文件的注意

1.如果以Output、Append、Random、Binary模式打开一个不存在的文件时，VB自动创建一个相应文件;

2.在Input Random Binary模式下，可以用不同的文件号打开同一文件，但Output Append方式不可以;

3.所有当前使用的文件号必须是唯一的;

4.如果以Output模式打开一个已存在的文件，即使没有进行写操作原来数据也将被覆盖。

Close语句注意：(Reset)

1.直接使用 Close语句(缺省文件号)，则所有用Open语句打开的活动文件都被关闭;

2.当程序结束时，所有打开的文件自动被关闭。

Lock和Unlock语句注意：

1.对于二进制文件，Lock和Unlock的是字节范围;

2.对于随机文件，Lock和Unlock的是记录范围;

3.对于顺序文件，Lock和Unlock的是整个文件，即使指明范围也不起作用;

4.缺省情况下Lock和Unlock的范围是整个文件;

5.Lock和Unlock总是成对使用。

特别注意：在关闭文件或结束程序之前，必须用Unlock语句对先前锁定的文件解锁，否则会产生难以预料的错误。

1.要对顺序文件进行写操作，下列打开文件语句中正确的是()。

Open “file1.txt” for output as #1

Open “file1.txt” for input as #1

Open “file1.txt” for Random as #1

Open “file1.txt” for binary as #

12.在VB中文件访问的类型有()。

A.顺序、随机、二进制 B.顺序、随机、字符

A.顺序、十六进制、随机 D.顺序、记录、字符

例如：将文件Data1中的无序数据和Data2中的有序数据插入到Data3中，要求：Data3中的数据必须也是排好序。请填写空白处以实现该题功能。

Private Sub Form_Click()

Dim a()As Integer, b()As Integer

Dim k As Integer, i As Integer

Open “e:data1.txt” For Input As #2

Open “e:data2.txt” For Input As #3

Do While Not EOF(2)

k = k + 1

ReDim Preserve a(k)

Input #2, a(k)Loop _______k=0______________________ Do While Not EOF(3)k = k + 1 ReDim Preserve b(k)Input #3, b(k)Loop Call insert(a, b)Open “e:data3.txt” For Output As #4 _k=ubound(b)____________________________ For i = 1 To k Print #4, b(i)Next i Close End Sub Private Sub insert(a()As Integer, b()As Integer)Dim m As Integer, i As Integer Dim n As Integer, j As Integer m = UBound(a): n = UBound(b)_redim preserve b(m+n)_______________________ i = 0 Do While i < m i = i + 1 j = n Do While j >= 1 And a(i)< b(j)If a(i)< b(j)Then ___b(j+1)=b(j)_______________________ j = jj))

Next j

ch = ch & Chr(dec)

dec = 0

Next i

End Sub §8.鼠标方法、文本、图形及多媒体处理

(1)常用鼠标方法(MouseDown, MouseUp,MouseMove)

(2)数据输出的格式化处理(Format函数)

(3)图形控件Line、Shape使用画点(Pset)、线(Line)、圆(Circle)

例如：在Form_Click事件中执行如下语句的正确结果是()。

Print Format(1236.54,―+##,##0.0%‖)

A.123456 B.+123,654.0% C.+123,6.54% D.+123,654 §9数据库

1.计算机数据管理的三阶段：

人工管理—>文件管理—>数据库管理

2.数据模型：

层次模型(树型结构)—>网络模型(无向图形)—>关系模型(二维关系表)

3.数据控件(Data)的重要属性：

Conncet:确定数据访问类型(Access(缺省值)dbaseFoxpro)

DatabaseName:确定数据控件使用的数据库

Access表包含―.mdb‖的文件中，该属性值就是：.mdb

dbaseFoxpro数据库时,该属性值是：包含数据库文件的路径

RecordSource:确定访问数据表的名称

4.常用的绑定控件：标签、文本框、检查框、组合框、列表框、图片框、图象控件、DBCombo、Dblist、DBGrid

常用属性： DataSource:指定一个数据控件(Data控件)

VB复习题(含答案) 第6篇

一、单选题

1.窗体的标题栏显示内容由窗体对象的(D)属性决定。

A.BackColor

B.BackStyle

C.Text

D.Caption 2.下列不能作为VB中的变量名的符号是(C)。

A.A45

B.P12

C.89Ta

D.x 3.只能删除字符串尾部空格的函数是(B)。

A.Ltrim

B.Rtrim

C.Trim

D.Mid 4.如果在菜单栏中添加１条分隔线，则应将其Caption属性设置为(D)。

A.＝

B.*

C.&

D.-5.用下面语句定义的数组的元素个数是(D)。

Dim A(-3 To 5)As Integer A.6

B.7

C.8

D.9 6.设a=2，b=3，c=4，d=5，下列表达式的值是(B)。

a>b And c<=d Or 2*a>c A.True

B.False

C.-1

D.1 7.下列关于控件画法的叙述错误的是(D)。

A.单击一次工具箱中的控件图标，只能在窗体上画出一个相应的控件

B.按住CTRL键后单击一次工具箱中的控件图标，可以在窗体上画出多个相同类型的控件

C.双击工具箱中的控件图标，所画控件的大小和位置是固定的D.我们使用的控件只能是工具箱中的标准控件

8.应用程序设计完成后，应将程序保存，保存的过程是（D)。

A.只保存窗体文件即可

B.只保存工程文件即可

C.先保存工程文件，之后保存窗体文件

D.先保存窗体文件(或标准模块文件)，之后还要保存工程文件 9.假定有一个菜单项，名为MenuItem，为了在运行时使该菜单项失效(变灰)，应使用的语句为（A)。

A.MenuItem.Enabled=False

B.MenuItem.Enable=True C.MenuItem.Visible=True

D.MenuItem.Visible=False 10.在一个语句内写多条语句时，每个语句之间用(B)符号分隔。

A.，B.：

C..D.；

11.已知A$=”abcdefghijklmn”,则表达式Left$(A$,4)+Mid$(A$,4,2)的值为(B A.abcdef

B.abcdde

C.abccde

D.abcdefg 12.赋值语句:a=123+MID(”123456”,3,2)执行后,a变量中的值是(D)。

A.”1234”

B.123

C.12334

D.157 13.下面程序运行后，显示的结果是(B)。Dim x X=true If x Then Print x+1 A.1

B.0

C.true

D.显示出错信息 14.下面程序段，显示的结果是(A)。

Dim x X=1 X=int(Rnd)+5 Select Case x

Case 5

Print“优秀”

Case 4

Print“良好”

Case 3

Print“通过”

Case Else

Print“不通过” End Select A.优秀

B.良好

C.通过

D.不通过)。

15.VB 提供了结构化程序设计的三种的基本机构，三种基本结构是(D)。

A.递归结构、选择结构、循环结构 B.选择结构、过程结构、顺序结构 C.过程结构、输入、输出结构、转向结构 D.选择结构、循环结构、顺序结构

16.下列循环语句能够正常结束循环的是(C)。

A.I=5 Do

I=I+1 Loop until I<0 B.I=1 Do

I=I+2 Loop until I=10 C.I=10 Do

I=I-1 Loop until I<0 D.I=6 Do

I=I-2 Loop until I=1 17.以下程序输出结果是(A)。

Option Base 1 Private Sub Command1_click()Dim a%(3, 3)For i = 1 To 3 For j = 1 To 3 If j > 1 And i > 1 Then a(i, j)= a(a(i1), a(i, j-1))+ 1 Else a(i, j)= i * j End If Print a(i, j);“";Next j Print Next i End Sub A.1 2 3

B.1 2 3

C.1 2 3

D.1 1 1 3 1 2 3

4 6

2 2 2 3 2 3

6 9

3 3 18.定时器的Interval属性以（C)为单位指定Timer事件之间的时间间隔。

A．分

B．秒

C．毫秒

D．微秒

19.可以惟一标识控件数组中的每一个控件的属性是(A)。

A．Name

B．Caption

C．Index

D．Enabled 20.在下列关于通用对话框的叙述是错误的是(B)。

A.CommonDialog1.ShowFont显示字体对话框

B.在打开或另存为对话框中，用户选择的文件名可以经FileTitle属性返回

C.在文件找开或另存为对话框中，用户选择的文件名及其路径可以经FileName属性返回

D.通用对话框可以用来制作和显示帮助对话框 21.InputBox函数返回值的类型为(B)。

A.数值 B.字符串

C.变体 D.数值或字符串(视输入的数据而定)22.下面关系表达式的值为真的是(C)。

A.”A“>”a“ B.”9“>”a“ C.”That“>”Thank" D.12>12.1 23.为了把焦点移到某个指定的控件，所使用的方法是（A)。

A.SetFocus B.Visible C.Refresh D.GetFocus 24.设a=6，则执行x=IIF(a>5,-1,0)后，x的值为（D)。

A.5 B.6 C.0 D.-1 25.以下语句错误的是(B)。

A.If a=1 And b=2 then C=3 End If B.If a=1 Then C=2 ElseIf a=2 Then C=3 C.c=IIF(a=1,2,3)D.If a=1 Then C=2 ElseIf a=2 Then C=3 End If 26.有如下程序：

Sub sub1(x,y)X=2*x Y=3*y End sub Private sub command1_click()A=1:b=1 Call sub1(a,b)Print “A=”;a;”,B=”;b

End sub 程序运行后的输出结果是（B)。

A.A＝1，B＝B.A＝2，B＝3 C.A＝1，B＝3 D.A＝2，B＝1

二、填空题

1.Visual Basic中工程文件的扩展名是(vbp)；窗体文件的扩展名是(frm)。2.为了使标签能自动调整大小以显示全部文本内容，应把标签的(autosize)属性设置为True。

3.能将字符串中的小写字母转换成大写字母的函数是（ucase)。4.数学表达式 3x+2^3，写成VB表达是（3*x+2^3)。

5.过程和函数中的参数的传递方式有(byval)和(byref)两种。

6.若要终止窗体的运行，可使用(unload)命令；若要将窗体Form1显示出来，可使用方法(Form1.show)来实现。

三、写成程序结果

1.在窗体上画一个命令按钮，然后编写如下事件过程：

Private Sub Command1_Click()b=1 a=2 Do While b<10 B=2*a+b Loop Print b End Sub 程序运行后，输出的结果是（）。2.有如下程序：

Private Sub Command1_Click()S=0 Do s=(s+1)*(s+2)N=N+1 Loop Until s>=10 Print N；s End Sub 运行后的输出结果是(2 12)。3.有如下函数过程