kl800.com省心范文网

武汉职业技术学院:《VISUAL BASIC程序设计》试卷四


武汉职业技术学院 《Visual Basic 程序设计》试卷四
一.选择题 (30 分)
(1)设窗体上有一个文本框,Text1,要求只能显示信息,不能输入。 A) Text1.MaxLength = 0 B) Text1.Enabled = False C) Text1.Visible = False D) Text1.Width = 0 (2) 以下能在窗体 Form1 的标题栏中显示“VisualBasic 窗体"的语句是 A) Form1.Name="VisualBasic 窗体" B) Form1.Title="VisualBasic 窗体" C) Form1.Caption="VisualBasic 窗体" D) Form1.Text="VisualBasic 窗体” (3)设菜单中有一个菜单项为"Open"。若要为该菜单命令设计访问键,即按下 Alt 及字母 O 时,能够执行"Open"命令,则在菜单编辑器中设置“Open"命令的方式是 A) 把 Caption 属性设置为&Open B) 把 Caption 属性设置为 O&pen C) 把 Name 属性设置为&Open D) 把 Name 属性设置为 O&pen (4) 以下关于 MsgBox 的叙述中,错误的是 A) MsgBox 函数返回一个整数 B) 通过 MsgBox 函数可以设置信息框中图标和按钮的类型 C) MsgBox 语句没有返回值 D) MsgBox 函数的第一个参数是一个整数,该参数只能确定对话框中显示的按钮数量 (5)在窗体上画一个名称为 Timer1 的计时器控件, 要求每隔 0.5 秒发生一次计时器事件,则 以下正确的属性设置语句是 A)Timer1.InterVal=0.5 B) Timer1.Interval=5 C) Timer.Interval=50 D) Timer1.Interval=500 (6)以下关于多重窗体程序的叙述中,错误的是 A)用 Hide 方法不但可以隐藏窗体,而且能清除内存中的窗体 B)在多重窗体程序中,各窗体的菜单是彼此独立的 C)在多重窗体程序中,可以根据需要指定启动窗体 D)对于多重窗体程序中,而且单独保存每个窗体 (7) 以下叙述中错误的是 A)事件过程是响应特定事件的一段程序 B)不同的对象可以具有相同名称的方法

C)对象的方法是执行指定操作的过程 D)对象事件的名称可以由编程者指定 (8) 以下合法的 Visual Basic 标识符是 A) ForLoop B) Const C) 9abc D) a#x (9) 当一个复选框被选中时,它的 Value 属性的值是 A) 3 B) 2 C) 1 D) 0 (10) 表达式 5 Mod 3+3\\5*2 的值是 A) 0 B) 2 C)4 D) 6 (11) 设 x=4,y=8,z=7,以下表达式的值是 x<y And (Not y>z) Or z<x A) 1 B) -1 C) True D) False (12) 在窗体上画一个名称为 Command1 的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() a$="VisualBasic" Print String(3,a$) End Sub 程序运行后,单击命令按钮,在窗体上显示的内容是 A) VVV B) Vis C) sic D) 11 (13) 以下叙述中错误的是 A) 在 KeyPress 事件过程中不能识别键盘的按下与释放 B) 在 KeyPress 事件过程中不能识别回车键 C) 在 KeyDown 和 KeyUp 事件过程中,将键盘输入的"A"和"a"视作相同的字母 D) 在 KeyDown 和 KeyUp 事件过程中,从大键盘上输入的"1"和从右侧小键盘上输入的"1"被 视作不同的字符 (14)在窗体上画一个名称为 Command1 的命令按钮,并编写如下程序: Private Sub Command1_Click() Dim x As Integer Static y As Integer x=10 y=5 Call f1(x,y) Print x,y End Sub Private Sub f1(ByRef x1 As Integer, y1 As Integer) x1=x1+2 y1=y1+2 End Sub 程序运行后,单击命令按钮,在窗体上显示的内容是 A) 10 5 B) 12 5 C) 10 7 D) 12 7

(15) 在窗体上画一个名称为 Command1 的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() x=InputBox("Input") Select Case x Case 1,3 Print "分支 1" Case Is >4 Print "分支 2" Case Else Print "Else 分支 " End Select End Sub 程序运行后,如果在输入对话框中输入 2,则窗体上显示的是 A) 分支 1 B) 分支 2 C) Else 分支 D) 程序出错

二.填空题(30 分)
1.以下程序段的输出结果是_______。 num =0 While num<=2 num = num+1 Wend Print num 2.窗体上有一个名称为 List1 的列表框,一个名称为 Text1 的文本框,一个名称为 Label1、 Caption 属性为“Sum”的标签,一个名称为 Command1、标题为“计算”的命令按钮。程序 运行后,将把 1~100 之间能够被 7 整除的数添加到列表框。如果单击“计算”按钮,则对 List1 中的数进行累加求和,并在文本框中显示计算结果,如图所示。以下是实现上述功能 的程序,请填空。 Private Sub Form_Load() For i=1 To 100 If i Mod 7 =0 Then ___________ End If Next End Sub Private Sub Command1_Click() Sum =0 For i=0 To_____ Sum =Sum+__________ Next Text1.Text=Sum

End Sub 3. 阅读程序: Option Base 1 Private Sub Form_Click() Dim a(3) As Integer Print "输入的数据是:"; For i=1 To 3 a(i)=InputBox("输入数据") Print a(i); Next Print If a(1)<a(2) Then t=a(1) a(1)=a(2) a(2)=_______ End If If a(2)>a(3) Then m=a(2) ElseIf a(1)>a(3) Then m=________ Else m=________ End If Print "中间数是:";m End Sub 程序运行后, 单击窗体, 在输入对话框中分别输入三个整数, 程序将输出三个数中的中间数, 4. 在窗体上画一个名称为“Command1”,标题为“计算”的命令按钮,再画 7 个标签,其 中 5 个标签组成名称为 Label1 的控件数组;名称为 Label2 的标签用于显示计算结果,其 Ca ption 属性的初始值为空;标签 Label3 的标题为“计算结果”。运行程序时会自动生成 5 个 随机数,分别显示在标签控件数组的各个标签中,如图所示。单击“计算”按钮,则将标签 数组各元素的值累加,然后计算结果显示在 Label2。请填空。 Private Sub Command1_Click() Sum = 0 For i=0 To 4 Sum=Sum+_________ Next ________=Sum End Sub 5. 在窗体上画一个名称为 Command1 的命令按钮,然后编写如下程序: Option Base 1 Private Sub Command1_Click()

Dim a As Variant a=Array(1,2,3,4,5) Sum=0 For i=1 To 5 Sum = sum+a(i) Next i x=Sum/5 For i =1 To 5 If a(i)>x Then Print a(i); Next i End Sub 程序运行后,单击命令按钮,在窗体上显示的内容是

三.编程题 (40 分)
1.用 InputBox 函数输入长方形的长和宽,用 MsgBox 输出长方形的周长和面积.(10 分) 2.打印出 3-100 的所有素数,并统计个数 (10 分) 3.编写求两数中较大数的 Function 过程,利用其求 3 个数中的最大数.(10 分) 4.定义一个数组存储以下数据 T Y I u o a j K g b m n ,将其以倒序输出.(10 分)

《Visual Basic 程序设计》试卷四答案
一.选择题 1-5 bcadd 二.填空题 1.3 6-10 adacb 11-15 dabdc

2.List1.AddItem i、 List1.ListCount-1 List1.List(i) 3 t a(3) a(1) Label1(i).Caption Label2.Caption 4 5

4 5


Visual Basic程序设计教程(第4版)实验答案

实验所属课本原件为《Visual Basic程序设计教程(第4版)(□主编 龚沛曾 □编者 杨志强 陆慰民 谢步瀛)》。安徽大学管理学院14级绅士为诸君所作(老司机为你带路)...

Visual_Basic程序设计教程(第4版)实验答案

实验所属课本原件为 《Visual Basic 程序设计教程 (..." & xl & vbCrLf & "职业:" & zy & vbCrLf ...——安徽大学管理学院 14 级 绅士为诸君所作 老...

《Visual Basic程序设计》期中考试试卷与参考答案

《Visual Basic程序设计》期中考试试卷与参考答案_教育学_高等教育_教育专区。《...VB6.0 集成开发环境中有许多常用窗口,除主窗口外,请再列出 四个常用窗口___、...

Visual Basic程序设计教程实验答案

Text1.Text = "VisualBasic 程序设计教程(第四版)..."职业:" & Option6.Caption & vbCrLf ElseIf ...媒体技术与应用" List1.AddItem "软件技术技术基础"...

《Visual_Basic程序设计》试题及其答案

《Visual_Basic程序设计》试题及其答案_电脑基础知识_..."武汉" Combo1.AddItem "广州" Combo1.AddItem "...Sub: 3 1 Sub: 4 1 四、程序填空题 (每空 2...

VisualBasic程序设计试题及答案2

《Visual Basic 程序设计》模拟试题及答案(二)一、单项选择题(每小题 2 分,...Text2 上的输出结果. 四、完善程序题(共 10 分) 30.假设在 C 盘根目录中...

...2015第二学期《Visual Basic 程序设计》期末试卷(A)...

2014-2015 第二学期《Visual Basic 程序设计》期末试卷(A)(满分 100 分,考试时间 100 分钟) 题号 得分 一二三四五 总分 ___级___专业___班得分 评卷人...

齐幼菊版《Visual Basic程序设计》课程作业(四)及答案

齐幼菊版《Visual Basic程序设计》课程作业(四)及答案_工学_高等教育_教育专区。齐幼菊版《Visual Basic程序设计》课程作业及答案浙江广播电视大学 《Visual Basic 程...

《VisualBasic程序设计》试题1

《VisualBasic程序设计》试题1_工学_高等教育_教育专区。《Visual Basic 程序设计...程序运行时单击 Command1 后,窗体 Form1 上的输出结果是 得分 评卷人 四、...

《Visual Basic程序设计》期末考试试题05-06(a)

Visual Basic 程序设计考试试卷 经济管理学院 《Visual Basic 程序设计》期末考试...( C ) A)EXE B)BAS C)FRM D)VBP 8.下面四个语句中能打印显示 20*30 ...