1、1VB试题库一、选择题1能被对象所识别的动作与对象可执行的活动分别称为对象的_。A方法、事件 B事件、方法 C事件、属性 D过程、方法2. 在过程中可以用_语句定义变量。ADim、Private BDim、Static CDim、Public DDim、Static、Private3用窗体的_属性来设置窗体的标题。Astyle BText CCaption DName4若在应用程序中用“Private Sub Sub1(X As Integer，Y As Single)”定义了子程序 Sub1，调用程序中的变量 I、J 均为 Integer型，则正确调用子程序 Sub1的 Call语句是_。C
2、all Sub1(I，I) Call Sub1(3.1415，I)Call Sub1(3.14，234) Call Sub1(“245“，“231.5“)A B C D无5下面表达式的值为 True的是_。AMid(“Visual Basic“，1，12)=Right(“Programming language Visual Basic“，12)B“ABCRG“abcde“CInt(134.69)=Cint(134.69)D78.932.77-4.986以下有关对象属性的说法中正确的是_。A对象所有的属性都罗列在属性窗口列表中B不同对象不可能有同名属性C不同对象的同名属性取值一定相同D对象的某
3、些属性既可在属性窗口中设置，也可通过程序代码设置或改变7代数表达式 对应的 Visual Basic表达式是_。yxe3sinlALog(Abs(Exp(3.14159)+Sin(x)3)(x+Y)BLn(Abs(Exp(3.14159)+Sin(x)3)(X+Y)CLog(Abs(Exp(3.14159)+Sin(x)3)(X+Y)DLog|(Exp(3.14159)+Sin(x)3)x+y|8 VB 集成开发环境有三种工作状态，不属于三种工作状态之一的是_。A设计状态 B编写代码状态 C运行状态 D中断状态9若在一个应用程序窗体上，依次创建了 CommandButton、TextBox、L
4、abel 等控件，则运行该程序显示窗体时，_会首先获得焦点。A窗体 BCommandButton CLabel DTextBox10在窗体模块的通用声明处用下面的语句声明变量、数组，正确的语句有_个。 Public A(5) As Integer Public N As Integer Public St As String*10 Private b() As IntegerA2 B3 C4 D111单选按钮（OptionButton）用于一组互斥的选项中。若一个应用程序包含多组互斥条件，可在不同的_中安排适当的单选按钮，即可实现。A框架控件（Frame）或图像控件（Image）B组合框（Co
5、mboBox）或图像控件（Image）C组合框（ComboBox）或图片框控件（PictureBox）D框架控件（Frame）或图片框控件（PictureBox）212下面的语句或方法中错误的有_个（其中 m和 n都为 Integer型变量） 。 Dim Arry(m, n) As Integer n=32764+5 Print m=m+n;m+n ChDrive “C:“A1 B2 C3 D413下列说法不正确的是_。AVB 允许将一个数字字符串赋值给一个数值型的变量BVB 允许使用未经说明的变量，其类型都是 Variant类型CCls 方法只清除运行时在窗体或图形框中显示的文本或图形D事件
6、过程既可建在窗体模块中，也可建在标准模块中14运行程序产生死循环时，_可以终止程序运行。A按【Ctrl】+【C】键 B按【Ctrl】+【Z】键C按【Ctrl】+【Break】键 D单击“停止运行”按钮15VB 集成开发环境可以_。A编辑、调试、运行程序，但不能生成可执行程序B编辑、生成可执行程序、运行程序，但不能调试程序C编辑、调试、生成可执行程序，但不能运行程序D编辑、调试、运行程序，也能生成可执行程序16在 VB中最基本的对象是_，它是应用程序的基石，也是其他控件的容器。A文本框 B命令按钮 C窗体 D标签17应用程序窗体的名称属性为 Frm1，窗体上有一个命令按钮，其名称属性为 Cmd1
7、，窗体和命令按钮的Click事件过程名分别为_。AForm_Click()、Command1_Click() BFrm1_Click()、Command1_Click()CForm_Click()、Cmd1_Click() DFrm1_Click()、Cmd1_Click()18多窗体程序由多个窗体组成。在缺省情况下，VB 在执行应用程序时，总是把_指定为启动窗体。A不包含任何控件的窗体 B设计时的第一个窗体C命名为 Frm1的窗体 D包含控件最多的窗体19使用_方法可将新的列表项添加到一个列表框中。APrint BAddItem CClear DRemoveItem20若希望在离开某过程后，
8、还能保存该过程中局部变量的值，则应使用_关键字在该过程中定义局部变量。ADim BPrivate CPublic DStatic21下列表达式中，值为 True的是_。AUcase(“abcd“)=“abed“ B1423Left(“ABCD“,2) DNot(Sqr(4)-3=-2)22下列_说法是不正确的。A当程序正常结束时，所有没用 Close语句关闭的文件都会自动关闭B在关闭文件或程序结束之前，可以不用 Unlock语句对已锁定的记录解锁C可以用不同的文件号同时打开一个随机文件D用 Output模式打开一个顺序文件，即使不对它进行写操作，原来内容也被清除23代数表达式 ，对应的 Vis
9、ual Basic表达式是_。)sin(2lnyxtbaxeASqr(x+Log(x)(a+b)+Exp(-t)+Sin(x+y)2)BSqr( x+Log(x)(a+b)+Exp(-t)+Sin(x+y)2)3CSqr(x+Ln(x)(a+b)+Exp(-t)+Sin(x+y)2)DSqr(x+Log(x)(a+b)+Exp(-t)+Sin(x+y2)24在程序中可以通过复选框和单选按钮的_属性值来判断它们的当前状态。ACaption BValue CChecked DSelected25在使用菜单编辑器创建菜单时，可在菜单名称中某字母前插入_符号，那么在运行程序时按【Alt】键和该字母键就
10、可打开该命令菜单。A下划线 Bk = k + 1If k Mod 5 = 0 Then PrintEnd IfNext iEnd Sub2Option ExplicitPrivate Sub Command1_Click()Dim i As Integer , a(1 To 15) As IntegerDim max As Integer, min As IntegerDim sum As IntegerRandomizeFor i=1 to 15A(i)=int(rnd*(99-80+1)+80)Print A(I);30Next IPrintMax=A(1):min=A(1)For i=2
11、 to 15If maxa(i) ThenMin=a(i)End IfNext IPrint Max, MinEnd Sub3Private Function fac(n As Integer) As Single 求 n!的递归函数If n = 0 Thenfac = 1Elsefac = n * fac(n - 1)End IfEnd FunctionPrivate Sub Form_Click()Dim e As Single, x As SingleDim k As Integere = 1: k = 1x = 1 / fac(k)Do While Abs(x) = 1E - 8e = e + xk = k + 1x = 1 / fac(k)LoopText1 = eEnd Sub4Option ExplicitPrivate Sub Form_Click()Dim i As Integer, J As Integer, a(10, 10) As IntegerFor i = 1 To 10For J = 1 To 10If i J Thena(i, J) = 1ElseIf i = J Thena(i, J) = 0Elsea(i, J) = -1End If
