VB程序设计考试题库考试专用
vb程序设计试题及答案
vb程序设计试题及答案一、选择题（每题2分，共20分）1. 在VB中，下列哪个选项是正确的数据类型？A. IntegerB. DoubleC. StringD. All of the above答案：D2. VB中用于声明变量的关键字是？A. DimB. DeclareC. SetD. All of the above答案：A3. 在VB中，下列哪个选项是正确的循环语句？A. ForB. DoC. WhileD. All of the above答案：D4. VB中用于打开文件的函数是？A. OpenB. CloseC. WriteD. Read答案：A5. 在VB中，下列哪个选项是正确的条件语句？A. If...ThenB. Select CaseC. Do WhileD. All of the above答案：A6. VB中用于创建新窗体的语句是？A. Form.ShowB. Form.NewC. Form.CreateD. Form.Open答案：A7. VB中用于声明常量的关键字是？A. ConstB. DimC. StaticD. Option答案：A8. 在VB中，下列哪个选项是正确的数组声明？A. Dim arr(5) As IntegerB. Dim arr() As IntegerC. Dim arr As IntegerD. Dim arr(5) As String答案：A9. VB中用于结束程序的语句是？A. EndB. ExitC. CloseD. All of the above答案：B10. VB中用于捕获异常的语句是？A. Try...CatchB. On ErrorC. CatchD. All of the above答案：B二、填空题（每题2分，共20分）1. 在VB中，声明一个名为myVar的变量，其类型为字符串，应该使用语句________。
答案：Dim myVar As String2. VB中，用于定义一个名为myFunction的函数，返回值为整数，应该使用语句________。
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考试试卷
vb考试试卷VB考试试卷一、选择题（每题2分，共20分）1. 在VB中，以下哪个是正确的变量声明方式？A. Dim aB. Dim a = 5C. Dim a As IntegerD. Dim a As String = "Hello"2. 下列哪个是VB中的循环结构？A. IfB. ForC. SubD. Function3. VB中的数组声明方式是：A. Dim numbers(1 To 10)B. Dim numbers As Integer(1 To 10)C. Dim numbers(10)D. Dim numbers As Array = New Integer(10)4. 在VB中，以下哪个是正确的条件语句？A. If x > 0 ThenB. If x > 0C. If x > 0 ElseD. If x > 0 End If5. VB中，以下哪个是正确的函数定义方式？A. Function Add(x, y) As IntegerB. Function Add(x, y) = x + yC. Function Add(x, y) = Return x + yD. Function Add(x, y) = x + y End Function...（此处省略其他选择题）二、填空题（每空2分，共20分）1. 在VB中，使用________关键字来声明常量。
2. VB中的________结构用于执行一系列动作，直到满足某个条件。
3. 要声明一个包含10个整数的数组，可以使用________。
4. 当需要在VB中调用另一个窗体时，可以使用________方法。
5. VB中的________属性用于设置控件的可见性。
...（此处省略其他填空题）三、简答题（每题10分，共20分）1. 简述VB中的事件驱动编程的概念及其重要性。
2. 解释VB中类和对象的区别，并给出一个使用类和对象的简单示例。
vb程序设计期末考试题及答案
vb程序设计期末考试题及答案一、选择题（每题2分，共20分）1. 在VB中，以下哪个选项是正确的数据类型？A. IntegerB. DoubleC. StringD. All of the above答案：D2. 如果变量x的值是5，那么表达式x + 3的值是多少？A. 2B. 8C. 3D. 5答案：B3. 在VB中，以下哪个关键字用于定义一个过程？A. FunctionB. SubC. IfD. For答案：B4. 下列哪个选项是VB中的保留字？A. MyB. DimC. EndD. Print答案：C5. 在VB中，哪个函数用于计算一个数的平方根？A. SqrB. AbsC. RoundD. Int答案：A6. 在VB中，以下哪个选项是正确的事件处理程序的声明方式？A. Private Sub Button1_Click()B. Public Sub Button1_Click()C. Dim Sub Button1_Click()D. Sub Button1_Click() As Integer答案：A7. 在VB中，以下哪个控件用于显示文本，但用户不能编辑？A. TextBoxB. LabelC. ComboBoxD. CheckBox答案：B8. 在VB中，以下哪个选项是正确的条件语句？A. If...Then...ElseB. Case...SelectC. For...NextD. While...Do答案：A9. 在VB中，以下哪个选项是正确的循环结构？A. For Each...NextB. Do While...LoopC. Both A and BD. None of the above答案：C10. 在VB中，以下哪个函数用于将字符串转换为整数？A. CIntB. CStrC. CDblD. CLng答案：A二、填空题（每题2分，共20分）1. 在VB中，声明一个整型变量i，可以使用关键字________。
VB程序设计考试试题及答案
VB程序设计考试试题及答案月考上机试题一．选择题：(10*2)1由单精度浮点型的数据组成的字节数是A.2B.4C.8D.162.可以同时删除字符串前导和尾部空白的函数是A．LtrimB．RtrimC．TrimD．Mid3.在设计阶段，当双击窗体上的某个控件时，所打开的窗口是A.工程资源管理器窗口B.工具箱窗口C.代码窗口D.属性窗口4.在窗体上添加如下命令按钮，然后编写如下事件过程：C Private Sub Command1 _ Click()Dim a(10)As IntegerDim p(3)As Integerk=5For i=1 To 10a(i)=iNext iFor i=1 To 3p(i)=a(i*i)Next iFor i=1 To 3k=k+p(i)*2Next iPrint kEnd Sub该过程的运行结果为:A.35B.33C.31D.295.VB表达式Cos(0)+Abs(1)+Int(Rnd(1))的值是A.1B. -1C. 0D. 26.若m，x，y，均为Integer型变量，则执行下面语句后m值是m=1：X=2：Y=3m=IIf(X＞Y，X+Y，X-Y)A.-1B.0C.1D. 27.设a=″Visual Basic″，下面使b=″Basic″的语句是A.b=Left(a，8，12)B.b=Mid(a，8，5)C.b=Right(a，5，5)D.b=Left(a，8,5)8.以下不能运行工程的操作是A..执行"运行"菜单中的"启动"命令B.单击工具栏中的"启动"命令D.按下F5键 C.按下Ctrl+F5键9.下列关于面向对象程序设计的叙述不正确的是A.对象具有属性、方法等特性B.对象之间的通信产生了消息C.一个对象是一个软件构造块，它包含数据与相关的操作D.对象的属性不能被改变10.在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：Private Sub Command1 _ Click（）Static X As IntegerStatic Y As IntegerClsY=lY=Y+5X=5+XPrint X，YEnd Sub程序运行时，三次单击命令按钮Command1后，窗体上显示的结果为:A.15 16B.15 6C.15 15D.5 6二．填空题（3*4）1.计算1*2*3*...*3000，当积大于3000时停止计算。
vb考试题及答案
vb考试题及答案一、单选题（每题2分，共20分）1. 在VB中，以下哪个关键字用于声明变量？A. DimB. SubC. FunctionD. Const答案：A2. VB中的“Mid”函数用于什么？A. 计算字符串长度B. 计算字符串的ASCII值C. 从字符串中提取子字符串D. 将字符串转换为大写答案：C3. 以下哪个是VB中的流程控制语句？A. IfB. ForC. NextD. All of the above答案：D4. 在VB中，如何声明一个整型变量？A. Dim x As IntegerB. Integer xC. x = IntegerD. x Integer答案：A5. VB中的“Print”方法用于做什么？A. 打印文档B. 在窗体上显示文本C. 打印窗体D. 显示错误信息答案：B6. 在VB中，以下哪个不是基本数据类型？A. IntegerB. StringC. DateD. Object答案：D7. VB中的“Select Case”语句用于什么？A. 循环控制B. 条件分支C. 数据类型转换D. 异常处理答案：B8. 在VB中，如何将一个变量的值赋给另一个变量？A. x = yB. x := yC. x = y = zD. x = (y)答案：A9. VB中的“Do While”循环在什么条件下执行？A. 条件为真时B. 条件为假时C. 条件未知时D. 从不执行答案：A10. 在VB中，以下哪个不是集合（Collection）的方法？A. AddB. RemoveC. CountD. Find答案：D二、多选题（每题3分，共15分）1. VB中，哪些是合法的变量名？A. _nameB. 2nameC. name$D. name答案：A, D2. 在VB中，哪些是合法的常量声明？A. Const pi = 3.14B. Const pi = "3.14"C. Const pi = 3.14DD. Const pi = 3.14F答案：A, C, D3. VB中，哪些是合法的数组声明？A. Dim arr(5) As IntegerB. Dim arr(5 To 10) As IntegerC. Dim arr() As Integer = New Integer(10) {}D. Dim arr(,) As Integer = New Integer(,) {{1, 2}, {3, 4}} 答案：A, C, D4. 在VB中，哪些是合法的函数调用？A. MsgBox("Hello World")B. Int(123.456)C. UCase("Hello World")D. LCase("HELLO WORLD")答案：A, B, C, D5. VB中，哪些是合法的循环控制语句？A. For i = 1 To 10B. While TrueC. Do Until FalseD. For Each item In collection答案：A, B, C, D三、判断题（每题1分，共10分）1. VB中，所有变量都必须在使用前声明。
2024年VB语言程序设计试题库
ＶB程序设计一、判断题1．同一Ｆoｒm窗体中的各控件能够相互重叠，其显示的上下层次的次序不能够调整。
（X ）ﻫ2．一个对象的若能识别多个事件,我们只能对其中一个事件编程( )ﻫ3．单项选择按钮与复选框对象的Vａlｕe属性类型不一样，且只能取值Ｔrｕｅ和Falｓe。
（√ )4. 事件过程由某个用户事件或系统事件触发执行,它不能被其他过程调用。
( )5． 图片框的Move措施不但能够移动图片框,并且还能够变化该图片框的大小，同时也会变化该图片框有关属性的值。
( √ )6. “A=B=C”是一个合法的Vｉsual Bａsic语句。
( )７. 当在一个简单组合框的文本框中输入一个它的列表框中没有的条目时，组合框会自动把这一条目添加到它的列表框中。
（ )ﻫ8. Visｕal Bａsｉｃ程序的运行能够从 Ｍａiｎ（）过程开启,也能够从某个窗体开启。
( √ ）ﻫ９. 在图片框中放置的控件既能够在该图片框内移动,也能够移出该图片框外。
( ）１0. 对于文献系统控件，当驱动器控件Drivｅl中的驱动器符变化时，文献夹列表控件Dir1中显示的文献夹也作对应的变化,能够在Dｒive1中的Cｈange事件中使用如下命令。
Dｉｒ1. Path＝ Drivｅ1．Ｄrｉve( √）11. 滚动条控件可作为用户输入数据的一个措施。
（ √）ﻫ１２．单项选择按钮控件和复选框控件都具备Vaｌuｅ属性，它们的作用完全相同。
( ）ﻫ13. 静态变量是一个局部变量，当原过程再次被执行时，静态变量的初值是上一次过程调用后的值。
( √ )ﻫ14． Vｉsual Basｉｃ提供的几个标准坐标系统的原点都是在绘图区域的左上角，假如要把坐标原点放在其他位置，则需使用自定义坐标系统。
（√ ）ﻫ15．注释语句ＲＥM可自成一语句。
( √ )ﻫ１6．用鼠标选中某菜单控件时，触发Clｉcｋ事件；而用键盘选中该菜单控件时，触发 KeyPress（ ）17．组合框兼有文本框和列表框二者的功效,用户能够通过键人文本或选择列表中的项目来进行选择。
大学vb考试及答案
大学vb考试及答案一、单项选择题（每题2分，共40分）1. VB中，以下哪个是合法的变量名？A. 123abcB. _2abcC. 3abcD. abc123答案：B2. 在VB中，以下哪个是整型数据类型？A. IntegerB. DoubleC. StringD. Boolean答案：A3. VB中，以下哪个是字符串数据类型？A. IntegerB. DoubleC. StringD. Boolean答案：C4. 在VB中，以下哪个是布尔型数据类型？A. IntegerB. DoubleC. StringD. Boolean答案：D5. VB中，以下哪个是浮点型数据类型？A. IntegerB. DoubleC. StringD. Boolean答案：B6. 在VB中，以下哪个是字符型数据类型？A. IntegerB. DoubleC. StringD. Char答案：D7. VB中，以下哪个是数组声明的正确方式？A. Dim arr(10) As IntegerB. Dim arr As Integer(10)C. Dim arr(10)D. Dim arr As Integer答案：A8. 在VB中，以下哪个是正确的函数声明？A. Function myFunction() As IntegerB. Function myFunction As IntegerC. Sub myFunction() As IntegerD. Sub myFunction As Integer答案：A9. VB中，以下哪个是正确的子程序声明？A. Function mySub() As IntegerB. Function mySub As IntegerC. Sub mySub() As IntegerD. Sub mySub As Integer答案：D10. 在VB中，以下哪个是正确的条件语句？A. If x > 0 ThenB. If x = 0 ThenC. If x < 0 ThenD. All of the above答案：D11. VB中，以下哪个是正确的循环语句？A. For i = 1 To 10B. For i = 10 To 1 Step -1C. For i = 1 To 10 Step 2D. All of the above答案：D12. 在VB中，以下哪个是正确的选择语句？A. Select Case xB. Case xC. End SelectD. All of the above答案：D13. VB中，以下哪个是正确的错误处理语句？A. On Error Resume NextB. On Error GoTo 0C. On Error GoTo -1D. All of the above答案：A14. 在VB中，以下哪个是正确的文件操作语句？A. Open "file.txt" For Input As 1B. Open "file.txt" For Output As 1C. Open "file.txt" For Append As 1D. All of the above答案：D15. VB中，以下哪个是正确的窗体属性？A. CaptionB. TextC. NameD. All of the above答案：D16. 在VB中，以下哪个是正确的控件属性？A. TextB. CaptionC. NameD. All of the above答案：D17. VB中，以下哪个是正确的事件处理程序？A. Sub Form_Click()B. Sub Form_Click(ByVal sender As Object, ByVal e As EventArgs)C. Sub Form_Click(ByVal sender As Object)D. All of the above答案：A18. 在VB中，以下哪个是正确的控件事件？A. ClickB. DoubleClickC. MouseDownD. All of the above答案：D19. VB中，以下哪个是正确的控件类型？A. LabelB. TextBoxC. ButtonD. All of the above答案：D20. 在VB中，以下哪个是正确的数据访问对象？A. ADOB. DAOC. RDOD. All of the above答案：D二、填空题（每题2分，共20分）21. VB中，声明一个整型变量x，其语句为：_________。
vb考试试题及答案
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组件来实现多线程编程。
vb上机考试题库及答案86套
vb上机考试题库及答案86套一、单项选择题（每题2分，共10题，共20分）1. 在VB中，以下哪个关键字用于声明变量？A. DimB. SubC. FunctionD. Const答案：A2. VB中，以下哪个函数用于计算两个数的和？A. SumB. AddC. SqrD. Abs答案：A3. 在VB中，以下哪个属性用于设置控件的可见性？A. VisibleB. EnabledC. CaptionD. Name答案：A4. VB中，以下哪个事件用于响应鼠标单击？A. ClickB. DoubleClickC. MouseDownD. MouseUp答案：A5. 在VB中，以下哪个控件用于显示文本？A. LabelB. TextBoxC. ComboBoxD. ListBox答案：A6. VB中，以下哪个关键字用于循环遍历数组？A. ForB. DoC. WhileD. Loop答案：A7. 在VB中，以下哪个函数用于将字符串转换为整数？A. CIntB. CStrC. CDblD. CLng答案：A8. VB中，以下哪个属性用于设置文本框的只读状态？A. ReadOnlyB. MultiLineC. PasswordCharD. TextAlign答案：A9. 在VB中，以下哪个事件用于响应键盘按键？A. KeyDownB. KeyUpC. KeyPressD. MouseClick答案：C10. VB中，以下哪个控件用于选择日期？A. ComboBoxB. ListBoxC. MonthViewD. DateTimePicker答案：D二、填空题（每题2分，共5题，共10分）1. 在VB中，使用________关键字可以声明一个变量。
答案：Dim2. VB中的________函数可以返回一个随机数。
答案：Rnd3. 在VB中，使用________属性可以设置控件的背景颜色。
答案：BackColor4. VB中，使用________事件可以响应文本框内容的改变。
vb考试题和答案
vb考试题和答案**VB考试题和答案**一、选择题（每题2分，共20分）1. 在VB中，以下哪个不是基本数据类型？A. IntegerB. StringC. DoubleD. Object答案：D2. VB中，以下哪个关键字用于声明常量？A. DimB. ConstC. PrivateD. Public答案：B3. 在VB中，以下哪个函数用于计算两个数的和？A. Sum()B. Add()C. Plus()D. Abs()答案：A4. VB中，以下哪个控件用于显示文本？A. LabelB. TextBoxC. ComboBoxD. CheckBox答案：A5. 在VB中，以下哪个事件用于响应按钮点击？A. ClickB. DoubleClickC. MouseDownD. MouseUp答案：A6. VB中，以下哪个属性用于设置窗体的标题？A. CaptionB. TextC. TitleD. Name答案：A7. 在VB中，以下哪个关键字用于循环结构？A. ForB. WhileC. DoD. All of the above答案：D8. VB中，以下哪个函数用于获取当前日期？A. Now()B. Date()C. Time()D. Today()答案：B9. 在VB中，以下哪个属性用于设置文本框的只读状态？A. ReadOnlyB. EnabledC. VisibleD. MultiLine答案：A10. VB中，以下哪个控件用于选择文件？A. OpenFileDialogB. SaveFileDialogC. DirListBoxD. DriveListBox答案：A二、填空题（每题2分，共20分）1. VB中，声明变量的关键字是________。
答案：Dim2. 在VB中，使用________函数可以获取系统当前时间。
答案：Now()3. VB中，使用________事件可以响应文本框内容的改变。
vb程序设计编程考试题及答案
vb程序设计编程考试题及答案一、单项选择题（每题2分，共20分）1. 在Visual Basic中，下列哪个选项是正确的数据类型？A. IntegerB. RealC. StringD. All of the above答案：D2. 以下哪个函数用于将字符串转换为数值？A. ValB. StrC. ChrD. Asc答案：A3. 在Visual Basic中，下列哪个关键字用于定义一个过程？A. FunctionB. SubC. ClassD. Property答案：B4. 如果变量x的值是5，那么表达式"x > 3 And x < 7"的值是什么？A. TrueB. FalseC. NullD. Empty答案：A5. 在Visual Basic中，下列哪个控件用于显示文本，但不允许用户编辑？A. TextBoxB. LabelC. ComboBoxD. CheckBox答案：B6. Visual Basic中的哪个事件会在窗体加载时触发？A. ClickB. LoadC. MouseDownD. KeyDown答案：B7. 在Visual Basic中，下列哪个选项是正确的数组声明方式？A. Dim arr(5)B. Dim arr As Integer(5)C. Dim arr(5) As IntegerD. Dim arr As Integer答案：C8. 下列哪个关键字用于在Visual Basic中创建一个类？A. FunctionB. SubC. ClassD. Module答案：C9. 在Visual Basic中，下列哪个控件允许用户从预定义的列表中选择一个项目？A. TextBoxB. ListBoxC. ComboBoxD. CheckBox答案：C10. 如果变量x的值是10，那么表达式"x Mod 3"的结果是什么？A. 1B. 2C. 3D. 0答案：B二、填空题（每题3分，共30分）1. 在Visual Basic中，使用________关键字可以声明一个变量。
vb考试题及答案解析
vb考试题及答案解析VB考试题及答案解析1. 以下哪个选项是Visual Basic的简称？A. VBAB. VBSC. VBD. VBScript答案：C解析： Visual Basic的简称是VB，而VBA是Visual Basic for Applications的缩写，VBS是Visual Basic Script的缩写，VBScript是一种脚本语言。
2. 在Visual Basic中，以下哪个关键字用于声明一个变量？A. DimB. SubC. FunctionD. Const答案：A解析： Dim关键字用于声明变量，Sub关键字用于声明一个过程，Function用于声明一个函数，而Const用于声明一个常量。
3. 如果要在一个窗体上显示文本“Hello, World!”，以下哪个代码段是正确的？A. Label1.Text = "Hello, World!"B. Form1.Caption = "Hello, World!"C. TextBox1.Text = "Hello, World!"D. Button1.Text = "Hello, World!"答案：B解析： Form1.Caption属性用于设置窗体的标题栏文本，因此选项B是正确的。
Label1是标签控件，TextBox1是文本框控件，Button1是按钮控件，它们用于显示文本，但不是设置窗体标题。
4. 如何在Visual Basic中创建一个数组？A. Dim numbers(5) As IntegerB. Dim numbers As Integer(5)C. Dim numbers = New Integer(5)D. Dim numbers(5) As Integer()答案：D解析：在Visual Basic中，创建数组的正确方式是声明一个数组变量，并指定数组的类型和大小。
vb考试试题及答案解析
vb考试试题及答案解析**VB考试试题及答案解析**一、单项选择题（每题2分，共20分）1. 在VB中，以下哪个选项不是基本数据类型？A. IntegerB. StringC. DoubleD. Object**答案：D****解析：** 在VB中，Integer、String和Double都是基本数据类型，而Object是一个引用数据类型。
2. VB中哪个函数用于将字符串转换为数值？A. Str()B. Val()D. CStr()**答案：B****解析：** Val()函数用于从字符串的开始处起，取尽可能多的字符，直到出现非数值字符，然后将这部分字符串转换为数值。
3. 在VB中，以下哪个是正确的循环结构？A. for...nextB. while...end whileC. do...loopD. All of the above**答案：D****解析：** VB支持多种循环结构，包括for...next、while...wend以及do...loop。
4. VB中哪个关键字用于声明一个过程？A. FunctionC. PropertyD. Both A and B**答案：D****解析：** 在VB中，Sub和Function都是用来声明过程的关键字，其中Sub用于无返回值的过程，Function用于有返回值的过程。
5. 下列哪个选项不是VB中的控件事件？A. ClickB. LoadC. MouseEnterD. Open**答案：D****解析：** Click、Load和MouseEnter都是VB中常见的控件事件，而Open是文件操作的语句，不是事件。
6. 在VB中，哪个关键字用于声明数组？A. DimB. ReDimC. Both A and BD. None of the above**答案：C****解析：** Dim用于声明数组，而ReDim用于重新定义数组的大小。
7. VB中哪个函数用于获取当前日期？A. Now()B. Date()C. Time()D. Both A and B**答案：D****解析：** Now()和Date()都可以获取当前日期，Now()返回的是日期和时间，而Date()只返回日期。
(完整word版)VB程序设计试题题库及答案
VB程序设计笔试题题库一、选择题1 以下常量中，是 Integer种类常量的是（C ）。
A、123&B、-38844C、123%D、327682 下边选项中 () 是字符连结运算符 . （ A ）A、&B、AndC、%D、Mod3下边关于 VB 的集成开发环境（ IDE ）的叙述中，不正确的是（B ）。
A、IDE是设计、调试、运转 VB程序的工具。
B、用户不可以任意封闭 IDE中的窗口。
C、" 窗体设计 " 窗口是用来设计应用程序界面（窗体）的。
D、翻开 / 封闭各窗口的命令主要在 IDE的" 视图 " 菜单中。
4 len( “程vb序设计”)=( C ) 。
A、 5B、2C、 6D、105 表达式 15 Mod 4 + 13 \ 5 * 2 的值是 DA、7B、0C、2D、46 赋值语句 A=123 + Mid$( “123456”,3,2)履行后， A= （ A ）。
A、157B、12334C、123D、"12334"7 在一个语句内写多条语句时 , 用来分开每条语句的符号是 ( C ).A、,B、;C、:D、、8 将逻辑型数据变换成整型数据时，变换规则是（ D ）。
A、将 True 变换为 1 ，将 False 变换为 0B、将 True 变换为 1 ，将 False 变换为 -1C、将 True 变换为 0 ，将 False 变换为 -1D、将 True 变换为 -1 ，将 False 变换为 09 表达式 2+3*4^5-SIN(X+1)/2 中最初进行的运算是 ( D ).A、SINB、4^5C、3*4D、x+110 假如 x=2 ，则表达式And 3>x+3 的值（ B ）。
A、不可以计算B、 TrueC、5D、False11 随机产生 [10，50] 之间整数的正确表达式是（ D ）。
A、Round( Rnd*50)B、 Int(Rnd*40+10)C、Round( Rnd*51)D、 10+Int(Rnd*41)12 每成立一个窗体 , 工程管理器窗口中就会增添一个 ( C ).A、类模块文件B、工程文件C、窗体文件D、程序模块文件13 INT(100*RND(1)) 产生的随机整数的闭区间是 ( B ).A、[1,100]B、[0,99]C、[0,100]D、[1,99]14以下数据种类中 , 占用内存最小的是 ( D ). A、IntegerB、SingleC、BooleanD、Byte15 VisualBasic是一种( B ) 程序设计语言 .A、过程式B、非过程式C、机器D、初级16函数 Int(10*Rnd) 是在 ( A ) 范围内的整数 . A、[0,9]B、[0,1]C、[1,9]D、[1,10]17 以下合法的一组 Visual Basic 用户表记符是（ C ）A、Sum 和 8abcB、a#x 和 PiC、ForLoop 和 TotalD、Const 和 DoWhile18 函数 Len(Str(Val("123.4"))) 的值为 ( B ).A、5B、6C、8D、1119 Int(198.555*100+0.5)/100 的值为（ B ）A、B、C、200D、19820以下各表达式中 , 计算结果为 0的是 ( A ). A、FIX(12.4)+FIX(-12.6)B、CINT(12.4)+CINT(-12.6)C、INT(12.4)+INT(-12.6)D、FIX(13.6)+FIX(-12.6)21 MsgBox() 的正确语法是（D）。
vb考试题及答案解析
vb考试题及答案解析一、单选题（每题2分，共20分）1. 在Visual Basic中，以下哪个关键字用于声明变量？A. DimB. ConstC. SubD. Function答案：A2. 如果一个变量被声明为Static，那么它的生命周期是？A. 仅在过程调用期间B. 直到程序结束C. 直到应用程序结束D. 直到模块结束答案：B3. 在Visual Basic中，以下哪个函数用于计算一个数的平方根？A. SqrB. PowC. AbsD. Round答案：A4. Visual Basic中的哪个控件用于显示文本，但不能编辑？A. TextBoxB. LabelC. ComboBoxD. CheckBox答案：B5. 在Visual Basic中，以下哪个事件用于响应按钮点击？A. ClickB. LoadC. ChangeD. KeyDown答案：A6. Visual Basic中，以下哪个属性用于设置文本框的只读状态？A. ReadOnlyB. EnabledC. VisibleD. MultiLine答案：A7. 在Visual Basic中，以下哪个关键字用于退出当前的过程？A. ExitB. ReturnC. EndD. Stop答案：A8. Visual Basic中，以下哪个控件用于显示下拉列表？A. ListBoxB. ComboBoxC. CheckBoxD. OptionButton答案：B9. 在Visual Basic中，以下哪个函数用于将字符串转换为数字？A. ValB. StrC. ChrD. Asc答案：A10. Visual Basic中，以下哪个属性用于设置窗体的标题？A. CaptionB. TextC. TitleD. Label答案：A二、判断题（每题1分，共10分）1. Visual Basic是一种面向对象的编程语言。
（正确）2. 在Visual Basic中，所有变量都必须在使用前声明。
vb程序设计教程期末复习题及答案
vb程序设计教程期末复习题及答案一、选择题1. 在VB中，以下哪个选项是正确的数据类型？A. IntegerB. DoubleC. StringD. All of the above答案：D2. 以下哪个是VB中的过程？A. FunctionB. SubC. Both A and BD. None of the above答案：C3. 在VB中，哪个关键字用于声明变量？A. DimB. DeclareC. ConstD. Option答案：A4. VB中的哪个控件用于显示文本，但不能编辑？A. TextBoxB. LabelC. ComboBoxD. CheckBox答案：B5. 如何在VB中创建一个事件处理程序？A. 使用On关键字B. 使用Handles关键字C. 使用WithEvents关键字D. 使用Event关键字答案：B二、填空题1. VB中的________关键字用于声明一个数组。
答案：Dim2. 在VB中，________方法用于结束一个循环。
答案：Exit3. VB中的________控件允许用户从列表中选择一个或多个项目。
答案：ComboBox4. 使用________方法可以在VB中打开一个文件。
答案：Open5. VB中的________函数用于计算字符串的长度。
答案：Len三、简答题1. 描述VB中如何使用If...Then...Else语句。
答案：If...Then...Else语句用于根据条件执行不同的代码块。
如果条件为真，则执行Then后面的代码；如果条件为假，则执行Else 后面的代码。
2. 解释VB中的继承是如何工作的。
答案：在VB中，继承允许一个类（子类）继承另一个类（父类）的属性和方法。
子类可以扩展或重写父类的功能，但不能访问父类的私有成员。
3. 什么是VB中的多态性？答案：多态性是指允许不同类的对象对同一消息做出响应的能力。
在VB中，多态性通常是通过接口或抽象类实现的，允许子类以自己的方式实现接口或抽象类中定义的方法。
vb考试试卷
vb考试试卷VB考试试卷一、选择题（每题2分，共20分）1. 在VB中，以下哪个是正确的数据类型？A. IntegerB. IntC. StrD. All of the above2. 下列哪个选项不是VB中的控制结构？A. If...Then...ElseB. For...NextC. While...WendD. Switch...Case3. VB中的数组声明方式，以下哪个是正确的？A. Dim arr(5) As IntegerB. Dim arr[5] As IntegerC. Dim arr(5) As StringD. Dim arr(5) As Double4. 在VB中，下列哪个函数用于将字符串转换为数值？A. StrConvB. CStrC. ValD. CInt5. VB中，以下哪个是合法的变量名？A. 2variableB. variable2C. _variableD. Variable$6. 下列哪个选项是VB中的正确事件？A. ClickB. OnClickC. ClickEventD. OnClickEvent7. 在VB中，下列哪个选项不是窗体的属性？A. NameB. TextC. CaptionD. Color8. VB中，下列哪个选项不是控件的属性？A. ValueB. TextC. FontD. Size9. 在VB中，下列哪个选项不是常用的文件操作函数？A. OpenB. CloseC. SeekD. Find10. VB中，下列哪个选项不是错误处理的关键字？A. On Error Resume NextB. On Error GoToC. On Error GoSubD. On Error GoTo 0二、填空题（每空1分，共20分）1. VB中的________函数用于获取当前日期。
2. 在VB中，使用________关键字可以声明一个变量。
3. VB中，使用________语句可以创建一个循环。
vb程序设计考试题库及答案
vb程序设计考试题库及答案一、单项选择题（每题2分，共40分）1. 在VB中，以下哪个选项是正确的数据类型？A. IntegerB. IntC. RealD. All of above答案：D2. VB中，哪个函数用于计算两个数的最大值？A. MinB. MaxC. AbsD. Sgn答案：B3. 在VB中，以下哪个是合法的变量名？A. 2variableB. variable2C. _variableD. All of above答案：D4. VB中，以下哪个是正确的循环结构？A. For EachB. For AllC. Do WhileD. All of above答案：D5. 在VB中，以下哪个是正确的条件语句？A. If...Then...ElseB. Switch...CaseC. Select...CaseD. All of above答案：D6. VB中，哪个函数用于计算一个数的绝对值？A. AbsB. RoundC. SqrD. Int答案：A7. 在VB中，以下哪个是合法的数组声明？A. Dim arr(10) As IntegerB. Dim arr() As Integer = New Integer(10)C. Both A and BD. None of the above答案：C8. VB中，哪个函数用于将字符串转换为大写？B. UCaseC. StrCompD. StrConv答案：B9. 在VB中，以下哪个是正确的事件处理程序的声明方式？A. Private Sub Form_Click()B. Public Sub Form_Click()C. Both A and BD. None of the above答案：A10. VB中，哪个函数用于计算一个数的平方根？A. SqrB. PowC. ExpD. Log11. 在VB中，以下哪个是正确的文件打开模式？A. Open For InputB. Open For AppendC. Open For RandomD. All of above答案：D12. VB中，哪个函数用于计算一个数的指数？A. SqrB. PowC. ExpD. Log答案：B13. 在VB中，以下哪个是正确的窗体属性？A. CaptionC. Both A and BD. None of the above答案：C14. VB中，哪个函数用于计算一个数的自然对数？A. SqrB. PowC. ExpD. Log答案：D15. 在VB中，以下哪个是正确的控件事件？A. ClickB. DoubleClickC. Both A and BD. None of the above答案：C16. VB中，哪个函数用于计算一个数的四舍五入？A. RoundB. IntC. FixD. Sgn答案：A17. 在VB中，以下哪个是正确的控件属性？A. NameB. CaptionC. Both A and BD. None of the above答案：C18. VB中，哪个函数用于计算一个数的符号？A. AbsB. SgnC. RoundD. Int答案：B19. 在VB中，以下哪个是正确的控件事件？A. KeyPressB. KeyDownC. Both A and BD. None of the above答案：C20. VB中，哪个函数用于计算一个数的固定整数部分？A. RoundB. IntC. FixD. Sgn答案：C二、填空题（每题2分，共20分）21. VB中，使用________函数可以将一个字符串转换为小写。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
程序设计题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写程序求出这个数组中的最大值、最小值和平均值，并输出在窗体上。
将最大值，最小值，平均值分别存入变量Max,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 = InputBox("输入一个自然数")If n > 0 Thenresult = "正数"ElseIf n < 0 Thenresult = "负数"ElseIf n = 0 Thenresult = "零"End IfMsgBox "输入的数据" & 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 IfNextPrint sum3题Dim i As Integers = 0For i = 1 To 10s = s + 1 / (i ^ i)NextPrint (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 + mNext5题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 IfNextNextNext6题Dim i, j, k As IntegerFor i = 1 To 5k = 1For j = 1 To ik = k * jNexts = s + kNextPrint (CStr(s))7题Dim a(9) As IntegerDim i, s As Integera(0) = 15：a(1) = 23：a(2) = 72a(3) = 43：a(4) = 96：a(5) = 23a(6) = 3：a(7) = 65：a(8) = 88a(9) = 17：max = a(0)：min = a(0)s = 0For i = 0 To 9If a(i) > max Thenmax = a(i)End IfIf a(i) < min Thenmin = a(i)End Ifs = s + a(i)Nextaver = Int(s / 10)Print (CStr(max))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 + iExit ForEnd IfNextNextPrint 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 IfNextIf b = False Thenl = l * iEnd Ifb = FalseNextPrint Str(l)10题Dim i As IntegerFor i = 1 To 100If i Mod 2 = 1 Thenj = j + 1 / iElseIf i Mod 2 = 0 Thenj = j - 1 / iEnd IfNextPrint j11、题目： (事件)单击窗体。
(响应)如果一个数的真因子之和等于这个数本身，则称这样的数为“完全数”。
例如，整数28的真因子为1、2、4、7、11，其和是28。
因此28是一个完全数。
请编写一个程序，求出500以内最大的完全数。
并存入变量SUM 中。
使用for...next语句完成程序12、题目：应用选择法对数组A按升序排列13、题目：单击窗体。
求一个数,它除3余2，除5余3，除7余2，请将满足上面条件的最小数保存到sum变量中。
使用for...next 语句完成程序。
14、题目：编写函数fun，函数的功能是：判断一个字符是字母字符、数字字符还是其他字符，并做相应的显示。
字母字符显示字符串"字母"，数字字符显示字符串"数字"，其他字符显示字符串"其他"，要求使用IF语句来实现。
Private Function fun(n As String) As String'**********Program**********'********** End **********End FunctionPrivate Sub Form_Load()ShowPrint fun("A")Print fun("9")Print fun("&")NJIT_VBEnd SubPrivate Sub NJIT_VB()Dim i As IntegerDim l As IntegerDim a(10) As String * 1Dim fIn As IntegerDim fOut As IntegerfIn = FreeFileOpen App.Path & "\in.dat" For Input As #fInfOut = FreeFileOpen App.Path & "\out.dat" For Output As #fOutFor i = 1 To 10Line Input #fIn, a(i)Print #fOut, fun(a(i))NextClose #fInClose #fOutEnd Sub15、题目：编写函数fun，函数的功能是：根据一个百分制成绩mark（整数），显示对应五级制的评定。
条件如下：'mark大于等于90显示"优秀"'mark小于90且大于等于80显示"良好"'mark小于80且大于等于70显示"中等"'mark小于70且大于等于60显示"及格"'mark小于60显示"不及格"'要求使用IF语句来实现。
Private Function fun(mark As Integer) As String'**********Program**********'********** End **********End FunctionPrivate Sub Form_Load()ShowPrint fun(90)NJIT_VBEnd SubPrivate Sub NJIT_VB()Dim i As IntegerDim s As StringDim a(10) As IntegerDim fIn As IntegerDim fOut As IntegerfIn = FreeFileOpen App.Path & "\in.dat" For Input As #fInfOut = FreeFileOpen App.Path & "\out.dat" For Output As #fOutFor i = 1 To 10Line Input #fIn, sa(i) = Val(s)Print #fOut, fun(a(i))NextClose #fInClose #fOutEnd Sub16、题目：编写函数fun，函数的功能是：当x的初值为10，每年增长率为千分之八，计算多少年以后x的值能达到y，并显示所需年数的值（变量名必须为n）。
'要求使用Do While ... Loop语句来实现。
Private Function fun(y As Single) As LongDim x As Single, n As Long'**********Program**********'********** End **********End FunctionPrivate Sub Form_Load()ShowPrint fun(15)NJIT_VBEnd SubPrivate Sub NJIT_VB()Dim i As IntegerDim a(10) As StringDim fIn As IntegerDim fOut As IntegerfIn = FreeFileOpen App.Path & "\in.dat" For Input As #fInfOut = FreeFileOpen App.Path & "\out.dat" For Output As #fOutFor i = 1 To 10Line Input #fIn, a(i)Print #fOut, Trim(Str(fun(Val(a(i)))))NextClose #fInClose #fOutEnd Sub17、题目：编写函数fun，函数的功能是：求从m到n的乘积并显示，'如：m为2，n为4时，显示"24"'存储连乘的乘积的变量必须为Product'要求使用For语句来实现。