VB程序题
vb程序设计试题(含答案)
第一套试题一、选择题(每题2分,共30分)1.在VB环境中,工程文件的扩展名是( C )(A).frm (B).bas (C).vbp (D).frx2.下面4项中不属于面向对象系统三要素的是( A )(A)变量(B)事件(C)属性(D)方法3. \、/、Mod、*这4个算述运算符中,优先级别最低的是( C )(A)\ (B)/ (C)Mod (D)*4.要使Print方法在Form_Load事件中起作用,要对窗体的( C )属性进行设置(A)BackColor (B)ForeColor(C)AutoRedraw (D)Caption5.不论何控件,共同具有的属性是( B )(A)Text (B)Name(C)ForeColor (D)Caption6.要使Form1窗体的标题栏显示“欢迎使用VB”,以下语句正确的是( D ) (A)Form1.Caption=“欢迎使用VB”(B)Form1.Caption=ˊ欢迎使用VBˊ(C)Form1.Caption=欢迎使用VB (D)Form1.Caption=〞欢迎使用VB〞7.VB提供了结构化程序设计的3种基本结构,这3种基本结构是( D )(A)递归结构,选择结构,循环结构(B)选择结构,过程结构,顺序结构(C)过程结构,输入、输出结构,转向结构(D)选择结构,循环结构,顺序结构8.给变量赋值a=123+MID(“123456”,3,2),a变量中的值是( D )(A)“12334”(B)123 (C)12334 (D)1579.下面If语句统计满足性别为男、职称为副教授以上、年龄小于40岁条件的人数,不正确的语句是( D )(A)If sex=“男”And age<40 And InStr(duty,“教授”)>0 Then n=n+1 (B)If sex=“男”And age<40 And (duty=“教授”Or duty=“副教授”) Then n=n+1(C)If sex=“男”And age<40 And Right(duty,2)= “教授” Then n=n+1 (D)If sex=“男”And age<40 And duty=“教授”And duty=“副教授” Then n=n+110.若要清除列表框的所有内容,可用来实现的方法是( C )(A)RemoveItem (B)Cls(C)Clear (D)以上均不可以11.要使时钟控件Timer1的Timer事件不起作用,以下正确的语句是( B ) (A)Timer1.Visible=False (B)Timer1.Enabled=False(A) Timer1.Interval=1000 (D)Timer1.Index=012.引用列表框(List1)最后一个数据项应使用的语( B )(A)List1.List(List1.ListCount) (B)List1.List(List1.ListCount-1)(C)List1.List(ListCount) (D)List1.List(ListCount-1)13.如下数组声明语句,正确的是( B )(A)Dim a[3,4]As Integer (B)Dim a(3,4)As Integer(C)Dim a(n,n) As Integer (D)Dim a(3,4)As Integer14.下面子过程语句说明合法的是(A、D )(A)Sub f1(ByVal n%) (B)Sub f1(n%)As Integer(C)Function f1%(f1%) (D)Function f1(ByVal n%)15.假定有如下的命令按钮(名称为Command1)事件过程:Private Sub Command1_Click()x=InputBox("输入:","输入整数")MsgBox"输入的数据是:”,,”输入数据:"+xEnd Sub16.程序运行后,单击命令按钮,如果从键盘上输入整数10,则以下叙述中错误的是( A )(A)x的值是数值10 (B)输入对话框的标题是“输入整数”(C)信息框的标题是“输入数据:10”(D)信息框中显示的是“输入的数据是:”二、填空题(每题2分,共20分)1、当进入VB集成环境后,发现没有显示“工具箱”窗口,应选择视图菜单的工具箱选项,使“工具箱”窗口显示。
专升本vb程序设计试题及答案
专升本vb程序设计试题及答案一、选择题(每题2分,共20分)1. 在VB中,以下哪个关键字用于声明类模块中的方法?A. FunctionB. SubC. PropertyD. Class答案:B2. VB中的单精度浮点数类型是什么?A. IntegerB. SingleC. DoubleD. Long答案:B3. 如果想要在VB中实现多态,可以使用哪种机制?A. 继承B. 接口C. 重载D. 封装答案:B4. 在VB中,以下哪个控件可以用于显示图像?A. LabelB. PictureBoxC. TextBoxD. ComboBox答案:B5. VB中的“Option Explicit”语句的作用是什么?A. 声明变量类型B. 强制变量声明C. 定义常量D. 创建对象实例答案:B6. 在VB中,如何实现一个事件处理程序?A. 使用Sub过程B. 使用Function过程C. 使用Property过程D. 使用Handles关键字答案:D7. 如果要使一个变量在多个窗体之间共享,应该使用哪种变量作用域?A. PublicB. PrivateC. FriendD. Protected答案:A8. 在VB中,以下哪个不是标准的控件属性?A. NameB. TextC. VisibleD. Color答案:D9. VB中的“With”语句用于什么目的?A. 初始化对象B. 创建对象实例C. 链式调用同一对象的多个属性或方法D. 定义对象的生命周期答案:C10. 在VB中,以下哪个不是Visual Basic Power Packs控件?A. LineB. OvalC. ShapeD. DataGrid答案:D二、填空题(每空2分,共20分)11. VB中的“_____”关键字用于定义一个类。
答案:Class12. 当需要在VB中捕获并处理异常时,可以使用“_____”语句。
答案:Try...Catch13. 在VB中,一个窗体的标题可以通过“_____”属性来设置。
VB程序题
1. 参照下图制作一滚动字幕(滚动方式自由设计)。
任务1:完成学生成绩管理系统。
第五章要求:1)利用数组实现各个按钮的功能。
2)动态数组。
2. 建立一个如下图所示的记事本应用程序(小图标也可用文字替代)。
任务1:完成学生成绩管理系统。
第五章要求:1)利用数组实现各个按钮的功能。
2)动态数组。
3. 编写华氏温度与摄氏温度之间转换的程序。
任务1:完成学生成绩管理系统。
第五章要求:1)利用数组实现各个按钮的功能。
2)动态数组。
4. 建立一个登录程序,界面参考下图。
任务1:完成学生成绩管理系统。
第五章要求:1)利用数组实现各个按钮的功能。
2)动态数组。
5. 编写一个自动贩卖机系统,运行界面如下图所示。
任务1:完成学生成绩管理系统。
第五章要求:1)利用数组实现各个按钮的功能。
2)动态数组。
6. 编写如下图所示的猜数游戏程序。
7. 百元买百鸡。
假设小鸡每只0.5元,公鸡每只2元,母鸡每只3元,编程求解购鸡方案。
结果如下图所示。
任务1:完成学生成绩管理系统。
第五章要求:1)利用数组实现各个按钮的功能。
2)动态数组。
8. 编写一个简易“学生成绩管理系统”。
第一行3个按钮的功能必做,第二行完成“成绩统计”功能。
任务1:完成学生成绩管理系统。
第五章要求:1)利用数组实现各个按钮的功能。
2)动态数组。
9. 编写一个简易“学生成绩管理系统”。
第一行3个按钮的功能必做,第二行完成“成绩排序”功能。
任务1:完成学生成绩管理系统。
第五章要求:1)利用数组实现各个按钮的功能。
2)动态数组。
10. 编写一个简易“学生成绩管理系统”。
第一行3个按钮的功能必做,第二行完成“成绩查询”功能。
任务1:完成学生成绩管理系统。
第五章要求:1)利用数组实现各个按钮的功能。
2)动态数组。
11. 完成如下图所示的“课程管理系统”程序设计。
12. 随机生成3个正整数,其中1个一位数,1个二位数,1个三位数,计算它们的平均值,保留两位小数,运行界面如下图所示。
vb练习题及答案
vb练习题及答案VB练习题及答案VB(Visual Basic)是一种广泛应用于Windows操作系统的编程语言,它以其简单易学的特点受到了许多初学者和专业开发者的青睐。
为了帮助大家更好地掌握VB编程,下面将提供一些VB练习题及其答案,希望能对大家有所帮助。
练习题一:计算器程序编写一个VB程序,实现一个简单的计算器功能。
要求用户输入两个数字和一个操作符(+、-、*、/),然后根据操作符进行相应的计算,并输出结果。
解答:```vbPrivate Sub btnCalculate_Click(sender As Object, e As EventArgs) Handles btnCalculate.ClickDim num1 As Double = CDbl(txtNum1.Text)Dim num2 As Double = CDbl(txtNum2.Text)Dim operator As String = cmbOperator.SelectedItem.ToString()Dim result As DoubleSelect Case operatorCase "+"result = num1 + num2Case "-"result = num1 - num2Case "*"result = num1 * num2Case "/"result = num1 / num2End SelectlblResult.Text = "Result: " & result.ToString()End Sub```练习题二:学生成绩管理系统编写一个VB程序,实现一个简单的学生成绩管理系统。
要求用户输入学生的姓名和成绩,然后将其保存到数组中。
用户可以通过输入姓名来查询学生的成绩。
解答:```vbPrivate Structure StudentPublic Name As StringPublic Score As DoubleEnd StructurePrivate students() As StudentPrivate Sub btnAdd_Click(sender As Object, e As EventArgs) Handles btnAdd.ClickDim newStudent As Student = txtName.TextnewStudent.Score = CDbl(txtScore.Text)ReDim Preserve students(students.Length)students(students.Length - 1) = newStudenttxtName.Text = ""txtScore.Text = ""End SubPrivate Sub btnSearch_Click(sender As Object, e As EventArgs) Handles btnSearch.ClickDim searchName As String = txtSearchName.TextDim found As Boolean = FalseFor Each student As Student In studentsIf = searchName ThenlblSearchResult.Text = "Score: " & student.Score.ToString()found = TrueExit ForEnd IfNextIf Not found ThenlblSearchResult.Text = "Student not found."End IfEnd Sub```练习题三:简单的文本编辑器编写一个VB程序,实现一个简单的文本编辑器功能。
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考试试题题库及答案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考试试题
vb考试试题VB考试试题一、选择题(每题2分,共20分)1. 在VB中,以下哪个是正确的数据类型?A. IntegerB. intC. Integer8D. int82. VB中的哪个关键字用于声明变量?A. defineB. declareC. dimD. var3. 下列哪个语句可以正确地在VB中打印输出?A. print "Hello, World!"B. console.write("Hello, World!")C. msgbox "Hello, World!"D. output "Hello, World!"4. VB中哪个控件用于显示文本,但用户不能编辑?A. TextBoxB. LabelC. ComboBoxD. CheckBox5. 在VB中,以下哪个是正确的条件语句?A. if (x > 10)B. if x > 10C. if (x > 10) thenD. if x > 10 then6. VB中哪个函数用于获取当前日期?A. Now()B. Date()C. Today()D. GetCurrentDate()7. 在VB中,以下哪个是正确的循环结构?A. do-whileB. for-eachC. while-doD. repeat-until8. VB中哪个属性用于设置控件的可见性?A. VisibleB. ShowC. DisplayD. Hide9. 在VB中,以下哪个事件用于响应按钮点击?A. OnClickB. OnSelectC. OnPressD. OnActivate10. VB中哪个关键字用于定义函数?A. functionB. defC. procD. method二、简答题(每题5分,共30分)1. 简述VB中的事件驱动编程的概念。
2. 描述VB中数组的声明和使用方式。
VB程序设计习题
VB程序设计习题练习一一、多项选择题1、下面列出的程序设计语言中(a)是面向问题的语言。
a、机器语言b、汇编语言c、高级语言D,0,1二进制语言解释:机器语言和汇编语言都是面向机器的语言,二进制语言为机器语言,故其为面向机器的语言2、下面列出的程序设计语言中(c)不是面向对象的语言。
a、cb、c++c、javad、vb3、下列(d)不属于vb6.0的版本。
a、学习版b、专业版C、企业版D、共享版解释:vb6.0共有三个版本:标准版、专业版、企业版。
而其中的标准版是为初学者了解基于windows的应用程序开发而设计的,也可称为学习版。
二、填空题1.从编程语言的发展过程来看,计算机编程语言分为机器语言、汇编语言和高级语言。
2、 vb6。
0采用面向对象和事件驱动(可视化编程)的编程机制。
3、启动vb6.0后可以从“现存”选项卡选择并打开系统中现存的工程文件。
练习2一、选择题1.如果表单对象的名称是forma1,backcolor是表单对象的一个属性,用于设置表单的背景色,那么将表单背景色设置为蓝色的正确语句是(a)a和forma1backcolor=vbblue、backcolor=vbbluec、forma1=vbblued、forma1′sbackcolorisvbblue.2.在以下方法中,无法打开代码编辑器(d)A.单击“视图”菜单上的“代码窗口”命令。
b、在窗体设计器中双击窗体或控件。
c、双击窗体设计器的窗体或控件,单击工程资源管理器中的“查看代码”按钮。
d、双击窗体设计器的窗体或控件,单击标准工具栏中的“代码窗口”按钮。
3、保存vb应用程序时,下列方法中正确的是(a)a、先保存窗体文件,再保存工程文件。
b、先保存工程文件,再保存窗体文件c、如果直接保存表单文件,系统将自动先保存表单文件,然后依次保存项目文件。
d、如果直接保存表单文件,系统将自动先保存项目文件,然后依次保存表单文件。
2、填空1、vb工程文件的扩展名是工程文件(*.vbp),窗体文件的扩展名是窗体文件(*.frm)。
VB程序设计试题 及 参考答案
VB程序设计及参考答案一、单选题(共20分,每小题1分)1、要改变控件的宽度,应修改该控件的()属性。
(A)TOP (B)width (C)Left (D)Height2、将命令按钮Command1设置为不可见,应修改该命令按钮的()属性。
(A)Visible (B)Value (C)Caption (D)Enabled3、()对象具有clear方法。
(A)图片框(B)窗体(C)复选框(D)列表框4、启动VB后,就意味着要建立一个新()。
(A)窗体(B)文件(C)工程(D)程序5、下列()对象不具有Clear方法。
(A)列表框(B)组合框(C)剪贴框(D)图片框6、组合框有三种风格,它们由Style属性所决定,其中为简单组合框时,Style 属性值应为()(A)0 (B)1 (C)2 (D)37、下列可调整图片框的大小以适合图片的属性是()(A)Stretch (B)autosize (C)picture (D)oledropmode 8、要想清除文本框中的内容则可利用()进行。
(A)Caption (B)Text (C)Clear (D)Cls9、在文本框控件中将Text的内容全部显示为所定义的字符的属性是()。
(A)Password (B)PasswordChar(C)需要编程来实现(D)以上都不是10、Visual Basic是一种面向对象的程序设计语言,所采用的编程机制是()。
(A)从主程序开始执行(B)按过程顺序执行(C)事件驱动(D)按模块顺序执行11、下列四项中合法的变量名是()。
(A)a-bc (B)a_bc (C)4abc (D)integer12、无论何种控件,共同具有的属性是()(A)Text (B)Name (C)Caption (D)ForeColor13、有程序代码如下:Text1.Text = "Visual Basic程序设计"则Text1、Text ,和"Visual Basic程序设计"分别代表()。
VB程序设计编程考试题及答案
VB程序设计编程考试题及答案1。
输入3个数,输出最大的数2。
有一元二次方程:aX2+bX+c=0,依次输入a,b,c,判断此方程是否有实根3。
输入一个百分制的成绩,若大于等于60,则用消息框弹出,显示“恭喜!成绩通过!”,若小于60,则弹出消息框,显示“抱歉!成绩没有通过!4。
输入学生的百分制成绩,转换输出为五级制成绩,90~100分转换为优秀,80~89转换为良好,70~79转换为中等,60~69转换为及格,0~60转换为不及格。
5。
随机产生一个三位正整数,然后逆序输出,产生的数与逆序数同时显示。
例如,产生246,输出是642。
6。
输入两个整数,求它们的最大公约数。
7.分别统计1—100中,满足3的倍数、7的倍数的数各有多少。
8。
输入一串字符,统计其中字母A(不区分大小写)出现的次数。
9.我国目前有13亿人口,按人口年增长率0.8%计算,多少年后我国人口将超过26亿。
10。
小猴有桃若干,第一天吃掉一半多一个;第二天吃剩下桃子的一半多一个;以后每天都吃尚存桃子的一半多一个,到第7天只剩一个,问小猴原有桃多少?11.百元买百鸡问题。
假定小鸡每只5角,公鸡每只2元,母鸡每只3元,编程求解购鸡方案。
12。
编程求斐波那契数列前11项。
(斐波那契数列:F(0)=f(1)=1, F(n)=F(n—1)+F(n —2) n〉=2 )13。
已知有序数组a(),编程插入x(x的值为14)。
数组a中的元素分别为{12,6,4,89,75,63,100,20,31}。
14。
找出被3、5、7除,余数均为1的最小的5个正整数。
15利用随机函数产生50~100范围内的20个随机数,显示其中的最大值、最小值和平均值. 16。
编一函数,统计字符串中汉字的个数。
1.输入3个数,输出最大的数Private Sub command1_click()Dim maxFor i = 1 To 3n = Val(InputBox("输入第" &i &"个数"))If n > max Thenmax = nEnd IfNextPrint "三个数中最大的数是”; maxEnd Sub2.有一元二次方程:aX2+bX+c=0,依次输入a,b,c,判断此方程是否有实根Private Sub Command1_Click()Dim a,b, c,nb = Text2c = Text3n = b * b — 4 * a *cIf n >= 0 ThenLabel4 = ”方程有根”ElseLabel4 = ”方程无根”End IfEnd Sub3.输入一个百分制的成绩,若大于等于60,则用消息框弹出,显示“恭喜!成绩通过!”,若小于60,则弹出消息框,显示“抱歉!成绩没有通过!Private Sub Form_Load()Text1 = ""End SubPrivate Sub Command1_Click()Dim nn = Text1If n 〉60 ThenVal (MsgBox("恭喜!成绩通过!"))ElseVal (MsgBox(”抱歉!成绩没有通过!"))End IfEnd Sub4.输入学生的百分制成绩,转换输出为五级制成绩,90~100分转换为优秀,80~89转换为良好,70~79转换为中等,60~69转换为及格,0~60转换为不及格。
VB程序设计练习题及参考答案
Visual Basic程序设计练习题1.Visual Basic是一种面向对象的可视化程序设计语言,采取了A的编程机制。
A.事件驱动B.按过程顺序执行C.从主程序开始执行D.按模块顺序执行2.在Visual Basic中最基本的对象是C,它是应用程序的基石,是其他控件的容器。
A.文本框B.命令按钮C.窗体D.标签3.多窗体程序是由多个窗体组成。
在缺省情况下,VB在应用程序执行时,总是把B 指定为启动窗体。
A.不包含任何控件的窗体B.设计时的第一个窗体C.包含控件最多的D.命名为Frm1的窗体4.若有程序代码如下:text1.text="Visual Basic"则:text1,text和"Visual Basic" 分别代表C。
A.对象,值,属性B.对象,方法,属性C.对象,属性,值D.属性,对象,值5.Visual Basic是一种面向对象的程序设计语言,A不是面向对象系统所包含的三要素。
A.变量B.事件C.属性D.方法6.在VB集成环境创建VB应用程序时,除了工具箱窗口、窗体中的窗口、属性窗口外,必不可少的窗口是C。
A.窗体布局窗口B.立即窗口C.代码窗口D.监视窗口7.保存新建的工程时,默认存放的位置是B。
A.My Documents B.VB98 C.\ D.Windows 8.若要使标签控件显示时不覆盖其背景内容,要对D属性进行设置。
A.BackColor B.BorderStyle C.ForeColor D.BackStyle 9.若要使命令按钮不可操作,要对A属性设置。
A.Enabled B.Visible C.BackColor D.Caption 10.文本框没有D属性。
A.Enabled B.Visible C.BackColor D.Caption 11.不论何控件,共同具有的是B属性。
A.Text B.Name C.ForeColor D.Caption 12.要使Form1窗体的标题栏显示“欢迎使用VB”,以下D语句是正确的。
VB试题及答案
一、选择题(将答案写在答题卡内)1.在Visual Basic中,Len("ABab河北")的值是()A.4 B. 6 C. 8 D.122.在Visual Basic中,当窗体被装载时触发的事件是()A.Unload B.Click C.Load D.DblClick3.Visual Basic中决定对象是否可见的属性是()A.Enabled B.See C. Name D.Visible4.在Visual Basic中,语句Mid("ABCDEFG", 2, 3) = "123"的输出结果是()A. FalseB. True C.A123EFG D. 1235.下面Visual Basic表达式不合法的是()A. "12"+12B. "ab"+"12"C."ab"+12D.Now+16.若要使命令按钮不可操作,要对()属性进行设制。
A.EnabledB.VisibleC.BackColorD.Caption 7.VisualBasic是一种面向对象的可视化程序设计语言,采取了()的编程机制。
A.事件驱动B.按过程顺序执行C.从主程序开始执行D.按模块顺序执行8.在设计阶段,当双击窗体上的某个控件时,所打开的窗口是()。
A.工程资源管理器窗口B.工具箱窗口C.代码窗口D.属性窗口9.语句Abs(-6^2)+Int(-6^2)的输出结果是()。
A.0B.1C.-1D.-7210.String(6,"124abc")的值是()。
A.124abcB.111111C.124D.abc11.设a=2,b=3,c=4,d=5,表达式a>b AND c<=d的值是()。
A.TrueB.FalseC.-1D.112.函数CINT(4.5)的值是()A.1B.2C.3D.413.用于去掉字符串右边的空格的函数是A.Ltrim( )B.Rtrim( )C.Left( )D.Instr( )14.设置控件背景颜色的属性名称是()A.LtrimB.BackcolorC.CaptionD.Load15.应用程序设计完成后,应将程序保存,保存的过程是()A.只保存窗体文件即可B.只保存工程文件即可C.先保存工程文件,之后保存窗体文件D.先保存窗体文件(或标准模块文件),之后还要保存工程文件16.任何控件都具有的属性是()A.Text B.Caption C.Name D.Forecolor17.决定控件上文字的字体、字形、大小及效果的属性是()A.Text B.Caption C.Name D.Font18.在窗体上建立了多个控件,如TEXT、LABEL1、COMMAND1,若要使程序一运行焦点就定位在COMMAND1控件上,应将COMMAND1控件的()设置为0A.Index B.Tabindex C.Tabstop D.Enabled19.命令按钮的标题文字由()属性来设置。
vb精选试题及答案
vb精选试题及答案一、单项选择题(每题2分,共20分)1. 在VB中,以下哪个关键字用于声明变量?A. DimB. ConstC. FunctionD. Sub答案:A2. VB中数组的默认下标是从哪个数字开始的?A. 0B. 1C. -1D. 2答案:B3. 在VB中,以下哪个函数用于计算字符串的长度?A. LenB. UBoundC. LBoundD. Sqr答案:A4. VB中,哪个属性用于获取或设置一个窗体的标题?A. CaptionB. TextC. TitleD. Label答案:A5. 在VB中,以下哪个事件用于响应鼠标单击窗体?A. ClickB. DblClickC. MouseDownD. MouseUp答案:A二、填空题(每题3分,共15分)1. 在VB中,声明一个整型变量的正确语法是________。
答案:Dim myVar As Integer2. VB中,用于定义一个过程的关键字是________。
答案:Sub 或 Function3. VB中,用于读取用户输入的函数是________。
答案:InputBox4. VB中,用于打开文件的语句是________。
答案:Open5. VB中,用于关闭文件的语句是________。
答案:Close三、简答题(每题5分,共10分)1. 请简述VB中的事件驱动编程是什么?答案:事件驱动编程是一种编程范式,程序的执行流程由外部事件(如用户操作、消息、信号等)触发。
在VB中,用户可以通过编写事件处理程序来响应这些事件。
2. VB中如何实现循环结构?答案:在VB中,可以使用For...Next循环、Do...Loop循环、While...Wend循环等结构来实现循环。
四、编程题(每题10分,共20分)1. 编写一个VB程序,计算并输出1到100之间所有偶数的和。
答案:请参考以下代码:```vbDim sum As IntegerDim i As Integersum = 0For i = 1 To 100If i Mod 2 = 0 Thensum = sum + iEnd IfNext iMsgBox "1到100之间所有偶数的和是:" & sum```2. 编写一个VB程序,判断一个给定的年份是否为闰年。
vb考试试题及答案
vb考试试题及答案一、选择题(每题2分,共20分)1. 在Visual Basic中,以下哪个不是基本数据类型?A. IntegerB. StringC. ObjectD. Array答案:D2. 下面哪个语句用于在Visual Basic中声明一个变量?A. DimB. DeclareC. DefineD. Set答案:A3. 在Visual Basic中,以下哪个是正确的循环结构?A. LoopB. WhileC. DoD. Repeat答案:C4. 以下哪个属性用于设置控件的可见性?A. VisibleB. ShowC. HideD. Display答案:A5. Visual Basic中的事件通常与哪个关键字一起使用?A. SubB. FunctionC. EventD. Procedure答案:A6. 在Visual Basic中,以下哪个不是控件的属性?A. NameB. CaptionC. TypeD. Left答案:C7. 下列哪个不是Visual Basic的内置函数?A. LenB. UBoundC. SqrtD. Max答案:D8. 在Visual Basic中,以下哪个不是数组的声明方式?A. Dim arr(1 To 10)B. Dim arr() As IntegerC. ReDim arr(1 To 10)D. Dim arr As Variant答案:D9. 在Visual Basic中,以下哪个不是条件语句?A. IfB. Select CaseC. WhileD. Do答案:C10. Visual Basic中,以下哪个不是错误处理的关键字?A. On Error GoToB. On Error Resume NextC. On Error GoTo 0D. On Error Exit Sub答案:D二、填空题(每题2分,共10分)1. 在Visual Basic中,使用________关键字可以声明一个变量。
vb程序设计试题(含答案)
第一套试题一、选择题〔每题 2 分,共 30 分〕1.在 VB环境中,工程文件的扩展名是 ( C )〔 A〕 .frm〔B〕.bas〔C〕.vbp〔D〕.frx2.下面 4 项中不属于面向对象系统三要素的是 ( A )〔 A〕变量〔B〕事件〔C〕属性〔D〕方法、/ 、Mod、 * 这 4 个算述运算符中,优先级别最低的是( C )〔 A〕 \〔B〕/〔C〕Mod〔D〕*4.要使 Print 方法在 Form_Load事件中起作用,要对窗体的 ( C ) 属性进行设置〔 A〕 BackColor〔B〕ForeColor〔 C〕 AutoRedraw〔D〕Caption5.不管何控件,共同具有的属性是 ( B )〔 A〕 Text〔B〕Name〔 C〕 ForeColor〔D〕Caption6.要使 Form1窗体的标题栏显示“欢送使用 VB〞,以下语句正确的选项是 ( D )A〕 Form1.Caption= “欢送使用 VB〞〔B〕Form1.Caption= ˊ欢送使用 VBˊ〔 C〕 Form1.Caption= 欢送使用 VB〔D〕Form1.Caption=〞欢送使用VB〞7.VB 提供了结构化程序设计的 3 种根本结构,这 3 种根本结构是 ( D )〔 A〕递归结构,选择结构,循环结构〔B〕选择结构,过程结构,顺序结构(C〕过程结构,输入、输出结构,转向结构〔D〕选择结构,循环结构,顺序结构8. 给变量赋值 a=123+MID(“123456〞 ,3,2) ,a 变量中的值是 ( D )〔 A〕“ 12334〞〔B〕123〔C〕12334〔D〕157 下面 If 语句统计满足性别为男、职称为副教授以上、年龄小于 40 岁条件的人数,不正确的语句是 ( D )〔 A〕 If sex= “男〞 And age<40 And InStr(duty,“教授〞)>0 Then n=n+1B〕 If sex= “男〞 And age<40 And (duty= “教授〞 Or duty= “副教授〞 ) Then n=n+1〔 C〕 If sex= “男〞 And age<40 And Right(duty,2)=“教授〞Then n=n+1〔 D〕 If sex=“男〞 And age< 40 And duty= “教授〞 And duty= “副教授〞 Thenn=n+110. 假设要去除列表框的所有内容,可用来实现的方法是( C )〔 A〕 RemoveItem〔B〕Cls〔 C〕 Clear〔D〕以上均不可以11.要使时钟控件 Timer1 的 Timer 事件不起作用,以下正确的语句是 ( B ) 〔 A〕 Timer1.Visible=False〔B〕Timer1.Enabled=False〔 A〕 Timer1.Interval=1000〔D〕Timer1.Index=0引用列表框 (List1) 最后一个数据项应使用的语 ( B )(A)List1.List(List1.ListCount) (B)List1.List(List1.ListCount-1)(C)List1.List(ListCount)(D)List1.List(ListCount-1)13.如下数组声明语句,正确的选项是 ( B )〔 A〕 Dim a[3,4]As Integer 〔 C〕 Dim a(n,n) As Integer 〔B〕Dim a(3,4)As Integer 〔D〕Dim a(3,4)As Integer14.下面子过程语句说明合法的是 (A 、D )〔 A〕 Sub f1(ByVal n%) 〔 C〕 Function f1%(f1%) 〔B〕Sub f1(n%)As Integer 〔D〕Function f1(ByVal n%)15.假定有如下的命令按钮 ( 名称为 Command1)事件过程:Private Sub Command1_Click()x=InputBox(" 输入: " , " 输入整数 ")MsgBox"输入的数据是:〞,,〞输入数据:"+xEnd Sub16. 程序运行后,单击命令按钮,如果从键盘上输入整数10,那么以下表达中错误的是(A)〔 A〕x 的值是数值 10〔B〕输入对话框的标题是“输入整数〞(C〕信息框的标题是“输入数据: 10〞〔 D〕信息框中显示的是“输入的数据是:〞二、填空题〔每题 2 分,共 20 分〕1、当进入 VB集成环境后,发现没有显示“工具箱〞窗口,应选择视图菜单的工具箱选项,使“工具箱〞窗口显示。
vb试题及答案
vb试题及答案一、单选题(每题2分,共10分)1. 在VB中,以下哪个是正确的变量声明方式?A. Dim aB. Dim a As IntegerC. Dim a = 5D. Dim a As Integer = 5答案:B2. VB中的哪个控件用于显示文本,但不能编辑?A. TextBoxB. LabelC. ComboBoxD. CheckBox答案:B3. 以下哪个是VB的事件?A. ClickB. PrintC. DrawD. Open答案:A4. 在VB中,以下哪个语句用于结束程序?A. EndB. ExitC. StopD. Quit答案:A5. VB中,以下哪个属性用于设置控件的可见性?A. VisibleB. EnabledC. CaptionD. Text答案:A二、多选题(每题3分,共15分)1. VB中,以下哪些是合法的变量名称?A. 2variableB. variable2C. _variableD. variable$答案:B, C2. VB中,以下哪些是合法的常量声明方式?A. Const pi = 3.14B. Dim pi As Double = 3.14C. Const pi = "3.14"D. Dim pi = 3.14答案:A, D3. 在VB中,以下哪些是控件的属性?A. NameB. CaptionC. TextD. Value答案:A, B, C4. VB中,以下哪些是控制流程语句?A. If...Then...ElseB. For...NextC. While...WendD. Select...Case答案:A, B, C, D5. VB中,以下哪些是数组的声明方式?A. Dim arr(5)B. Dim arr(0 To 5) As IntegerC. Dim arr As Integer = New Integer(5)D. Dim arr(5) As Integer答案:A, B, D三、判断题(每题1分,共5分)1. VB是一种面向对象的编程语言。
VB语言程序设计试题库
VB 程序设计一、判断题1. 同一Form 窗体中的各控件可以相互重叠,其显示的上下层次的次序不可以调整。
( X )2. 一个对象的若能识别多个事件,我们只能对其中一个事件编程()3. 单选按钮与复选框对象的 Value 属性类型不同,且只能取值 True 和False。
(√)4. 事件过程由某个用户事件或系统事件触发执行,它不能被其他过程调用。
()5. 图片框的Move 方法不仅可以移动图片框,而且还可以改变该图片框的大小,同时也会改变该图片框有关属性的值。
(√)6. “A=B=C”是一个合法的 Visual Basic 语句。
()7. 当在一个简单组合框的文本框中输入一个它的列表框中没有的条目时,组合框会自动把这一条目添加到它的列表框中。
()8. Visual Basic 程序的运行可以从 Main ()过程启动,也可以从某个窗体启动。
(√)9. 在图片框中放置的控件既可以在该图片框内移动,也可以移出该图片框外。
()10. 对于文件系统控件,当驱动器控件 Drivel 中的驱动器符改变时,文件夹列表控件 Dir1 中显示的文件夹也作相应的改变,可以在Drive1 中的Change 事件中使用如下命令。
Dir1. Path= Drive1. Drive(√)11. 滚动条控件可作为用户输入数据的一种方法。
(√)12. 单选按钮控件和复选框控件都具有 Value 属性,它们的作用完全相同。
()13. 静态变量是一种局部变量,当原过程再次被执行时,静态变量的初值是上一次过程调用后的值。
(√)14. Visual Basic 提供的几种标准坐标系统的原点都是在绘图区域的左上角,如果要把坐标原点放在其他位置,则需使用自定义坐标系统。
(√)15.注释语句 REM 可自成一语句。
(√)16. 用鼠标选中某菜单控件时,触发Click事件;而用键盘选中该菜单控件时,触发 KeyPress ()17. 组合框兼有文本框和列表框两者的功能,用户可以通过键人文本或选择列表中的项目来进行选择。
- 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。
VB程序设计结构:顺序结构、分支结构、循环结构。
一、顺序结构题:二、分支结构:IF <条件> Then<语句组1>Else<语句组2>EndifIF <条件> Then<语句组>Endif答案:1、a=6 b=5 2、Value=60 3、a=94、a=9:b=75、a=7 b=91、以下程序段的执行结果是? A=1b=5c=4a=bb=cc=aPrint a;b;c 2、该程序段运行后,变量b的值为?a=7b=8a=a+bb=a-b当条件满足时,执行语句组1当条件不满足时,执行语句组2执行完语句组1或语句组2后执行Endif下面的语句。
4、该程序段运行后,变量a的值为?a=8b=7z=aa=bb=z5、经过几下几条语句,A和B的值分别为多少?A=6B=7C=AA=BB=C 6、Text1和Text2中分别输入5,6,求Labe7l中值?Dim X AS Single, Y ASSingle, Z AS SingleX=Val(Text1.text)Y=Val(Text2.text)Z=X*Y/10Label7.caption=Z当条件满足时,执行语句组,接着执行Endif下面的语句。
当条件不满足时,执行Endif下面的语句。
1 、以下程序段的执行结果为?A=5B=6If A<B thenT=AA=BB=TEnd ifPrint a;b 4、该程序段运行后,变量a和b的值分别为a=9:b=7If a<b thent=aa=bb=tEnd If3、该程序段运行后,变量a的值为?a=7If a<6 Thena=a-2End Ifa=a+22.下列程序运行后,变量Value的值是?x=12If x>=10 ThenValue=5*xElseValue=4*xEnd IfSelect case 表达式三、循环结构答案:1、3 2、s=s+i3、k=-3 a=504、s=0四、选择题1、流程图如右图所示,其输出结果是( )当表达式的值为表达式列表达1时,执行语句组1;当表达式的值为表达式列表达2时,执行语句组2; ……当表达式的值为表达式列表达n-1时,执行语句组n-1;当表达式的值不是上述值时,执行语句组n ;n = Text1.Text Select Case n Case 1 To 20 x = 10Case 2, 4, 6 x = 20Case Is < 10 x = 30 Case 10 x = 40 End Select Text2.Text = x End Sub程序运行后,如果在文本框Text1中输入10,然后单击命令按钮,则在Text2中显示的内容是 答案:10 cj =VAL( Text1.Text ) Select Case cj Case 0 To 59 dj = “ E ” Case 60 To 69 dj = “ D ” Case 70 To 79 dj = “ C ” Case 80 To 89 dj = “ B ” Case 90 To 100 dj = “ A ” Case ElseLabel1.Caption=“你输入的成绩有问题!” End SelectLabel1.Caption=“你的成绩等级为:”+dj End Sub程序运行后,如果在文本框Text1中输入87,然后单击命令按钮,则在Label1中显示的内容是答案:你的成绩等级为:BFor 循环变量=初值 To 终值 [Step 步长值] [循环体] Next 循环变量 在执行For 语句时,把初值赋给循环变量,并且记录终值和步长。
如果步长为1,Step 语句可省略。
执行循环体 当执行Next 语句时,要做两件事:第一是改变循环变量的值,循环变量(当前的值)+步长;第二是检查循环变量的新值是否已超过初值和终值的范围,如果没有超过,就返回执行循环体;若超过终值,就退出循环,执行Next 的后续语句。
n=0 For i=0 To 11 i = i+3 n = n+1 Next i Textl.Text=Str(n) 程序运行后,在文本框中显示的值是 ? 用以下程序段求100以内的偶数和,划线部分的语句应为? S=0 for i=0 to 100 step 2 _________ Next 以下程序段的执行结果为? a=5 For k=15 To 0 step -3 a=a + k Next k Print k;a 以下程序段的执行结果是? S = 1 For I = 0 to 4 S=S*I Next I print sA . 4B . 3C . 10D . 5答案=A2、该程序段运行后,变量y 的值是( )A . 25B . 20C . 15D . 0答案= B3、把二进制数10转换为十进制数,其值为( )A . 6B . 4C . 2D . 8答案= C4、下列属于Visual Basic合法变量名的是( )A . 8abB . a?2C . ifD . cengji答案= D5、流程图如右图所示,若输入x、y的值为1和-4,则输出结果是( )A . -5B . -3C . 3D . 5答案= D6、要使循环体t=t*k执行5次,循环变量的初值应该是( )A . 2B . 1C . 0D . 10答案= B7、2πa 在Visual Basic中的表达式是( )A . 2?3.1416?aB . 2*?aC . 2πaD . 2*3.1416*a 答案= D8、该程序段运行后,循环体执行的次数是( )A . 2B . 1C . 0D . 出错答案= C9、该程序段运行后,变量a,b的值是( )A . 3,2B . 2,1C . 2,3D . 5,2答案= A10、“x 小于30 且y 大于20”的逻辑表达式是( )A . x<30 Not y>20B . x<30 Or y>20C . x<30 And y>20D . x<30:y>20 答案= C11、表达式Int(3.141*100)/100的值是( )A . 314.1B . 314C . 3.14D . 3答案= C12、该程序段运行后,变量s的值为( )A . 80B . 60C . 15D . 3答案= C13、该程序段运行后,变量s的值为( )A . 10B . 50C . 1D . 5答案= B14、下面程序段的循环步长是( )For i=1 To 1000s=s+iNext iA . 不确定B . 1000C . 1D . 0答案=C15、以下程序段的执行结果为( )A=2:B=3If A<B thenT=A:A=B:B=TEnd ifPrint a;bA . 33B . 22C . 32D . 23答案=C16、王浩同学用VB设计了一个加法器,左图是它的主界面,右图是实现加法运算的关键代码。
右图中的代码应该写在()按钮的“Click”事件中。
A . “清除”B . “计算”C . “窗体”D . “退出”答案=B17、在VB程序中,能表示X或Y小于Z的表达式是( )A . X<Z And Y<ZB . X<Y<ZC . X<Z <YD . X<Z Or Y<Z答案=D18、如图,在这个用VB制作的“加法器中”,圈内部分需要使用右图中哪个控件?A . ③B . ②C . ①D . ④答案=D19、用以下程序段求100以内的偶数和,划线部分的语句应为( )S=0for i=0 to 100 step 2_________NextA . S=iB . S=S+2C . S=S+ID . i=i+2答案=C20、在VB中插入一个命令按钮,图中是这个命令按钮的属性窗口,那么这个命令按钮上显示的文字是:A . False B . start C. Command1 D . True答案=B21、以下程序段的执行结果为( )a=5For k=1 To 0a=a + kNext kPrint k;aA . -16B . 1121C . 15D . -116答案=C22、图中是一个按钮的“click”事件代码,这说明该按钮的作用是()A . 改变字体颜色B . 进行一个加法计算C . 取当前的系统时间D . 添加命令按钮答案=B23、如图,这个VB窗体中有()个标签框和()命令按钮。
A . 3、2B . 2、2C . 3、3D . 2、3答案=A24、在VB程序中,用以表示10<x<15 的表达式应该是()A . x>10 and x<15B . 10<x<15C . 10<x or x<15D . 10<x and x>15答案=A25、李刚要用Visual Basic设计一个程序,首先要做的是()。
A . 分析问题B . 编写代码C . 设计界面D . 调试与运行程序答案=A26、执行“A=5:A=A+5”语句后,变量A的值为()A . 10B . 5C . 0D . 不一定答案=A27、用VB设计一个程序,可以查询当前日期和时间并退出,运行界面如图所示,该窗体中用到了:A . 两个标签框和两个命令按钮B . 一个标签框和四个命令按钮C . 五个标签框D . 三个标签框和两个命令按钮答案=D28、以下程序段的执行结果是()A=1:b=2:c=3a=b:b=c:c=aPrint a;b;cA . 3 2 1B . 2 3 1C . 1 2 3D . 2 3 2 答案=D29、下面程序段的划线部分应是()A=321:b=654t=a:a=b:print a;b运行结果654321A . b=tB . a=tC . t=bD . b=a 答案=A30、表达式16/4-2^8*5MOD5\2的值为()A . 14B . 2C . 20D . 4答案=D31、执行以下程序段后,变量S的值为()S = 0For I = 0 to 4S=S+INext IA . 4B . 16C . 12D . 10答案=D32、执行以下程序段后,变量y的值为()x=3If x>3 Theny=x*xEnd Ify=2*xA . 6B . 3C . 0D . 9答案=A33、以下程序段的执行结果是()S = 1For I = 0 to 4S=S*INext Iprint sA . 12B . 10C . 4D . 24答案=D34、在用VB设计程序时,图中()工具用于插入标签框。