大学计算机VB程序设计考试题目
计算机程序设计-VisualBasic【VB】考试试题(1)
A、 AutoSize B、 Visible C、 Enabled D、 WordWrap 正确答案： A 解析：
42、当文本框的 MaxLength 属性值取________时，该文本框能容纳的字符数最多。
A、 256 B、 512 C、 0 D、 -1 正确答案： C 解析：
43、在一行语句内写多条语句时，每个语句之间用_____ ___符号分隔。
A、 ； B、 : C、 ， D、 、 正确答案： B 解析：
44、结构化程序由三种基本结构组成，下面术语中是三种基本结构之一的是______ _。
A、 递归结构 B、 选择结构 C、 输入输出结构 D、 过程结构 正确答案： B 解析：
45、在默认情况下，InputBox() 函数返回值的类型为______ __。
8、下列关于 VB 编程的说法中，不正确的是（ ）。
A、 事件是能被对象识别的动作 B、 方法指示对象的行为 C、 属性是描述对象特征的数据 D、 VB 程序采用的运行机制是面向对象 正确答案： D 解析：
9、下面所列符号中，_________不是数据类型说明符。
A、 !
B、 % C、 ？ D、 # 正确答案： C 解析：
A、 0.01*Int(100*(x+0.005)) B、 0.01*Int(x+0.005) C、 0.01*Int(100*(x+0.05)) D、 0.01*Int(x+0.05) 正确答案： A 解析：
24、从字符串变量 Cstr 中取左边 4 个字符，应使用________。
A、 Left(Cstr，4) B、 Left(Cstr，1，4) C、 Mid(Cstr，3，4) D、 Mid(Cstr，4，3) 正确答案： A 解析：
vb程序设计题及答案
vb 程序设计题及答案篇一：vb 程序设计试题及答案】txt> 一、单选题1. visual basic 是一种面向对象的可视化程序设计语言，采取了a 的编程机制。
(a) 事件驱动(b) 按过程顺序执行(c) 从主程序开始执行(d) 按模块顺序执行2. 若要使标签控件显示时不覆盖其背景内容，要对d 属性进行设置。
(a) backcolor (b) borderstyle(c) forecolor (d) backstyle3. 在visual basic 中最基本的对象是c ，它是应用程序的基石，是其他控件的容器。
(a) 文本框(b) 命令按钮(c) 窗体(d) 标签4. 要判断在文本框是否按下enter 键，应在文本框的d 事件中判断。
(a) change (b)keydown(c) click (d)keypress5. 数学表达式3W xIO在vb中的逻辑表达式为d 。
(a) 3=x10(b) 3=x and x10(c) x=3 or x1O (d) x=3 and x1O6. rnd 函数不可能为下列b 值。
(a) O (b) 1(c) O.1234 (d) O.OOO57. 赋值语句:a=123+mid(123456 ，3，2)执行后，a 变量中的值是d(a) 12334(b) 123 (c) 12334 (d) 1578. 对于语句if x=I then y=I ，下列说法正确的是c 。
(a) x=I 和y=I 均为赋值语句(b) x=I 和y=I 均为关系表达式(c) x=I 为关系表达式，y=I 为赋值语句(d) x=I 为赋值语句，y=I 为关系表达式9. 下面程序段表示求两个数中的大数，d 不正确。
(a) max=iif(xy ，x，y) (b) if xy then max=x eIse max=y(c) max=x (d) ify=x then max=yif y=x then max=y max=x10. 当在文本框中输入“ a bcd ”4个字符时，窗体上显示的是c。
大学_vb期末考试试题
VB期末考试试题A卷一、填空题1、VB程序设计的主要特点是和（2）。
2、在VB中,最主要的两种对象是 (3）和（4）。
3、工程是构成应用程序文件的（5) 。
4、方法是VB提供的一种（6) ，用来完成一定的操作。
5、浮点类型数据包括单精度型和___(7)__数据。
6、事件是窗体或控件对象识别的___（8）____.7、可用窗体的___（9）_ 方法在窗体中显示文字.8、复选框控件Value属性指示复选框处于____（10）___或禁止状态(暗淡的)中的某一种。
9、在VB中，修改窗体的（11）和（12）属性值，可改变窗体的大小。
10、双击工具箱中的控件图标，可在窗体的（13) 出现一个尺寸为缺省值的控件。
11、在MsgBox函数中,如果缺省title参数，则使用（14）作为消息框的标题。
12、设x＝34。
58，语句Print Format（x,“000。
0”）的输出结果是（15） .13、在VB 中，数值型变量的初值为（16），Varant型变量的初值为（17），布尔型变量的初值为（18）。
14、设置窗体的（19）属性，可在窗体上显示图片。
15、程序运行工程中,清除MP图片框中的图片应使用语句（20）。
二、选择题1、菜单控件只包括一个事件，即 (1），当用鼠标单击或键盘选中后按“回车”键时触发该事件，除分隔条以外的所有菜单控件都能识别该事件。
A、GotFocusB、LoadC、ClickD、KeyDown2、滚动条控件(如图所示）的Max属性所设置的是（2) .A、滚动框处于最右位置时，一个滚动条位置的Value属性最大设置值B、单击滚动条和滚动箭头之间的区域时，滚动条中滚动块的最大移动量C、单击滚动条的箭头区域时，滚动条中滚动块的最大移动量D、滚动条控件无该属性3、SQL 语句 Select ＊ Form student 中的＊表示 (3）。
A、所有记录B、所有字段C、所有表D、都不对4、以下选项中，不属于标签的属性是 (4） .A、EnabledB、CaptionC、DefaultD、Font5、要求改命令按钮显示的文本，应当在属性窗口中改变的属性是（5) 。
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程序设计试卷A及答案
_ _ _ _ _ _ _ _ _ _ _ _号学_ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _名姓_ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _级班_ _ _ _ _ _ _ _ _ _ _ _ _部系----------------------《 VB程序设计》试卷（ A 卷）------（时间 90 分钟满分 100 分）-------线-题号一二三四五合计-----分数-----阅卷人------一、选择题：（ 30 分，每题 2 分）-----阅卷人得分------------1、“x 是小于 100 的非负数”，用 VB表达式表示正确的是（）-----A、 0≤ x<100 B 、0<=x<100C、0<=x or x<100 D 、0<=x and x<100-封--2、下面哪组语句可以将变量 A 和 B 的值互换？（）-----A、 A=B: B=A B、 A=(A+B)/2: B=(A-B)/2------C、 A=A+B:B=A-B:A=A-B D、 A=C:C =B:B=A-----3、在 Select Case X 结构中，描述判断条件 3≦X ≦7的测试项应该写成------____________ 。
----A、 Case 3 ≦ X ≦ 7B、 Case 3 To 7------ C 、 case Is≦3, Is ≧ 3D、 Case 3 ≦ X ， X ≦ 7--密4、下面（）是算术运算符？-----A、mod B 、 imp C、not D、like-----5、以下控件中可以入选为容器控件的是() 。
------A、Image 图像框控件B、 ListBox列表框控件-----C、TextBox 文本框控件D、Picture图片框控件--------------------第 1 页----6、下列操作不能打开代码窗口的是( )A、选中对象 , 单击鼠标右键 , 在弹出的快捷菜单中选择“查看代码”命令B、选中对象 , 双击鼠标左键C、按F7键D、按F4键7、函数 Mid(" 山羊上山山碰山羊脚 ", 3, 2)的结果是（）A、山羊B、羊上C、上山D、山山8、窗体运行后，要使窗体自动显示在屏幕的中央位置，应设置窗体的（）属性？A、WindowstateB、StartuppositionC、IconD、mousePointer9、下列哪个语句是错误的VB语句（）A、 Text1.Text = " 你好！ " ； Text1.BackColor = RedB、 Text1.Text = " 你好！ " ： Text1.BackColor = RedC 、Text1.Text = "你好！"D 、 Option Explicit10、以下描述中错误的是 ( )A、符号常量的使用和变量的使用没有差别B、常量可分为字符型常量，数值常量，时间/ 日期型常量，布尔型常量C、符号常量是用一个标识符来代表一个常量D、常量在程序执行期间其值不会发生变化11、若想要建立一个学生管理的输入界面，其中要求选择学生的性别/ 政治面貌（党 / 团/ 群众）及选课情况（共有 5 门课，可任选），应如何在窗体中利用单选钮和选择框来实现（）。
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考试试题题库及答案VB（Visual Basic）是一种由微软公司开发的编程语言，广泛用于开发Windows应用程序。
以下是一些VB考试的试题题库及答案，供参考：一、单选题1. 在VB中，以下哪个是正确的数据类型？- A. Integer- B. Real- C. String- D. All of the above答案：D2. VB中的“Sub”过程与“Function”过程的区别是什么？- A. Sub过程可以返回值，Function过程不能- B. Function过程可以返回值，Sub过程不能- C. 两者都可以返回值- D. 两者都不能返回值答案：B3. 在VB中，以下哪个是正确的变量声明方式？- A. Dim x- B. Declare x As Integer- C. Both A and B- D. None of the above答案：C二、多选题1. VB中的控件可以具有哪些属性？- A. Name- B. Caption- C. Font- D. All of the above答案：D2. VB中，以下哪些是事件驱动的编程语言的特点？- A. 事件驱动的程序在事件发生时执行代码- B. 程序的执行顺序由事件的触发顺序决定- C. 程序可以同时响应多个事件- D. 程序必须等待事件的发生才能执行答案：A, B, C三、判断题1. VB是一种编译型语言。
- 正确- 错误答案：错误2. 在VB中，可以使用“Print”方法在文本框中显示文本。
- 正确- 错误答案：正确3. VB中的“Option Explicit”语句可以强制声明所有变量。
- 正确- 错误答案：正确四、简答题1. 简述VB中的事件和方法的区别。
答案：事件是用户或系统触发的动作，如点击按钮、键盘输入等。
方法是一种过程，可以包含代码来执行特定的任务或计算。
事件通常与控件相关联，并可以触发方法的执行。
2. 解释VB中“类”的概念。
VB程序设计题库(全)
程序设计第一题、题目：（事件）单击窗体（响应）求50以内所有偶数的和，并在窗体上输出来。
将结果存入变量S中。
代码：Dim I As IntegerFor i = 2 To 50If (i Mod 2)=0 ThenS=s+iEnd IfNextPrint (CStr(s))第二题题目：（事件）双击窗体（响应）求s=1+1*2+1*2*3+….+1*2*3*….*10并将结果存入变量S中代码：Dim i,j As IntegerDim k As Longk=1s=0For i =1To 10For j=1 To ik=k*jNexts=s+kk=1NextPrint(CStr(s))第三题题目：（事件）单击窗体（响应）求100以内偶数的和，并将结果输出在窗体上。
将结果存入变量SUM中代码：Dim i As IntegerFor i =1 To 100If i Mod 2 =0 ThenSum=sum+iEnd IfNextPrint sum第四题题目：（事件）单击窗体（响应）编写程序求10*11*12+11*12*13+….+15*16*17的结果并将结果输出到窗体上。
将结果存入变量M中。
代码：Dim i,j As IntegerDim s As LongFor i =10 To 15s=1For j = i To i +2s=s*jNextm=m+sNextPrint (CStr(m))第五题题目：（事件）双击窗体（响应）求100以内奇数的和，并将结果输出在窗体上。
将结果存入变量SUM中。
代码：Dim i As IntegerFor i=1 To 100If i Mod 2 = 1 Thensum = sum + iEnd IfNextPrint sum第六题题目：（事件）单击窗体（响应）已知S=1+1/4+1/9+1/16+1/25+…+1/100,结果输出在窗体上代码：Dim s As SingleFor i=1 To 10a=i*iSum =1/a + SumNextPrint Sum第七题题目：（事件）双击窗体（响应）求1+1*2+1*2*3+....+1*2*3*. (10)并将结果存到变量S中代码：Dim s As Longj=1For i = 1 To 10j= j*iSum = Sum + jNextPrint Sum第八题题目：（事件）单击窗体（响应）求1—1/2+1/3—1/4+….+1/99—1/100的值。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
实验三第1题四则运算题设计如下窗体,为五个命令按钮编写5段代码完成四则运算及退出程序,其中在计算除法时,如果第二个数就是零,在消息框中显示信息“除数为零”。
Public Class Form1Private Sub Button1_Click(ByVal sender As System、Object, ByVal e As System、EventArgs) Handles Button1、ClickDim a, b As Singlea = TextBox1、Textb = TextBox2、TextTextBox3、Text = a + bEnd SubPrivate Sub Button2_Click(ByVal sender As System、Object, ByVal e As System、EventArgs) Handles Button2、ClickDim a, b As Singlea = TextBox1、Textb = TextBox2、TextTextBox3、Text = a - bEnd SubPrivate Sub Button3_Click(ByVal sender As System、Object, ByVal e As System、EventArgs) Handles Button3、ClickDim a, b As Singlea = TextBox1、Textb = TextBox2、TextTextBox3、Text = a * bEnd SubPrivate Sub Button4_Click(ByVal sender As System、Object, ByVal e As System、EventArgs) Handles Button4、ClickDim a, b As Singlea = TextBox1、Textb = TextBox2、TextIf b = 0 ThenMessageBox、Show("除数为零")ElseTextBox3、Text = a / bEnd IfEnd SubPrivate Sub Button5_Click(ByVal sender As System、Object, ByVal e As System、EventArgs) Handles Button5、ClickEndEnd SubEnd Class第2题一元二次方程求解输入系数后,单击“求解”按钮后,根据判别式的3种不同情况,分别显示如下的不同结果。
Public Class Form1Private Sub Button1_Click(ByVal sender As System、Object, ByVal e As System、EventArgs) Handles Button1、ClickDim a, b, c, delta As Doublea = TextBox1、Textb = TextBox2、Textc = TextBox3、Textdelta = b * b - 4 * a * cIf delta > 0 ThenLabel5、Visible = TrueLabel6、Visible = TrueLabel4、Text = "方程有两个不相等实根"Label5、Text = "X1=" & ((-b + Math、Sqrt(delta)) / 2 / a)Label6、Text = "X2=" & ((-b - Math、Sqrt(delta)) / 2 / a)ElseIf delta = 0 ThenLabel4、Text = "方程有两个相等实根"Label5、Visible = TrueLabel5、Text = "X1=X2=" & (-b / 2 / a)Label6、Visible = FalseElseLabel4、Text = "方程没有实根"Label5、Visible = FalseLabel6、Visible = FalseEnd IfEnd SubPrivate Sub Button2_Click(ByVal sender As System、Object, ByVal e As System、EventArgs) Handles Button2、ClickEndEnd SubEnd Class第3题文本框中前景色与背景色的不同组合目的:单选按钮的使用(1)设计窗体如下所示窗体中包含两组单选按钮、两个框架与一个命令按钮。
(2)程序功能:分别单击不同的前景色与背景色按钮,在文本框中显示颜色的改变。
(3)设置控件的主要属性1)窗体的文本属性为“不同前景色背景色的组合”2)初始前景色为红色、背景色为黄色3)其它属性根据图中显示来设置(4)事件代码Public Class Form1Private Sub RadioButton1_CheckedChanged(ByVal sender As System、Object, ByVal e As System、EventArgs) Handles RadioButton1、CheckedChangedTextBox1、ForeColor = Color、RedEnd SubPrivate Sub RadioButton2_CheckedChanged(ByVal sender As System、Object, ByVal e As System、EventArgs) Handles RadioButton2、CheckedChangedTextBox1、ForeColor = Color、GreenEnd SubPrivate Sub RadioButton3_CheckedChanged(ByVal sender As System、Object, ByVal e As System、EventArgs) Handles RadioButton3、CheckedChangedTextBox1、ForeColor = Color、BlackEnd SubPrivate Sub RadioButton4_CheckedChanged(ByVal sender As System、Object, ByVal e As System、EventArgs) Handles RadioButton4、CheckedChangedTextBox1、BackColor = Color、WhiteEnd SubPrivate Sub RadioButton5_CheckedChanged(ByVal sender As System、Object, ByVal e As System、EventArgs) Handles RadioButton5、CheckedChangedTextBox1、BackColor = Color、YellowEnd SubPrivate Sub Form1_Load(ByVal sender As System、Object, ByVal e As System、EventArgs) Handles MyBase、LoadEnd SubEnd Class第4题三位整数的反序显示在窗体中添加二个文本框、二个标签与一个命令按钮,在一个文本框中输入一个三位的整数,单击命令按钮后,在另一个框中按相反顺序显示该数,例如,输入123,则在另一个文本框中显示321。
提示:本题先将每位上的数字分解出来,这要用到整除与计算余数的运算符,例如123整除100后的结果1就就是百位,而123除以10的余数就就是个位,至于十位,大家可以自己确定。
分解后的三位数再倒序组合成新的三位整数。
Public Class Form1Private Sub Button1_Click(ByVal sender As System、Object, ByVal e As System、EventArgs) Handles Button1、ClickDim a, b, c, d, y As Singlea = TextBox1、Textb = a \ 100c = (a - 100 * b) \ 10d = a - 100 * b - 10 * cTextBox2、Text = d & c & bEnd SubEnd Class试验五第1题累加编写程序,计算1~100之间的所有偶数之与,程序窗口界面及控件自行设计。
Public Class Form1Private Sub Button1_Click(ByVal sender As System、Object, ByVal e As System、EventArgs) Handles Button1、ClickDim i, sum As LongFor i = 2 To 100 Step 2sum += iNextTextBox1、Text = sumEnd SubEnd Class第2题使用循环求解水仙花数的问题要求:(1)参考教材上例4-3关于水仙花数的定义。
(2)程序窗口界面及控件与例4-3的结果即图4-3一样。
(3)单击“开始”按钮后,在文本框中显示求出的结果。
Public Class Form1Private Sub Button1_Click(ByVal sender As System、Object, ByVal e As System、EventArgs) Handles Button1、ClickDim M, k1, k2, k3 As IntegerTextBox1、Clear()For M = 100 To 999k1 = M \ 100k2 = (M \ 10) Mod 10k3 = M Mod 10If M = k1 ^ 3 + k2 ^ 3 + k3 ^ 3 ThenTextBox1、Text += M、ToString() + " = " + k1、ToString() + "^3+" + k2、ToString() + "^3+" + k3、ToString() + "^3" + vbCrLfEnd IfNextEnd SubEnd Class第3题统计整数的因子编写程序,向一个文本框输入一个整数,单击“开始”按钮后,找出该数的所有因子,并统计因子的个数与总与,结果在另一个文本框中显示,共有三行,其中第一行该数的所有因子,第二行显示该数的因子个数,最后一行显示该数所有因子之与,窗体界面如下:Public Class Form1Private Sub Button1_Click(ByVal sender As System、Object, ByVal e As System、EventArgs) Handles Button1、ClickDim a, b, c, d As Longc = 0a = TextBox1、Textb = 1While b <= aIf a Mod b = 0 Thenc += 1d += bTextBox2、Text = "该整数的因子就是:" & +=CStr(b) + "," + vbCrLf + "因子个数为:" + c、ToString() + vbCrLf + "因子之与为:" + d、ToString()End Ifb = b + 1End WhileEnd SubEnd Class第4题判断素数编写程序,判断某个整数就是否就是素数,在一个文本框中输入一个整数,单击命令按钮后,在另一个文本框中显示该数就是否就是素数,程序代码可以参考例4-10的代码,在此基础上改写。