VB习题(含答案)
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章习题与答案
第1章习题与答案一、选择题1. 在VB集成环境创建VB应用程序时，除了工具箱窗口、窗体窗口、属性窗口外，必不可少的窗口是:（A）窗体布局窗口（B）立即窗口（C）代码窗口（D）监视窗口2. 保存新建的工程时，默认的路径是:（A）My Documents （B）VB98 （C）\ （D）Windows3. 将调试通过的工程经“文件”菜单的“生成.exe文件”编译成.exe后，将该可执行文件转到其他机器上不能运行的主要原因是:（A）运行的机器上无VB系统所需的动态连接库（B）缺少.frm窗体文件（C）该可执行文件有病毒（D）以上原因都不对4.当需要上下文帮助时，选择要帮助的“难题”，希望出现MSDN窗口及显示所需“难题”的帮助信息。
应按的键的（A）Help （B）F10 （C）Esc （D）F15.Visual Basic中提供的On Error Resume Next错误陷阱语句的功能是:（A）当发生错误时，使程序跳转到语句标号为0的程序块（B）当发生错误时，不使用错误处理程序块（C）当发生错误时，忽略错误行，继续执行下一语句（D）当发生错误时，终止本过程程序执行，继续执行下一过程6.在VB环境中，工程文件的扩展名是:（A）.frm （B）.bas （C）.vbp （D）.frx7.将一个VB程序保存在磁盘上，至少会产生的文件是:（A）.doc、.txt （B）aaa、.exe （C）.vbp、.frm （D）.bat、.sys8.下面关于对象的描述中，错误的是:（A）对象就是自定义结构变量（B）对象代表正在创建的系统中的一个实体（C）对象是一个状态和操作（或方法）的封装体（D）对象之间的信息传递是通过消息进行的9.下面4项中不属于面向对象系统三要素的是(A)变量（B）事件（C）属性（D）方法10.下面各种高级语言中，不是面向对象程序设计语言的是（A）Visual Basic （B）C++ （C）Pascal （D）Java二、填空题1．当进入VB集成环境后，发现没有显示“工具箱”窗口，应选择【1】菜单的【2】选项，使“工具箱”窗口显示。
vb6.0练习题及答案
一、选择题一、选择题1．在设计应用程序时，可以查看到应用程序工程中的所有部分的窗口是（．在设计应用程序时，可以查看到应用程序工程中的所有部分的窗口是（ ）。
A．窗体设计．代码C．属性D．工程资源管理器窗口．工程资源管理器窗口 >> 答案：d 2．窗体的Load事件的触发时机是（事件的触发时机是（ ）。
A．用户单击窗体时B．窗体被加载时C．窗体显示之后D．窗口被卸载时．窗口被卸载时 >> 答案：ｂ答案：ｂ3．与传统的程序设计语言相比，Visual Basuc最突出的特点是（最突出的特点是（ ）。
A．结构化程序设计B．程序开发环境C．事件驱动编程机制D．程序调试技术．程序调试技术答案：C 4．VB6.0集成开发环境的主窗口不包括（集成开发环境的主窗口不包括（ ）。
A．标题栏．状态栏 D．工具栏．工具栏．标题栏 B．菜单栏．菜单栏 C．状态栏答案：c 5．如果对象的名称为Mytext，而且对象有一个属性Text，那么在代码中引用该属性的正确格式是（ ）。
格式是（A．Text.Mytext B．Mytext.text C．Mytext.（Text）D．Mytext*Text 答案：b 6．下列可以激活属性窗口的操作是（．下列可以激活属性窗口的操作是（ ）。
A．用鼠标双击窗体的任何部位命令 C．按Ctrl+F4 用鼠标双击窗体的任何部位 B．执行“工程”菜单中的“属性窗口”命令D．按F4键答案： b d 答案：7．假定已在窗体上画了多个控件，并有一个控件是活动的，为了在属性窗口中设置窗体的属性，预先应制造的操作是（ ）。
属性，预先应制造的操作是（A．单击窗体上没有控件的地方．不执行任何操作 D．双击窗体．单击任一个控件 C．不执行任何操作．单击窗体上没有控件的地方 B．单击任一个控件的标题栏的标题栏答案：a 8．如果在文本框中键入字符时，应设置文本框的（（）属性。
只显示某个字符，如星号（*），应设置文本框的如果在文本框中键入字符时，只显示某个字符，A．Caption B．PasswordChar C．Text D．Char 答案：b 9．如果想让文本框中的内容在运行时不能编辑，需将文本框的（．如果想让文本框中的内容在运行时不能编辑，需将文本框的（ ）属性设置为True。
VB教材课后习题答案
<大学程序设计基础-Visual Basic>教材课后习题答案第1章一、选择题1 2 3 4 5 6 7B D BC B B D第2章一、选择题1 2 3 4 5 6 7 8 9 10B C B C B C A A A A11 12 13 14A B A A二、填空题1.rem或’ _ ：2.“” # #3.5x2-3x-2sinA/34.3214565.300三、操作题1、程序段：Private Sub Command1_Click()Dim x As Integer, y As IntegerDim s As Long, c As Longx = Text1.Texty = Text2.Texts = x * yc = (x + y) * 2Label3.Caption = "长方形的面积为" + Str(s)Label4.Caption = "长方形的周长为" + Str(c)End Sub3、程序段：Private Sub Command1_Click()Text1.Text = "第一"End SubPrivate Sub Command2_Click()Text1.Text = "第二"End Sub4、程序代码：Private Sub Text1_Change()Text1.MaxLength = 10End Sub5、程序代码：Private Sub Text1_Click()Text1.SelStart = 0Text1.SelLength = Len(Text1.Text)End Sub第3章一、选择题1 2 3 4 5 6 7D A D B A D B二、填空题1. False2.B^2-4*a*c else三、操作题1．从键盘输入三个值，判断它们能否构成三角形的三个边。
如果能构成一个三角形，则计算三角形的面积。
VB复习题(含答案)
VB复习题允许上机调试一、选择题1 设窗体上有一个文本框，名称为text1,程序运行后，要求该文本框不能接受键盘输入，但能输出信息，以下属性设置正确的是： BA)text1.maxlength=0 B)text1.enabled=falseC)text1.visible=false D)text1.width=02 以下能在窗体Form1的标题栏中显示“VisualBasic窗体"的语句是 CA) ="VisualBasic窗体"B) Form1.Title="VisualBasic窗体"C) Form1.Caption="VisualBasic窗体"D) Form1.Text="VisualBasic窗体”3 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：CPrivate Sub Command1_Click()x=InputBox("Input")Select Case xCase 1,3Print "分支1"Case Is >4Print "分支2"Case ElsePrint "Else 分支"End SelectEnd Sub程序运行后，如果在输入对话框中输入2，则窗体上显示的是A）分支1 B）分支2 C）Else分支D) 程序出错4 以下关于MsgBox的叙述中，错误的是 D （见书P88-92）A）MsgBox函数返回一个整数B) 通过MsgBox函数可以设置信息框中图标和按钮的类型C) MsgBox语句没有返回值D) MsgBox函数的第一个参数是一个整数，该参数只能确定对话框中显示的按钮数量5 在窗体上画一个名称为Timer1的计时器控件，要求每隔0.5秒发生一次计时器事件，则以下正确的属性设置语句是 DA）Timer1.InterV al=0.5 B) Timer1.Interval=5C) Timer1.Interval=50 D) Timer1.Interval=5006 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：BPrivate Sub Command1_Click()Static x As IntegerClsFor i=1 To 2y=y+xx=x+2NextPrint x,yEnd Sub程序运行后，连续三次单击Command1按钮后，窗体上显示的是A) 4 2 B) 12 18 C) 12 30 D) 4 67 以下叙述中错误的是DA）事件过程是响应特定事件的一段程序B）不同的对象可以具有相同名称的方法C）对象的方法是执行指定操作的过程D）对象事件的名称可以由编程者指定8 以下合法的V isual Basic标识符是AA) ForLoop B) Const C) 9abc D) a#x9 当一个复选框被选中时，它的V alue属性的值是 CA) 3 B) 2 C) 1（复选框被选中显示1，不选中显示0）D) 010 表达式5 Mod 3+3\5*2的值是BA) 0 B) 2 C)4 D) 611 设x=4,y=8,z=7，以下表达式的值是Dx<y And (Not y>z) Or z<xA) 1 B) -1 C) True D) False12 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： A Private Sub Command1_Click()a$="VisualBasic"Print String(3,a$)End Sub程序运行后，单击命令按钮，在窗体上显示的内容是A）VVV B) Vis C) sic D) 1113设有如下程序段：x=2For i=1 To 10 Step 2x=x+iNext运行以上程序后，x的值是 BA) 26 B) 27 C) 38 D) 5714 以下叙述中错误的是BA) 在KeyPress事件过程中不能识别键盘的按下与释放B) 在KeyPress事件过程中不能识别回车键C) 在KeyDown和KeyUp事件过程中，将键盘输入的"A"和"a"视作相同的字母D) 在KeyDown和KeyUp事件过程中，从大键盘上输入的"1"和从右侧小键盘上输入的"1"被视作不同的字符15 执行如下两条语句，窗体上显示的是Da=9.8596Print Format(a,"$00,00.00")A) 0,009.86 B) $9.86 C) 9.86 D) $0,009.8617 在窗体上画一个名称为Command1的命令按钮，并编写如下程序：DPrivate Sub Command1_Click()Dim x As IntegerStatic y As Integerx=10y=5Call f1(x,y)Print x,yEnd SubPrivate Sub f1(ByRef x1 As Integer, y1 As Integer)x1=x1+2y1=y1+2End Sub程序运行后，单击命令按钮，在窗体上显示的内容是A) 10 5 B) 12 5 C) 10 7 D) 12 718 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：BOption Base 1Private Sub Command1_Click()Dim aa= Array(1,2,3,4,5)For i=1 To UBound(a)a(i) = a(i)+i-1NextPrint a(3)End Sub程序运行后，单击命令按钮，则在窗体上显示的内容是A) 4 B) 5 C) 6 D)719 阅读程序Option Base 1Private Sub Form_Click()Dim arr,SumSum = 0arr = Array(1,3,5,7,9,11,13,15,17,19)For i=1 To 10If arr(i)/3 = arr(i)\3 ThenSum =Sum+arr(i)End IfNext iPrint SumEnd Sub程序运行后，单击窗体，输入结果为 CA）13 B）14 C）27 D）1520 在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：D Option Base 1Private Sub Command1_Click()Dim a As V arianta=Array(1,2,3,4,5)Sum=0For i=1 To 5Sum = sum+a(i)Next ix=Sum/5For i =1 To 5If a(i)>x Then Print a(i);Next iEnd Sub程序运行后，单击命令按钮，在窗体上显示的内容是A）1 2 B） 1 2 3 C) 3 4 5 D）4 521.在V isual Basic设计界面中不能隐藏的窗口是( A)。
VB部分课后习题答案
1. 选择题(1) 假定窗体的名称（Name属性）为Form1，则把窗体的标题设置为“VB Test”的语句为（B）。
A. Form1="VB Test"B. Caption="VB Test"C. Form1.Text="VB Test"D. ="VB Test"(2) 下列不能打开代码窗口的操作是（D）。
A．双击窗体上的某个控件B．双击窗体C．按F7键D．单击窗体或控件(3) 为了保存一个Visual Basic应用程序，应当（D）。
A．只保存窗体文件（.frm）B．分别保存工程文件和标准模块文件（.bas）C．只保存工程文件（.vbp）D．分别保存工程文件、窗体文件和标准模块文件(4) 为了装入一个Visual Basic应用程序，应当（C）。
A．只装入窗体文件（.frm）B．分别装入工程文件和标准模块文件（.bas）C．只装入工程文件（.vbp）．D分别装入工程文件、窗体文件和标准模块文件(5) 不为了使窗体的大小可以改变，必须把它的BorderStyle属性设置为（A）。
A．1 B．2 C．3 D．42. 填空题(1) 在用Visual Basic开发应用程序时，通常首先需要新建工程、其次还要经过、、、和5步。
(2) 控件和窗体的Name属性只能通过属性窗口设置，不能在运行期间设置。
(3) 代码窗口分为左右两栏，左边一栏称为对象，右边一栏称为事件。
(4) 为了在输入程序时能自动进行语法检查，必须执行菜单中的命令，打开对话框，然后选择“编辑器”选项卡中的选项。
(5) 在保存VB应用程序中，窗体文件和工程文件的扩展名分别为 .frm 和.vbp 。
(6) 为了把一个Visual Basic应用程序装入内存，只要装入工程文件即可。
(7) Visual Basic应用程序通常由3类模块组成，即、和。
(8) 在窗体上画两个文本框和一个命令按钮，然后在命令按钮的代码窗口中编写如下事件过程：Private Sub Command1_Click( )Text1.Text=“VB Programming”Text2.Text=Text1.TextText1.Text=“ABCD”End Sub程序运行后，单击命令按钮，两个文本框中显示的内容分别为ABCD 和VB Programming 。
vb练习题及答案
vb练习题及答案VB练习题及答案一、选择题1. 在VB中，以下哪个是正确的数据类型？A. IntegerB. IntC. Both A and BD. None of the above答案：C2. VB中，哪个关键字用于声明变量？A. DimB. DeclareC. DefineD. Set答案：A3. 在VB中，以下哪个是正确的循环结构？A. ForB. WhileC. RepeatD. All of the above答案：D4. VB中，以下哪个是正确的条件语句？A. IfB. SwitchC. CaseD. A and B only答案：A5. 在VB中，以下哪个是正确的数组声明方式？A. Dim myArray(5) As IntegerB. Dim myArray As Integer(5)C. Both A and BD. None of the above答案：A二、填空题1. 在VB中，使用________关键字可以定义一个类。
答案：Class2. VB中，使用________方法可以为控件添加事件处理程序。
答案：AddHandler3. 在VB中，________方法用于结束程序的执行。
答案：End4. VB中，________属性用于获取或设置一个控件的文本。
答案：Text5. 在VB中，________方法用于打开一个文件。
答案：Open三、简答题1. 请简述VB中的事件和事件处理程序的概念。
答案：在VB中，事件是用户或程序触发的特定动作，如按钮点击或键盘敲击。
事件处理程序是一个过程，当特定的事件发生时，会被自动调用以响应该事件。
2. 描述VB中如何使用For循环。
答案：在VB中，For循环用于重复执行一段代码直到满足特定条件。
基本语法是：```For counter = start To end [Step increment]' 循环体Next [counter]```3. 解释VB中什么是继承，并给出一个简单的示例。
vb常用控件习题(含答案)
1.下列控件中没有Caption属性的是。
A)框架B)列表框C)复选框D)单选按钮2.复选框的Value属性为1时，表示。
A)复选框未被选中B)复选框被选中C)复选框内有灰色的勾D)复选框操作有误3．用来设置斜体字的属性是。
A)FontItalicB)FontBoldC)FontNameD)FontSize4.将数据项“China”添加到列表框Listl中成为第二项应使用语句。
A)List1.AddItem“China”,1B)List1.AddItem“China”,2C)List1.AddItem1,“China”D)List1.AddItem2,“China”5.引用列表框Listl最后一个数据项，应使用语句。
A)List1.List(List1.ListCount)B)List1.List(ListCount)C)List1.List(List1.ListCount-1)D)List1.List(ListCount-1)6.假如列表框Listl有四个数据项，那么把数据项“China”添加到列表框的最后，应使用语句。
A)List1.AddItem3,“China”B)List1.AddItem“China”,List1.ListCount-1C)List1.AddItem“China”,3D)List1.AddItem“China”，List1.ListCount7．执行了下面的程序后，列表框中的数据项有。
PrivateSubForm_Click()Fori=1to6List1.AddItemiNextiFori=1to3List1.RemoveItemiNextiEndSubA)1，5，6B)2，4，6C)4，5，6D)1，3，58.如果列表框List1中没有选定的项目，则执行List1.RemoveItemList1.ListIndex语句的结果是。
A)移去第一项B)移去最后一项C)移去最后加入列表中的一项D)以上都不对9.如果列表框List1中只有一个项目被用户选定，则执行Debug.PrintList1.Selected(List1.ListIndex)语句的结果是。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
12、决定一个控件不可见，要将该控件的( A、Enabl
C、Width 13、以下算术运算符中，优先级最低的是( A、\ )。（1 分）
D、Text
B、/
C、^ 14、下列表达式中，合法的是( A、a<b+c )。（1 分）
D、*
B、a≥b+c
C、a≤b+c 15、表达式 4+5\6*7/8 mod A、4 9 的值是( )。（1 分）
End Sub,运行时，单击按钮，输出结果是( B、6 18
)。（1 分）
C、12 36、若有 k
6 = 10，则循环结构 Do Until k < 0: k =
D、12 k -
18 )。（1 分）
1: Loop 中的循环体执行次数是(
A、9
B、10
C、11 37、下列语句中，不能实现循环 100 次的是( A、N=0:Do: N=N+1: Loop Until N>=100 )。（1 分）
25、设有如下变量声明：Dim A、TextDate=#1/1/2002#
C、TextDate=date("1/1/2002") 26、 在立即窗口中运行以下语句， a="Beijing" 分） A、Beijing 和 ShangHai 中间没有空格
D、TestDate=Format("m/d/yy","1/1/2002") :b="ShangHai" :Print a,b 对其输出结果的描述中， 正确的是( )。 （1
D、a≠b+c
B、5
C、6 16、下列语句中，合法的是( A、Print a:spc )。（1 分）
D、7
B、Print TAB(10)*"VB"
C、Print
TAB(10): 1234.56 )。（1 分）
D、Print "Date(
)"+"Time(
)"
17、下列变量名写法错误的是( A、abc
C、60 45、下列语句错误的是( A、Private )。（1 分）
D、13
a(-10 To 5)
B、Dim a(N)
'N 为变量
C、Dim
a() As Integer
D、Dim a%(10,-10
To -10)
46、能使一维数组 arr(6)元素个数加 1，但保留数组中原有元素的语句是( A、ReDim arr(7)
C、2 48、以下定义数组或给数组元素赋值的语句中，错误的是( A、Dim a : a=Array(1,2,3,4,5)
D、3 )。（1 分） B、Dim a( ) : a=Array(1,2,3,4,5)
C、Dim
A%() : a=Array(1,2,3,4,5) Dim
D、-6
B、exit
C、end 43、要从 For … Next 循环中退出循环，应使用(
D、sub )语句。（1 分）
A、Exit
B、Exit For
C、Continue
D、Stop Loop )。（1 分）
44、如下数组声明语句 Dim a(3, -2 To 1, 5)中数组 a 包含的元素个数为( A、96 B、75
B、abc123
C、abc_123 18、判断正数 a 的开平方是否为整数的正确语句为( A、a >0 and sqr(a)=chr(a)
D、123abc )。（1 分） B、a >0 or sqr(a)=abs(a)
C、a
>0 or
sqr(a)=int(sqr(a)) : b!=14.5，则执行 Print a%;b!
C、a 值为 5，b 值为 5 28、下列语句中，正确的是( A、If x<3*y And x>y )。（1 分） Then y=x^3
D、a 值为 5，b 值为 3
B、If x<3*y And
x>y Then y=3x
C、If x<3*y 29、下面程序段 Dim A、5
: x>y x%:
Then y=x^3 x=5: If x Then y=x+1
B、Beijing 和 ShangHai 中间有 1 个空格
C、Beijing 和 ShangHai 中间有 6 个空格 27、语句段 A=3: B=5:T=a：a=b: b=t 执行后( A、a 值为 3，b 值为 3 )。（1 分）
D、Beijing 和 ShangHai 前面有 7 个空格
B、a 值为 3，b 值为 5
C、Int(Rnd*51)+49 21、函数 UCase("basic")的值为( A、Basic )。（1 分）
D、Int(Rnd*51)+50
B、basic
C、BAsic 22、设 a="39 级台阶"，使 b="台阶"的语句是( A、Right(a,4) )。（1 分）
D、BASIC
B、Instr(a,5,4)
D、x> y and>z Choose(nop, "春", "夏", "秋", "冬") 后，op 的值为( )。
B、夏
C、秋 41、执行下列语句 a = A、5 3:x = IIf(a >
D、冬 5, int(-5.6), Fix(5.6))后，x 的值是( B、-5 )。（1 分）
C、6 42、结束当前程序运行的语句是( A、quit )。（1 分）
A、Today
B、Tomorrow
C、Yesterday 31、窗体上有一个命令按钮 Command1,编写如下事件过 程: Private Sub
D、5
Command1_Click() :x = Val(InputBox("x="))
: y
= InputBox("y=") :
Print x
+ y
: E
nd Sub, 单击命令按钮，先后在两个输入对话框中输入 123 和 321，窗体显示的内容是( A、444 B、123321
)。（1 分）
C、123+321 32、执行语句 MsgBox "AAA", 2, "BBB" A、AAA
D、出错信息 后，所产生的消息框的标题是( B、BBB )。（1 分）
C、Left(a,5,4)
D、mid(a,4,2)
23、下列( A、100
)是不合法的常量。（1 分） B、10E02
C、100.0 24、下列对变量的定义中，定义 X 为变体型变量的是( A、Dim X as Double
D、10e0.5 )。（1 分） B、Dim X
C、Dim
X!
D、X%=23 TestDate As Date，为变量 TestDate 正确赋值的表达方式是( B、TestDate=#"1/1/2002"# )。（1 分）
C、2 33、已知：a = "Software and Hardware"，b = )。（1 分） Len(a)，c
D、出错，不能产生消息框 = Right(a, 8)，执行 MsgBox a, b, c 后，在弹出的
信息框的标题栏中显示的信息是( A、Software and Hardware
B、Software
D、If x<3*y And Else y=x 运行后，y 结果是( B、6
x>y Then y=x**3 )。（1 分）
C、1 30、执行语句 显示的信息是( a = InputBox("Today", )。（1 分）
D、显示出错信息 "Tomorrow", "Yesterday", 5, 5)，将显示一个输入对话框，在对话框的输入区中
C、Hardware 34、阅读下列程序 段： m = 0: For i = 1 To 3: For j =
D、19
1 To i:
m
= m
+ j:
Next j, i:执行以
上的循环后，i 和 m 的值分别为( A、3 6
)。（1 分） B、3 10
C、4
6
D、4
10
35、窗体上有一个命令按钮 Command1，编写如下事件过程： Private 0: Next m: A、6 6 Sub Command1_Click(): For j = Print 1 To 3: a, b: a = 0: a For m = a = 1 + 1: To 3: b a = = b a + + 2: 1: b = Next j:
D、a >0 and 后，输出结果是( B、12 14.5
sqr(a)=fix(sqr(a)) )。（1 分）
19、已知 a%=12.8 A、12.8 14
C、12.8 20、以下(
15 )语句可表示[50,100]之间的随机整数。（1 分）
D、13
14.5
A、Rnd*51+49
B、Rnd*51+50
D、属性窗口
A、窗体名称和该窗体文件名必须一致
B、窗体名称和该窗体文件名可以不相同
C、窗体名称和该窗体文件名不能使用汉字
D、窗体名称不能使用汉字、但该窗体文件名能使用汉字 )得到帮助。（1 分）
4、Visual Basic 有完备的 Help 联机帮助功能，可以通过按下功能键( A、F9 B、F8