vb考试题目

程序设计题1、题目：(事件)单击窗体(响应)用输入框输入一自然数，判断是"正数"、"负数或"零"，并根据输入的数用消息框显示"正数"、"负数〞或"零"。

2、题目：(事件)单击窗体。

(响应)求200~300之间既能被3整除又能被7整除的数。

并求出所有数之和存入变量SUM中3、题目：单击窗体。

(响应)S=1+1/4+1/9+1/16+1/25+…+1/100，结果输出在窗体上。

4、题目：(事件)单击窗体。

(响应)在窗体上打印数列2/1,3/2,5/3,8/5,13/8…的前10项，并求其和，将和保存在变量s中。

5、题目：(事件)双击窗体。

(响应)把一元钞票换成一分、二分和五分的硬币每种至少有一枚〕，求出其所有的换法，把结果输出在窗体上。

将所有的换法的数目存入变量N中6、题目：单击窗体。

)求1!+2!+3!+4!+5!并将结果输出到窗体上。

结果存入变量S中7、题目：(事件)单击窗体。

(响应)生成一个一维数组(10个数组元素依此为：' 15、23、72、43、96、23、3、65、88、17写程序求出这个数组中的最大值、最小值和平均值，并输出在窗体上。

将最大值，最小值，平均值分别存入变量Ma*,Min,Aver中8、题目：(事件)单击窗体。

(响应)在窗体上输出100~200之间的所有合数。

求出所有数之和存入SUM 中所谓合数是指自然数中能被1和本数整除以外,还能被其他数整除的数。

9、题目：(事件)单击窗体。

(响应)求10~20之间所有素数的乘积并输出在窗体上。

将结果存入变量L 中。

10、题目：(事件)单击窗体。

(响应)求1 - 1/2 + 1/3 - 1/4 + …… + 1/99 - 1/100的值。

将结果存入变量J中。

1题n = InputBo*("输入一个自然数")If n > 0 Thenresult = "正数"ElseIf n < 0 Thenresult = "负数"ElseIf n = 0 Thenresult = "零"End IfMsgBo* "输入的数据" & n & "为：" & result2题Dim i As IntegerFor i = 201 To 300If ((i Mod 3) = 0) And ((i Mod 7) = 0) ThenPrint (CStr(i))sum = sum + iEnd IfNe*tPrint sum3题Dim i As Integers = 0For i = 1 To 10s = s + 1 / (i ^ i)Ne*tPrint (s)4题Dim i, j, k, m As Integers = 0 :i = 2:j = 1For k = 1 To 10s = s + i / jm = jPrint (CStr(i)) & "/" & CStr(j)j = ii = i + mNe*t5题Dim i, j, k As IntegerFor i = 1 To 100For j = 1 To 50For k = 1 To 20If ((i + 2 * j + k * 5) = 100) ThenPrint (CStr(i))Print (CStr(j))Print (CStr(k))n = n + 1End IfNe*tNe*tNe*t6题Dim i, j, k As IntegerFor i = 1 To 5k = 1For j = 1 To ik = k * jNe*ts = s + kNe*tPrint (CStr(s))7题Dim a(9) As IntegerDim i, s As Integera(0) = 15：a(1) = 23：a(2) = 72 a(3) = 43：a(4) = 96：a(5) = 23 a(6) = 3：a(7) = 65：a(8) = 88a(9) = 17：ma* = a(0)：min = a(0) s = 0For i = 0 To 9If a(i) > ma* Thenma* = a(i)End IfIf a(i) < min Thenmin = a(i)End Ifs = s + a(i)Ne*taver = Int(s / 10)Print (CStr(ma*))Print (CStr(min))Print (CStr(aver))8题Dim i, j, s As IntegerFor i = 100 To 200For j = 2 To Sqr(i)If (i Mod j) = 0 ThenPrint (CStr(i))sum = sum + iE*it ForEnd IfNe*tNe*tPrint sum9题Dim i%，j%，b As Booleanl = 1：b = FalseFor i = 10 To 20For j = 2 To i - 2If i Mod j = 0 Thenb = TrueEnd IfNe*tIf b = False Thenl = l * iEnd Ifb = FalseNe*tPrint Str(l)10题Dim i As IntegerFor i = 1 To 100If i Mod 2 = 1 Thenj = j + 1 / iElseIf i Mod 2 = 0 Then j = j - 1 / iEnd IfNe*tPrint j11、题目： (事件)单击窗体。

Vb考试温习题一、填空题1.设a=2,b=3，表达式a>b 的值是_______。

FALSE2.在VB中声明符号常量的关键字是_______。

const3. 表达式10 MOD 16\4的值是_______。

24. 设A=5，B=6，C=7，D=8，表达式3>2*B OR A=C AND B<>C OR C>D 的值是_______。

False|0|5. 设a=6，b=3，c=5，那么表达式Not a>c And c=b Or b<>a+c 的值为_______。

True6. 设a=1,b=2,c=3,那么VB6.0表达式：a<b or b<c and c<a 的值是_______。

True7. 在VB中，用Dim X As Integer 语句概念的变量X，系统默许其值为_______。

08. 表示x是5的倍数逻辑表达式为_______。

X MOD 5=09. 已知a=3.5,b=5.0,c=2.5,d=True 那么表达式：a>=0 AND a+c>b+3 OR NOT d 的值是____。

False|0|零|假|假值|零值10. 用dim abc as integer 概念的变量abc,其类型是______。

整型11. 表达式"12345"<>"12345" & "ABC"的值是_______。

True12. 在VB中，字符型常量应使_______将其括起来，日期/时刻型常量应利用______将其括起来。

双引号井号13．在窗体上添加一个命令按钮，然后编写如下事件进程：Private Sub Command1_Click()a = InputBox("请输入一个整数")b = InputBox("请输入一个整数")Print a + bEnd Sub程序运行后，单击命令按钮，在输入对话框中别离输入321和456，输出结果为___。

VB二级测试题一、选择题1．文本框控件中将Text的内容全部显示为所定义的字符的属性项是（）A．PasswordChar B．需要编程来实现C．Password D．以上都不是2．不管一个对象的属性如何设置，程序运行时始终都能接收焦点的方法是（）A．用Tab键 B．用鼠标C．用方向键 D．不能实现3．如果没有在列表框中选择项目，且列表框的MultiSelect属性值为默认值（0~None），则执行语名List1.RemoveItem List1.ListIndex的结果是（）A．删除列表框的最后一项 B．删除列表框的第一项C．出错 D．删除列表框中的最后添加的一项4．下列对象中没有焦点属性的是（）A．命令按钮控件 B．窗口控件C．文本框控件 D单选框控件5．不具有输入数据功能的控件是（）控件A．文本框 B．选项按钮 C．列表框 D．窗体6．常用控件的Style属性值是（）A．字符常量 B．逻辑常量D．数值常量 D．日期常量7．以下关于复选框的说法，正确的是（）A．一个窗体上的所有复选框一次只能有一个被选中B．一个容器中的所有复选框一次只能有一个被选中C．在一个容器中的复选框可以同时有多个被选中D．无论是在容器中还是在窗体中，都可以同时选中多个复选框8．要清除已经在图片框Picture中打印的字符串而不清除图片框中的图像，应使用语句（）A．P1.Cls B．P1.picture=LoadPicture(“”)C．P1.Print”” D．P1.piture””9．要使一个图片框控件能自动地附着在窗体的一条边上，应设置它的（）属性A．Picture B．Alignment C．Border D．Align10．下列赋值语句正确的是（）A． Text1.text=Text.text+Text2.textB． =+C． Text1.Caption=T ext1.Caption+T ext2.CaptionD． Text1.Enable=Text1.Enable+Text2.Enable11．引用列表框的最后一项应使用（）A．List1.List(List1.ListCount-1) B．List1.List(List1.ListCount)C．List1.List(ListCount) D．List1.List(ListCount-1)12．要清除组合框Combol中的所有内容，可以使用（）语句A．Combo1.Cls B．Combo1.Clear C．Combo1.Delete D．Combo1.Remove 13．列表框控件中的列表内容是通过（）属性设置的A．Name B．Caption C．List D．Text14．可以用作其它控件容器的控件有（）A．窗体控件，列表控件，图像控件 B．窗体控件，文本框控件，框架控件C．窗体控件，框架控件，图片框控件 D．窗体控件，标签控件，图片控件15．组合框控件是将（）组合成一个控件A．列表框控件和文本框控件 B．标签控件和列表框控件C．标签控件和文本框控件 D．复选框控件和选项按钮控件16．要在命令按钮控件上显示图像应（）A设置Picture属性 B．实现不了C．先将Type设置为1，然后再设置Picture属性 D．以上都不对17．要在图片框P1中打印字符串“How Are You”，应使用语句（）A．Picture1.Print=“ How Are You”B．P1.Picture=LoadPicture(“How Are You”)C．P1.Print“How Are You” D．Print “How Are You”18．将字符串“hello”添加到列表框的最后，可使用（）请语句。

1、以下哪类控件能用来显示图形（）A．Label B．PictureBox C．TextBox D．OptionButton2、在某菜单中，有一菜单项（Caption）内容是”NEW”，名字（Name）是“Create”，则单击该菜单项所产生的事件过程应是（）A．Private Sub MnuNEW_Click()B．Private Sub Create_Click()C．Private Sub NEW_Click()D．Sub Mnu_Create_Click()3、下列叙述中正确的是（）A．在MDI应用程序中，每一个子窗体的菜单都显示在子窗体中B．在多文档应用中，每次可以有几个活动的子窗体进行输入/编辑C． VB的每一个窗体和控件都存在一个预定义的事件集D．改变窗体的标题也就是改变其属性窗口中的Name属性4、标签控件能够显示文本信息，决定其文本内容的属性是A) AlignmentB) CaptionC) VisibleD) BorderStyle5、为清除PictureBox控件中的图形，下列方法正确的是（）A． Set Picture.Picture = LoadPicture(“c:\Win1.bmp”, vbLPLarge, vbLPColor) B． Picture.Picture = LoadPicture(“c:\Win1.bmp”, vbLPLarge, vbLPColor) C． Set Picture.Picture = LoadPictureD． Picture.Picture = LoadPicture6、下列程序的运行结果为Dim a(-1 To 6)For i=LBound(a, 1) To UBound(a, 1)a(i) =iNext iPrint a(LBound(a, 1) ) ; a(UBound(a, 1) )A) 0 0B) -5 0C) -1 6D) 0 67、下面的数组声明语句中正确的是A. Dim gg［1,5］ As StringB. Dim gg［1 To 5,1 To 5］ As StringC. Dim gg(1 To 5) As StringD. Dim gg［1 :5,1: 5］ As String8、在窗体上画一个命令按钮(其Name属性为Command1) ，然后编写如下代码：Option Base 1Private Sub Command1_Click()Dim as=0a=Array(1,2,3,4) ; j=1For i=4 To 1 Step-1s=s+a(i) *jj=j*10Next iPrint sEnd Sub运行上面的程序，单击命令按钮，其输出结果是A) 4321 B) 1234C) 34 D) 129、以下属于Visual Basic中合法的数组元素的是A) K8 B) k［8］ C) k(0) D) k［8］10、使用语句Dim A(2) As Integer 声明数组A之后，以下说法正确的是A) A数组中的所有元素都为0B) A数组中的所有元素值不确定C) A数组中所有元素值都为EmptyD) 执行Erase A后，A数组中所有元素值都不为011、在窗体上画一个命令按钮，其名称为Command1,然后编写如下事件过程：Private Sub Command1_Click()a=12345Print Format＄(a,"000.00")End Sub程序运行后，单击命令按钮，窗体上显示的是A) 123.45 B) 12345.00C) 12345 D) 00123.4512、运行下面的程序后，输出的结果为ClsDim t(5, 5) as IntegerFor i=1 To 5: t(i, i) =1: NextFor i=1 To 5For j=1 To 5Print t(i, j) ,Next jPrintNext IA)1 1 1 1 11 1 1 1 11 1 1 1 11 1 1 1 11 1 1 1 1B) 11111C)1 0 0 0 00 1 0 0 00 0 1 0 00 0 0 1 00 0 0 0 1D) 1 1 1 1 113、下列程序段的执行结果为。

一，选择题1、如果VB环境中缺少某个窗口，一般应从主菜单__C____的下拉菜单中找到相应的激活命令。

（1分）A、编辑B、文件C、视图D、调试2、启动Visual Basic后，VB为用户建立的第一个窗体是__B____。

（1分）A、FormB、Form1C、窗体1D、窗体3、不属于一个工程文件（*.vbp）里的文件是____A__。

（1分）A、*.txt文件B、*.bas文件C、*.cls文件D、*.frm文件4、与传统的程序设计语言相比较，Visual Basic最突出的特点是__C____。

（1分）A、结构化的程序设计B、数据处理C、面向对象的可视化编程D、中文支持5、文本框中的ScrollBars属性已设置为3-Both，但却没有水平和垂直滚动条的效果，原因可能是___B___。

（1分）A、文本框中没有内容B、文本框的MultiLine属性为FalseC、文本框的MaxLength属性为0D、文本框的Locked属性是True6、能够盛放其他控件，而且是最基本的对象是___A___。

（1分）A、窗体B、图像C、标签D、文本7、任何控件都具有的属性是____C__。

（1分）A、PictureB、CaptionC、NameD、AutoSize8、窗体上有一个标签Label1和一个命名按钮Command1，当程序运行时每单击一次命令按钮，标签就向右移动一定距离。

在Command1_Click()中能完成这个功能的命令为___D___。

（1分）A、Label1.Left = 100B、Label1.Left = Label1.Left - 100C、Label1.Move 100D、Label1.Move Label1.Left + 1009、要把一个Image控件对象设置成隐藏，应设置的属性是___A___。

（1分）A、VisibleB、EnabledC、DefaultD、Cancel10、以下___B___是正确的For …Next结构。

1. 计算机网络最突出的优点是_B_____。

A、运算速度快B、共享资源C、容量大D、精度高2.下列选项中，不属于显示器主要技术指标的是__A____。

A、重量B、像素的点距C、显示器的尺寸D、分辨率3.在计算机内部用来传送、存储、加工处理的数据或指令都是以__B____形式进行的。

A、八进制码B、二进制码C、十进制码D、十六进制码4.计算机软件分系统软件和应用软件两大类，其中____B__是系统软件的核心。

A、数据库管理系统B、操作系统C、程序语言系统D、财务管理系统5.计算机存储器中，一个字节由__B___位二进制位组成。

A、32B、8C、4D、16母a的十进制码值是__dWord__d__。

A、91B、95C、96D、977.应用程序窗口中的各种工具栏可以通过(D )进行增减.A、"文件"菜单的"页面设置"命令B、"工具"菜单的"选项"命令C、"文件"菜单的"属性"命令D、"视图"菜单的"工具栏"命令8. 在EXCEL 中单元格的条件格式在(D )菜单中.A、文件B、编辑C、视图D、格式9.在Windows中,文件名MM.txt和mm.txt(C ).A、是两个文件B、不是同一个文件C、是同一个文件D、有时候是同一个文件10. 为网络提供公享资源进行管理的计算机称谓(B )A、网卡B、服务器C、网桥D、工作站11. 符号%是声明__A____类型变量的类型定义符。

B、StringC、SingleD、Integer12. 在窗体上画一个命令按钮（名称为Command1），并编写如下代码：Function Fun1(ByVal a As Integer,b As Integer) As Integer Dim t As Integert=a-bb=t+aFun1=t+bEnd FunctionPrivate Sub Command1_Click()Dim x As Integerx=10Print Fun1(Fun1(x,(Fun1 BA、11B、0C、21D、1013. 如果一个工程含有多个窗体及标准模块，则以下叙述中错误的是___C___。

一、单选题（每题1分，共76题）1.想要显示一个输入框，它的标题栏上显示“示例”，提示信息是“请输入一个正整数”，输入框内默认内容为“1”，其语句是A=InputBox(“请输入一个正整数”,”示例”,”1”)</p>B. A=InputBox(”示例”,“请输入一个正整数”,”1”)</p>C. A=InputBox(”1”,”示例”,“请输入一个正整数”)</p>D. A=InputBox(“请输入一个正整数”,”1”,”示例”)</p>2.若要使标签控件显示时不覆盖其背景内容，应设置标签控件的A. BackColor</p>B. BorderStyle</p>>C. ForeColor</p>D. BackStyle</p>3.下面变量名是错误的A. 姓名B. aC. a123D. a.1</p>4.启动窗体在程序运行后，不进行任何操作的情况下会发生A. Initialize和Load</p>B. Show</p>C. Activate</p>D. A和C</p>5.当标签的标题内容太长，需要根据标题自动调整标签的大小时，应设置标签的属性为TrueA. AutoSize</p>B. WordWrap</p>C. Enabled</p>D. Visible</p>6.语句Form1.Hide中，Hide是Form1对象的一个（&nbsp;&nbsp;）</p>A. 方法</p>B. 参数</p>C. 属性</p>D. 事件</p>7.对象窗口是用来设计（&nbsp;&nbsp;）</p>A. 应用程序的代码段</p>B. 应用程序的界面</p>C. 对象的属性</p>D. 对象的事件</p>8.如果变量赋值为str1=”练习”，var1=5，则语句Print ”第”& var1 &”次”& str1 输出的结果为A. 第5次练习</p>B. 第5次str1</p>C. 第var1次练习</p>D. 第var1次str1</p>9.假定一个VB应用程序由一个窗体模块和一个标准模块构成，为了保存该应用程序，以下正确的操作是（&nbsp;&nbsp;）</p>A. 只保存窗体模块文件</p>B. 分别保存窗体模块、标准模块和工程文件</p>C. 只保存窗体模块和标准模块文件</p>D. 只保存工程文件</p>>10.下列是窗体对象的方法而不是属性（&nbsp;&nbsp;）</p>A. Name </p>B. Move</p>C. Caption</p>D. Enabled</p>11.窗体Form1的Caption属性为frm，它的Load事件过程名为（&nbsp;&nbsp;）</p>A. Form_Load</p>B. Form1_Load</p>C. frm_Load</p>D. Me_Load</p>12.在VB程序中，语句的续行符是（&nbsp;&nbsp;）</p>A. &</p>B. _</p>C. ;</p>D. :</p>13. 在用户的应用程序执行期间发生，比如单击鼠标或按键盘中的键（&nbsp;&nbsp;）A. 方法</p>B. 属性</p>C. 事件</p>D. 工程</p>14.控件中最适合做标题的控件是。

计算机二级vb试题题目及答案一、选择题（每题2分，共20分）1. 在VB中，以下哪个选项是正确的字符串比较？A. "Hello" > "hello"B. "Hello" < "hello"C. "Hello" = "hello"D. "Hello" <> "hello"答案：B2. VB中，哪个函数可以用来计算数组中元素的个数？A. UBoundB. LBoundC. CountD. Size答案：A3. 在VB中，以下哪个选项表示创建一个名为“myForm”的窗体？A. Form myFormB. Dim myForm As FormC. Dim myFormD. Form myForm As New Form答案：D4. VB中，下列哪个选项是正确的文件打开模式？A. Open "filename" For Input As #1B. Open "filename" For Output As #1C. Open "filename" For Append As #1D. All of the above答案：D5. 在VB中，以下哪个选项是正确的数据类型？A. IntegerB. IntC. FloatD. All of the above答案：D6. VB中，哪个关键字用来声明一个变量？A. DimB. DeclareC. ConstD. All of the above答案：D7. 在VB中，以下哪个选项是正确的循环结构？A. ForB. DoC. WhileD. All of the above答案：D8. VB中，哪个函数可以用来获取当前系统日期？A. NowB. DateC. TimeD. Today答案：D9. 在VB中，以下哪个选项表示创建一个名为“myButton”的按钮？A. Button myButtonB. Dim myButton As ButtonC. Dim myButtonD. Button myButton As New Button答案：D10. VB中，哪个关键字用来结束一个程序的运行？A. EndB. ExitC. StopD. All of the above答案：D二、填空题（每题2分，共20分）1. 在VB中，使用________关键字可以声明一个全局变量。

VB 期末复习一、选择题(1) 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click()Move 500，500End Sub程序运行后，单击命令按钮，执行的操作为A) 命令按钮移动到距窗体左边界、上边界各500的位置B) 窗体移动到距屏幕左边界、上边界各500的位置C) 命令按钮向左、上方向各移动500D) 窗体向左、上方向各移动500(1) B(2) 在窗体上有若干控件，其中有一个名称为Text1的文本框。

影响Text1的Tab 顺序的属性是A) TabStop B)Enabled C) Visible D)TabIndex(2) D(3) 下列语句合法的是_____A x + y = 2B x > 2 = yC x = y > 2D x = y++参考答案： C(4) 在窗体上画一个名称为List1的列表框，为了对列表框中的每个项目都能进行处理，应使用的循环语句为A) For i=0 To List1.ListCount-1 …… Next C) For i=1 To List1.listCount…… Next (4) A(5) 以下Case 语句中错误的是A) Case 0 To 10 B) Case Is>10 C) Case Is>10 And Is<50 D) Case 3,5,Is>10(5) C(6) 以下关于图片框控件的说法中，错误的是A) 可以通过Print 方法在图片框中输出文本B) For i=0 To ListCount-1 …… Next D) For i=1 To ListCount …… NextB) 清空图片框控件中图形的方法之一是加载一个空图形C) 图片框控件可以作为容器使用D) 用Stretch属性可以自动调整图片框中图形的大小(6) D(7) 执行语句s=Len(Mid("VisualBasic",1,6))后，s的值是A) Visual B) Basic C) 6 D) 11(7) C(8) 以下叙述中错误的是A) 下拉式菜单和弹出式菜单都用菜单编辑器建立B) 在多窗体程序中，每个窗体都可以建立自己的菜单系统C) 除分隔线外，所有菜单项都能接收Click事件D) 如果把一个菜单项的Enabled属性设置为False，则该菜单项不可见(8) D(9) 在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程： Private Sub Command1_Click()a = 12345Print Format$(a, "000.00")End Sub程序运行后，单击命令按钮，窗体上显示的是A) 123.45 B) 12345.00 C) 12345 D)00123.45(9) B(10) 以下叙述中错误的是A) 一个工程可以包括多种类型的文件B) Visual Basic应用程序既能以编译方式执行，也能以解释方式执行C) 程序运行后，在内存中只能驻留一个窗体D) 对于事件驱动型应用程序，每次运行时的执行顺序可以不一样(10) C(11) 以下关于函数过程的叙述中，正确的是A) 函数过程形参的类型与函数返回值的类型没有关系B) 在函数过程中，过程的返回值可以有多个C) 当数组作为函数过程的参数时，既能以传值方式传递，也能以传址方式传递D) 如果不指明函数过程参数的类型，则该参数没有数据类型(11) A(12) 以下关于变量作用域的叙述中，正确的是A) 窗体中凡被声明为Private的变量只能在某个指定的过程中使用B) 全局变量必须在标准模块中声明C) 模块级变量只能用Private关键字声明D) Static类型变量的作用域是它所在的窗体或模块文件(12) B(13) 确定一个控件在窗体上的位置的属性是A) Width和Height B) Width或Height C) Top和Left D) Top或Left(13) C(14) 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程Private Sub Command1_Click()Text1.Text = "Visual"Me.Text1 = "Basic"Text1 = "Program"End Sub程序运行后，如果单击命令按钮，则在文本框中显示的是A) Visual B) Basic C) Program D) 出错(14) D(15) 以下关系表达式中，其值为False的是A) "ABC">"AbC" B) "the"<>"they" C) "VISUAL"=UCase("Visual") D) "Integer">"Int"(15) A(16) 语句Print 5/4*6\5 Mod 2的输出结果是A) 0 B) 1 C) 2 D) 3(16) B(17) 在窗体上画一个文本框、一个标签和一个命令按钮，其名称分别为Text1、Label1和Command1，然后编写如下两个事件过程：Private Sub Command1_Click()strText = InputBox("请输入")Text1.Text = strTextEnd SubPrivate Sub Text1_Change()Label1.Caption = Right(Trim(Text1.Text), 3)End Sub程序运行后，单击命令按钮，如果在输入对话框中输入abcdef，则在标签中显示的内容是A)空 B) abcdef C) abc D) def(17) D(18) 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click()x = -5If Sgn(x) Theny = Sgn(x ^ 2)Elsey = Sgn(x)End IfPrint yEnd Sub程序运行后，单击命令按钮，窗体上显示的是A) -5 B) 25 C) 1 D) -1(18) C(19) 一个工程中含有窗体Form1、Form2和标准模块Model1，如果在Form1中有语句Pubilc X As Integer，在Model1中有语句Pubilc Y As Integer，则以下叙述中正确的是A) 变量X、Y的作用域相同 B) Y的作用域是Model1C) 在Form1中可以直接使用X D) 在Form2中可以直接使用X和Y(19) C(20) 在窗体上画一个名称为Drive1的驱动器列表框，一个名称为Dir1的目录列表框。

vb考试试题及答案一、选择题1. VB中，用于声明变量的关键字是：A. DimB. DeclareC. ConstD. Option答案：A2. 在VB中，下列哪个选项不是合法的变量名？A. _myVarB. var2C. 123variableD. my$Var答案：C3. VB中，下列哪个选项是正确的条件语句？A. If condition ThenB. If condition Then ElseC. If condition Then Else IfD. If condition Then Else Else答案：A4. VB中，下列哪个函数用于计算字符串的长度？A. Len()B. Length()C. StrLen()D. Size()答案：A5. 在VB中，下列哪个选项是正确的循环结构？A. For i = 1 To 10B. Do While i < 10C. For Each i In arrD. All of the above答案：D二、填空题1. 在VB中，声明一个整型变量并赋值为100的语句是：________。

答案：Dim myVar As Integer = 1002. VB中，用于输出信息到立即窗口的函数是：________。

答案：Debug.Print3. VB中，用于暂停程序执行的函数是：________。

答案：Sleep4. VB中，用于获取当前日期的函数是：________。

答案：Date5. VB中，用于将字符串转换为整型的函数是：________。

答案：CInt三、简答题1. 简述VB中事件驱动编程的概念。

答案：事件驱动编程是一种编程范式，程序的执行流程由外部事件（如用户操作、系统消息等）触发，而不是由程序内部的逻辑顺序决定。

2. 描述VB中如何实现多线程编程。

答案：在VB中，可以使用Thread类或BackgroundWorker组件来实现多线程编程。

下面的138道题目，在二级考试中命中率极高。

一、选择题(1) 下面叙述正确的是(C)A. 算法的执行效率与数据的存储结构无关B. 算法的空间复杂度是指算法程序中指令（或语句）的条数C. 算法的有穷性是指算法必须能在执行有限个步骤之后终止D. 以上三种描述都不对(2) 以下数据结构中不属于线性数据结构的是(C)A. 队列(3)(4)A.(5)A. 对象(6)A.(7)A.C.(8)A. 数据模型B. 数据库管理系统C. 软件工具D. 数据库(9) 下列叙述中正确的是(C)A.数据库是一个独立的系统，不需要操作系统的支持B.数据库设计是指设计数据库管理系统C.数据库技术的根本目标是要解决数据共享的问题D.数据库系统中，数据的物理结构必须与逻辑结构一致(10) 下列模式中，能够给出数据库物理存储结构与物理存取方法的是(A) 注：P108A. 内模式B. 外模式C. 概念模式D. 逻辑模式(11) 算法的时间复杂度是指(C)A. 执行算法程序所需要的时间B. 算法程序的长度C. 算法执行过程中所需要的基本运算次数D. 算法程序中的指令条数(12) 算法的空间复杂度是指(D)A. 算法程序的长度B. 算法程序中的指令条数C. 算法程序所占的存储空间D. 算法执行过程中所需要的存储空间(13)(14)A.C.(15)(D)A.(16)A.(17)以及A.(18) 下述关于数据库系统的叙述中正确的是(A)A. 数据库系统减少了数据冗余B. 数据库系统避免了一切冗余C. 数据库系统中数据的一致性是指数据类型的一致D. 数据库系统比文件系统能管理更多的数据(19) 关系表中的每一横行称为一个(A)A. 元组B. 字段C. 属性D. 码(20) 数据库设计包括两个方面的设计内容，它们是(A)A. 概念设计和逻辑设计B. 模式设计和内模式设计C. 内模式设计和物理设计D. 结构特性设计和行为特性设计(21) 下列叙述中正确的是(A)A. 线性表是线性结构B. 栈与队列是非线性结构C. 线性链表是非线性结构D. 二叉树是线性结构(22)A.C.(23)A.C.(24)A.C.(25)A.C.(26)A. 工具B. 过程C. 方法D. 环境(27) 程序流程图（PFD）中的箭头代表的是(B) 注：P81A. 数据流B. 控制流C. 调用关系D. 组成关系(28) 在数据管理技术的发展过程中，经历了人工管理阶段、文件系统阶段和数据库系统阶段。

VB 期末复习一、选择题(1) 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click()Move 500，500End Sub程序运行后，单击命令按钮，执行的操作为A) 命令按钮移动到距窗体左边界、上边界各500的位置B) 窗体移动到距屏幕左边界、上边界各500的位置C) 命令按钮向左、上方向各移动500D) 窗体向左、上方向各移动500(1) B(2) 在窗体上有若干控件，其中有一个名称为Text1的文本框。

影响Text1的Tab 顺序的属性是A) TabStop B)Enabled C) Visible D)TabIndex(2) D(3) 下列语句合法的是_____A x + y = 2B x > 2 = yC x = y > 2D x = y++参考答案： C(4) 在窗体上画一个名称为List1的列表框，为了对列表框中的每个项目都能进行处理，应使用的循环语句为A) For i=0 To List1.ListCount-1 …… Next C) For i=1 To List1.listCount…… Next (4) A(5) 以下Case 语句中错误的是A) Case 0 To 10 B) Case Is>10 C) Case Is>10 And Is<50 D) Case 3,5,Is>10(5) CB) For i=0 To ListCount-1 …… Next D) For i=1 To ListCount …… Next(6) 以下关于图片框控件的说法中，错误的是A) 可以通过Print方法在图片框中输出文本B) 清空图片框控件中图形的方法之一是加载一个空图形C) 图片框控件可以作为容器使用D) 用Stretch属性可以自动调整图片框中图形的大小(6) D(7) 执行语句s=Len(Mid("VisualBasic",1,6))后，s的值是A) Visual B) Basic C) 6 D) 11(7) C(8) 以下叙述中错误的是A) 下拉式菜单和弹出式菜单都用菜单编辑器建立B) 在多窗体程序中，每个窗体都可以建立自己的菜单系统C) 除分隔线外，所有菜单项都能接收Click事件D) 如果把一个菜单项的Enabled属性设置为False，则该菜单项不可见(8) D(9) 在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程： Private Sub Command1_Click()a = 12345Print Format$(a, "000.00")End Sub程序运行后，单击命令按钮，窗体上显示的是A) 123.45 B) 12345.00 C) 12345 D)00123.45(9) B(10) 以下叙述中错误的是A) 一个工程可以包括多种类型的文件B) Visual Basic应用程序既能以编译方式执行，也能以解释方式执行C) 程序运行后，在内存中只能驻留一个窗体D) 对于事件驱动型应用程序，每次运行时的执行顺序可以不一样(10) C(11) 以下关于函数过程的叙述中，正确的是A) 函数过程形参的类型与函数返回值的类型没有关系B) 在函数过程中，过程的返回值可以有多个C) 当数组作为函数过程的参数时，既能以传值方式传递，也能以传址方式传递D) 如果不指明函数过程参数的类型，则该参数没有数据类型(11) A(12) 以下关于变量作用域的叙述中，正确的是A) 窗体中凡被声明为Private的变量只能在某个指定的过程中使用B) 全局变量必须在标准模块中声明C) 模块级变量只能用Private关键字声明D) Static类型变量的作用域是它所在的窗体或模块文件(12) B(13) 确定一个控件在窗体上的位置的属性是A) Width和Height B) Width或Height C) Top和Left D) Top或Left(13) C(14) 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程Private Sub Command1_Click()Text1.Text = "Visual"Me.Text1 = "Basic"Text1 = "Program"End Sub程序运行后，如果单击命令按钮，则在文本框中显示的是A) Visual B) Basic C) Program D) 出错(14) D(15) 以下关系表达式中，其值为False的是A) "ABC">"AbC" B) "the"<>"they" C) "VISUAL"=UCase("Visual") D) "Integer">"Int"(15) A(16) 语句Print 5/4*6\5 Mod 2的输出结果是A) 0 B) 1 C) 2 D) 3(16) B(17) 在窗体上画一个文本框、一个标签和一个命令按钮，其名称分别为Text1、Label1和Command1，然后编写如下两个事件过程：Private Sub Command1_Click()strText = InputBox("请输入")Text1.Text = strTextEnd SubPrivate Sub Text1_Change()Label1.Caption = Right(Trim(Text1.Text), 3)End Sub程序运行后，单击命令按钮，如果在输入对话框中输入abcdef，则在标签中显示的内容是A)空 B) abcdef C) abc D) def(17) D(18) 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click()x = -5If Sgn(x) Theny = Sgn(x ^ 2)Elsey = Sgn(x)End IfPrint yEnd Sub程序运行后，单击命令按钮，窗体上显示的是A) -5 B) 25 C) 1 D) -1(18) C(19) 一个工程中含有窗体Form1、Form2和标准模块Model1，如果在Form1中有语句Pubilc X As Integer，在Model1中有语句Pubilc Y As Integer，则以下叙述中正确的是A) 变量X、Y的作用域相同 B) Y的作用域是Model1C) 在Form1中可以直接使用X D) 在Form2中可以直接使用X和Y(19) C(20) 在窗体上画一个名称为Drive1的驱动器列表框，一个名称为Dir1的目录列表框。

一、选择1、用户在屏幕上设计出应用程序界面,并设置好对象的属性,系统便可以自动生成程序代码,这称为:( A )A、可视化程序设计B、面向对象的程序设计C、事件驱动的编程机制D、结构化程序设计2、Visual Basic的编程机制是(A)A、事件驱动B、可视化C、面向对象D、面向图形3、Visual Basic6.0开发的应用程序一般不能运行的操作系统是( B)A、WINDOWS9XB、DOSC、WINDOWSxpD、WINDOWS20004、用Visual Basic6.0开发的应用程序文件ABC经过一定的处理可以单独使用,下列有关这种处理过程正确的是( C)A、在"新建工程"对话框中选择"标准EXE"选项B、在"外接程序"中选"外接程序管理器"菜单C、在"文件"菜单中选择"生成ABC.EXE"菜单D、在"运行"菜单中选择"编译可执行"菜单5、每建立一个窗体，工程管理器窗口中就会增加一个（B）。

A、工程文件B、窗体文件C、程序模块文件D、类模块文件6、当事件能被触发时，（A）就会对该事件作出响应。

A、对象B、程序C、窗体D、控件7、不能打开属性窗口的操作是( A )A、选取"工程"菜单中的"属性窗口"子菜单项B、在对象上单击右键,从弹出的快捷菜单中选择"属性窗口"选取项C、单击工具栏中的"属性窗口"按钮D、选取"视图"菜单中的"属性窗口"子菜单项8、关于窗体上控件的基本操作错误的是:(C )A、按住SHIFT键,然后单击每个要选择的控件,可以同时选中多个控件B、按住Ctrl键,然后单击每个要选择的控件,可以同时选中多个控件C、一次DEL键只能删除一个控件D、按下一次DEL键可以同时删除多个控件9、以下声明语句中错误的是（D）。

vb上机考试试题一、单项选择题（每题2分，共20分）1. 在VB中，以下哪个关键字用于声明类模块中的属性？A. DimB. PublicC. PrivateD. Property2. VB中的“Option Explicit”语句的作用是什么？A. 定义变量类型B. 强制显式变量声明C. 隐藏变量D. 设置变量的作用域3. 在VB中，以下哪个控件用于显示图像？A. LabelB. TextBoxC. PictureBoxD. ComboBox4. 如果要为VB中的按钮控件添加点击事件，应该使用哪个事件？A. ClickB. DoubleClickC. MouseDownD. KeyPress5. 在VB中，以下哪个函数可以用于将字符串转换为数值？A. Str()B. Val()C. Chr()D. Asc()6. VB中的“Select Case”语句最多可以有多少个Case分支？A. 1B. 2C. 10D. 无限制7. 在VB中，以下哪个属性用于设置控件是否可见？A. VisibleB. EnabledC. CaptionD. Text8. 当在VB中创建一个数组时，数组的下标默认从哪个数字开始？A. 0B. 1C. 100D. -19. 在VB中，以下哪个方法用于获取文本框中输入的文本？A. TextB. CaptionC. ValueD. Name10. VB中的“With”语句用于什么目的？A. 初始化变量B. 创建对象C. 引用对象的多个属性或方法D. 定义数据类型二、填空题（每空3分，共30分）11. 在VB中，使用________关键字可以创建一个类。

12. 如果要让一个变量在整个应用程序中都可访问，应该使用________关键字声明它。

13. 在VB中，一个事件处理程序的名称通常由触发事件的控件名称、一个下划线和一个________组成。

14. 要循环遍历一个数组中的所有元素，可以使用________循环。

高中vb试题题目及答案高中VB试题题目及答案一、选择题1. VB是一种面向对象的编程语言，它的全称是什么？A. Visual BasicB. Visual C++C. Visual FoxProD. Visual Pascal答案：A2. 下列哪个是VB中的保留字？A. MyNameB. DimC. IfD. Print答案：B3. 在VB中，以下哪个语句用于定义变量？A. SubB. FunctionC. DimD. For答案：C4. VB中，哪个控件用于显示文本信息？A. LabelB. TextBoxC. ComboBoxD. CheckBox答案：A5. VB中，哪个事件用于响应按钮点击？A. ClickB. DoubleClickC. MouseDownD. MouseUp答案：A二、填空题1. 在VB中，________ 语句用于定义一个过程。

答案：Sub 或 Function2. VB中的________ 属性用于设置控件的可见性。

答案：Visible3. VB中，________ 方法用于在文本框中显示文本。

答案：Text4. VB中，________ 属性用于设置控件的标题。

答案：Caption5. VB中，________ 属性用于设置控件的背景颜色。

答案：BackColor三、简答题1. 简述VB中事件处理程序的作用。

答案：事件处理程序是VB中响应用户操作或系统生成的事件的代码块。

当特定的事件发生时，如按钮点击或表单加载，相应的事件处理程序会被执行。

2. 解释VB中的类和对象的区别。

答案：类是一个模板，定义了对象的结构和行为，而对象是类的实例，具有类定义的属性和方法，可以进行操作和交互。

四、编程题编写一个VB程序，实现以下功能：- 创建一个文本框，用于输入数字。

- 创建一个按钮，点击后将文本框中的数字转换为相反数，并在文本框中显示结果。

```vbPrivate Sub Button1_Click(ByVal sender As System.Object,ByVal e As System.EventArgs) Handles Button1.ClickDim num As Integernum = Val(TextBox1.Text)TextBox1.Text = (-num).ToString()End Sub```结束语通过本试题的练习，同学们应该对VB的基本语法、控件使用以及事件处理有了更深入的理解。

第一卷客观题第一题：是非题（共10分，每项1分）1. 函数调用时，实际参数与形式参数在数量必须完全一致。

AA.对B.错2. 标签控件即可以用来显示用户不能编辑和修改的文本，也可以用来编辑和修改文本。

BA.对B.错3. Timer是时钟控件的唯一事件。

AA.对B.错4. 用Dim语句声明变量时，VB系统不仅为变量分配相应数据类型的内在空间，而且还为变量赋所需的初值。

BA.对B.错5. 在VB系统中，没有用Dim语句声明的变量不能使用，因为它没有数据类型。

BA.对B.错6. 菜单项的快捷键不能任意设置。

AA.对B.错7. VB中的“消息”是指由一个应用程序传递到另一个应用程序的信息包。

AA.对B.错8. 每个菜单项都是一个控件，与其他控件一样也有自己的属性和事件。

AA.对B.错9. 菜单选项“Enabled”属性与“Visible”属性是相同的。

BA.对B.错10. VB6.0只能运行在Windows 2000下，不能运行在Windows 98下。

BA.对B.错第二题、单选题（共45分，每项1.5分）11. 在VB中，变量的默认类型是__C____。

A.IntegerB.DoubleC.VariantD.Currency12. 在顺序文件中__D____。

A.文件中按每条记录的记录号从小到大排序B.文件中按每条记录的长度从小到大排序C.文件中按记录的某关键数据项的从小到大的顺序D.记录是按写入的先后顺序存放的，读出也是按写入的先后顺序读出13. 利用菜单编辑器设计菜单时，如果要在菜单中加入一个分隔符，菜单分隔符的标题必须设置为__B____。

A.+B.-C.*D./14. 在Visual Basic中，最简单的数据类型包括__A____。

A.整型、实型、布尔型、字符型B.整型、实型、字符型C.整型、实型、逻辑型D.实型、逻辑型、字符型15. 使用驱动器列表框的___B___属性可以返回或设置磁盘驱动器的名称。