VB理论题一、选择题1.工程资源管理器用来显示和管理工程所包含的 D 等全部项目。
A.变量和数组B.变量和常数C.过程和事件D.窗体和模块2.VB的使用目的是 B 。
A.制作WAV文件B.开发Windows应用程序C.文字处理D.图像处理3.一个应用程序 A 窗体。
A.可包括多个B.应该有两个C.只许有一个D.可以没有4.以下说法正确的是 A 。
A.A、B都正确B.属性是对象的一部分C.事件是对象的一部分D.方法是对象的一部分5.在VB集成环境创建VB应用程序时，除了工具箱窗口、窗体中的窗口、属性窗口外，必不可少的窗口是 B 。
A.立即窗口B.代码窗口C.窗体布局窗口D.监视窗口6.VisualBasic是一种面向 D 的程序设计语言。
A.过程B.用户C.工程D.对象7.在程序中可以通过复选框和单选框按钮的 B 属性值来判断它们的当前状态。
A.CheckedB.ValueC.SelectedD.Caption8.任何控件都具有 A 属性。
B.TextC.CaptionD.ForeColor9.在以下有关对象属性的叙述中，不正确的是 A 。
A.一个对象的所有属性都可在属性窗口的列表中进行设置。
B.一个对象的属性可分为外观、行为等若干类。
C.属性窗口中的属性列表既可按字母序也可按类别排列。
D.不同属性可能具有不同的数据类型。
10.窗体Form1的名称属性是frm，它的Load事件过程名是 D 。
A.frm_LoadB.Me_CmdOKC.Form-LoadD.Form_Load11.在用菜单编辑器设计菜单时，必须输入的项有 B 。
A.索引B.名称C.标题D.快捷键12.在设计列表框时，若实现输入多行文字的目的，应使用 C 键实现文本的换行。
A.Alt+EnterB.EnterC.Ctrl+EnterD.Ctrl+Shift+Enter13.若要使命令按钮不可操作，要对 C 属性设置。
A.VisibleB.CaptionC.EnabledD.BackColor14.要使一个标签透明且具有边框，则应 B 。
A.将其BackStyle属性设置为1，BorderStyle属性设置为1B.将其BackStyle属性设置为0，BorderStyle属性设置为1C.将其BackStyle属性设置为0，BorderStyle属性设置为0D.将其BackStyle属性设置为1，BorderStyle属性设置为015.将数据项"China"添加到列表框(List1)中成为第一项应使用 C 语句。
A.List1.Addltem 1,"China"B.List1.Addltem "China",1C.List1.Addltem "China",0D.List1.Addltem 0,"China"16.下列控件中， C 控件不能改变大小。
belB.FrameC.TimerD.TextBox17.下列语句中的语句可以用来正确地声明一个动态数组A 。
A.Dim A() As IntegerB.Private A(n) As IntegerC.Dim A(,) As IntegerD.Dim A(1 to n)18.以下有关控件数组的说法中错误的是 C 。
A.控件数组由一组具有共同名称和相同类型的控件组成B.控件数组中的每个元素的下标由控件的Index属性指定C.同一控件数组中的元素只能有相同的属性设置值D.控件组中的每一个控件共享同样的事件过程19.如下数组声明语句，则数组a包含元素的个数有 D 。
Dim a(3 , -2 to 2 , 5)A.75B.13C.60D.12020.要分配存放如下方阵的数据， B 数组声明语句能实现(不能浪费空间)。
每行三个元素，第一行为：1.1 2.2 3.3第二行为：4.4 5.5 6.6第三行为：7.7 8.8 9.9A.Dim a(3，3) As SingleB.Dim a(-1 To l，-5 To -3) As SingleC.Dim a(-3 To -1，5 To 7) As IntegerD.Dim a(9) As Single21.如下二维数组声明语句， B 正确。
A.Dim a(n，n) As IntegerB.Dim a(3，4) As IntegerC.Dim a(34) As IntegerD.Dim a[3，4] As Integer22.调用由语句Private Sub Convert(Y As Integer)定义的Sub 过程时，以下不是按值传递的语句是 D 。
A.Convert (X)B.Call Convert(X*1)C.Call Convert ((X))D.Convert X23.下面子过程语句说明合法的是 C 。
A.Sub f1(ByVal n%())B.Function f1%(f1%)C.Function f1(ByVal n%)D.Sub f1(n%)As Integer24.窗体上画一个按钮，然后编写如下的事件代码。
在按钮上单击，输出为 B 。
Private Sub fun( )Static a As Integera=a+2Print a;End SubPrivate Sub Command1_Click( )Dim m As IntegerFor m=1 To 3Call funNext mEnd SubA.0 0 0B.2 4 6C.2 2 2D.2 4 825.在窗体的General段声明变量时，不能使用 A 关键字。
A.StaticB.PrivateC.PublicD.Dim26.系统默认的参数传递方式是 C 传递。
A.ByValB.按实参C.按地址D.按值27.表达式Len("123程序设计ABC")的值是 A 。
A.10B.20C.17D.1428.Int(198.555*100+0.5)/100的值 B 。
A.199.6B.198.56C.200D.19829.与数学表达式 (ab/3cd) 对应，VB的不正确表达式是 A 。
A.a*b/3*c*dB.a*b/3/c/dC.a*b/(3*c*d)D.a/3*b/c/d30.在代码编辑器中，如果一条语句太长，无法在一行内写下（不包括注释），要折行书写，可以在行末使用续行字符 B ，表示下一行是当前行的继续。
A.直接回车B.一个空格加一个下划字符(_)C.一个下划字符(_)D.一个空格加一个连字符(-)31.下面叙述中正确的是 B 。
A.Space函数能用于Print方法中，也能用于表达式B.以上说法均不对C.Spc函数与Space函数均生成空格，没有区别D.Spc函数能用于Print方法中，也能用于表达式32.下列没有类型说明符的变量是 B 。
A.货币型B.日期型C.字符串型D.长整型33.日期类型（Date）在程序中运用时，日期类型必须用 C 符号括起来。
A.＄B.%C.#D.@34.如果x是正实数，对x的第3位小数四舍五入的表达式是C 。
A.0.01*Int(x+0.005)B.0.01*Int(100*(x+0.05))C.0.01*Int(100*(x+0.005))D.0.01*(x+0.05)35.以下语句的输出结果是 C 。
Print Format(12345.6,"000,000.00")A.12345.6B.12,345.6C.012,345.60D.12,345.6036.以下语句的输出结果是 C 。
print Format(3678.234,"000，000，000")A.003,678.23B.000,003.678C.000,003,678D.003,678,23437.设M=3，N=5，P=4.5，Q=2.5，表达式(M*N+2)/(P-Q)的计算结果为 A 。
A.8.5B.8.0C.8D.938.赋值语句：a=123+MID("123456",3,2)执行后，a变量中的值是 C 。
A.123B."12334"C.157D.1233439.下列程序运行后的输出结果是 D 。
Private Sub Command1_Click()For i=1 TO 3For j=0 TO i-1k=k+1next jnext iprint kEnd SubA.3B.5C.4D.640.执行了下面的程序后，列表框中的数据项有 B 。
Sub Form_Click()For i = 1 To 6List1.AddItem iNext iFor i = 1 To 3List1.RemoveItem iNext iEnd SubA.2 4 6B.1 3 5C.1 5 6D.4 5 641.在文本框Text1中输入数字12，Text2中输入数字34，执行以下语句，只有 C 。
可使文本框Text3中显示46。
A.Text3. Text=Val(Text1. Text) & Val(Text2.Text)B.Text3. Text=Text1. Text & Text2. TextC.Text3. Text=Val(Text1. Text)+Val(Text2.Text)D.Text3. Text=Text1. Text+Text2.Text42.下面语句运行后的输出结果是 D 。
Private Sub Command1_Click()x=0Do While x<10x=x+1x=x*xLoopPrint xEnd SubA.30B.12C.6D.2543.关于语句If x=1 Then y=1，下列说法正确的是 C 。
A.x=1为赋值语句，y=l为关系表达式B.x=1和y=l均为关系表达式C.x=1为关系表达式，y=1为赋值语句D.x=1和y=1均为赋值语句44.下列程序段的执行结果为 C 。
x = Int((69 - 60) * Rnd + 60)Select Case xCase Is >= 90Print "优秀"Case 80 To 89Print "良好"Case 60 To 79Print "合格"Case ElsePrint "不合格"End SelectA.优秀B.良好C.合格D.不合格45.以下 B 程序段可以实施X，Y变量值的变换.A.Y=X:X=YB.Z=X:X=Y:Y=ZC.Z=X:Y=Z:X=YD.Z=X:W=Y:Y=Z:X=Y46.有如下程序：Private Sub Command1_Click( )score=65select Case scoreCase Is<60a$="F"Case 60 To 69a$="D"Case 70 To 79a$="C"Case 80 To 89a$="B"Case elsea$="A"End SelectMsgBox a$End Sub程序运行后，消息对话框中显示的内容为 A 。