VB程序设计月在线考试答案(20200723034650)
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. 数学表达式3≤xl0在vb中的逻辑表达式为 d 。
(a) 3=x10(b) 3=x and x10(c) x=3 or x10 (d) x=3 and x106. rnd函数不可能为下列 b值。
(a) 0 (b) 1(c) 0.1234 (d) 0.00057. 赋值语句:a=123+mid(123456，3，2)执行后，a变量中的值是d。
(a) 12334(b) 123 (c) 12334 (d) 1578. 对于语句if x=l then y=l，下列说法正确的是 c 。
(a) x=l和y=l均为赋值语句(b) x=l和y=l均为关系表达式(c) x=l为关系表达式，y=l为赋值语句(d) x=l为赋值语句，y=l为关系表达式9. 下面程序段表示求两个数中的大数， d 不正确。
(a) max=iif(xy，x，y) (b) if xy then max=x else max=y(c) max=x (d) ify=x then max=yif y=x then max=y max=x10.当在文本框中输入“abcd”4个字符时，窗体上显示的是c。
VB程序设计试题与答案-1资料
《VB程序设计基础》试题一、选择题：（每空 2 分，共 20 分）1. 与传统的程序设计语言相比,Visual Basic最突出的特点是___________。
A. 结构化程序设计B. 程序开发环境C. 事件驱动编程机制D. 程序调试技术2. Visual Basic 是一种面向对象的程序设计语言，构成对象的三要素是________。
A. 属性、事件、方法B. 控件、属性、事件C. 窗体、控件、过程D. 窗体、控件、模块3. 窗体模块保存在一个扩展名为__________的文件中。
A. basB. vbpC. vbgD. frm4. 下面正确的赋值语句是_________。
A. x+y=30B. y=π*r*rC. y=x+30D. 3y=x5. 设S=“492”，表达式Right（S,1）+Left（S,1）+Mid（S,2,1）的值为__________。
A.“492”B.“249”C.“294”D.“429”6. 将数学表达式a≤b≤c写成Visual Basic表达式，正确的是__________。
A. a<=b<=cB. a<=b Or b<=cC. a<=b And b<=cD. a<=b Not b<=c7.为了把焦点移到文本框，所使用的方法是___________。
A. SetFocusB.VisibleC.RefreshD.GetFocus8. INT（100*RND）产生的随机整数的闭区间是_____________。
A.[0，100]B.[1，100]C.[1，99]D.[0，99]9. 一个数组说明为Dim a(0 to 5，1 to 5) As Integer，则该数组共有_________个元素。
A. 5B. 36C. 30D. 不确定10. 下面过程定义语句合法的是____________。
A. Function P1（P1）B. Function P1（By Val x As Integer ） As IntegerC. Sub P1（x As Integer ）As SingleD.Sub P1（ByVal x （））1．找出100以内能同时被3、5、7整除的最小5个数据。
vb考试试题及答案
vb考试试题及答案一、选择题（每题2分，共20分）1. 在VB中，以下哪个关键字用于声明类模块中的属性？A. DimB. PublicC. PrivateD. Property答案：D2. VB中的“Option Explicit”语句用于做什么？A. 声明变量类型B. 强制变量声明C. 定义过程D. 创建对象实例答案：B3. 下列哪个不是VB的控件事件？A. ClickB. LoadC. ChangeD. Hover答案：D4. 在VB中，以下哪个不是标准数据类型？A. IntegerB. StringC. BooleanD. Pointer答案：D5. VB中的“With”语句用于什么？A. 初始化对象B. 创建对象实例C. 引用对象的多个属性或方法D. 循环遍历集合答案：C6. 在VB中，如何将一个表达式的结果赋值给一个变量？A. 使用“=”运算符B. 使用“==”运算符C. 使用“:=”运算符D. 使用“->”运算符答案：A7. 下列哪个是VB中的循环结构？A. IfB. For EachC. Select CaseD. While答案：D8. 在VB中，如何表示一个空引用？A. NullB. NothingC. EmptyD. Undefined答案：B9. VB中的“Handles”关键字用于什么？A. 过程定义B. 事件处理C. 类定义D. 属性声明答案：B10. 在VB中，以下哪个不是集合的属性或方法？A. AddB. ItemC. CountD. Sort答案：D二、填空题（每题2分，共20分）11. VB中的________关键字用于定义一个方法或属性的访问级别。
答案：Private12. 当你想要在VB中创建一个新类时，你需要使用________关键字。
答案：Class13. 在VB中，________方法用于在运行时创建对象。
答案：New14. 如果你想要在VB中捕获并处理异常，你应该使用________语句。
vb程序设计书习题和参考答案
vb程序设计书习题和参考答案练习题习题⼀⼀、判断题1．Visual Basic是以结构化的Basic语⾔为基础、以事件驱动作为运⾏机制的可视化程序设计语⾔。
2．⾯向对象的程序设计是⼀种以对象为基础，由事件驱动对象的编程技术。
3．事件是由Visual Basic预先定义的对象能够识别的动作。
4．新建⼯程时系统会⾃动将窗体标题设置为Form1。
5．控件的属性值不可以在程序运⾏时动态地修改。
6．决定对象是否可见的属性为Visible属性，决定对象可⽤性的属性是Enabled属性。
7．保存Visual Basic⽂件时，若⼀个⼯程包含多个窗体或模块，则系统先保存⼯程⽂件，再分别保存窗体或模块⽂件。
8．单击“启动”菜单项将窗体装⼊内存时，⼀定触发窗体的Load事件。
9．“事件过程”是⽤来完成事件发⽣后所要执⾏的程序代码。
10．在打开某窗体时，初始化该窗体中的各控件，应选⽤Load事件。
⼆、选择题1．⼯程⽂件的扩展名为。
A、.frxB、.basC、.vbpD、.frm2．下列不属于对象的基本特征是。
A、属性B、⽅法C、事件D、函数3．在设计模式双击窗体将显⽰的窗⼝是A、⼯程窗⼝B、⼯具箱C、代码窗⼝D、属性窗⼝4．VB中运⾏程序的快捷键是A、F2B、F5C、Alt+F35．改变控件在窗体中的上下位置应修改该控件的属性。
A、TopB、LeftC、WidthD、Right6.窗体模块的⽂件扩展名是A、.exeB、.basC、.frxD、frm7．设置窗体的字体⽤属性。
A、FontNameB、FontSizeC、FontBoldD、FontItalic8.设置窗体的字号⽤属性。
A、FontNameB、FontSizeC、FontBoldD、FontItalic9．下列选项中不属于事件的是。
A、DblclickB、LoadC、ShowD、KeyUp10．VB编制的程序保存在磁盘上，⾄少会产⽣何种⽂件。
A、.doc与.txtB、.com与.exe.C、.bat与.frmD、.vbp与.frm三、程序设计题1．新建⼀个⼯程，单击窗体时，在窗体上显⽰“欢迎使⽤Visual Basic程序”。
大学vb考试题库及答案
大学vb考试题库及答案一、单项选择题（每题2分，共20分）1. 在Visual Basic中，以下哪个是合法的变量名？A. 2variableB. Variable2C. variable_2D. Variable!答案：B2. Visual Basic中，以下哪个是正确的整型常量？A. 123.45B. 0x1AC. 1.2E3D. 0.1答案：B3. 以下哪个是Visual Basic中的保留关键字？A. MyVarB. DimC. VarD. MyFunction答案：B4. 在Visual Basic中，以下哪个是正确的子程序声明？A. Sub MySub()B. Function MySub()C. Sub MySub(x As Integer)D. Function MySub(x As Integer) As Integer答案：C5. Visual Basic中，以下哪个是正确的数组声明？A. Dim MyArray(10)B. Dim MyArray(0 To 10) As IntegerC. Dim MyArray() As Integer = New Integer(10)D. Dim MyArray(10) As Integer答案：B6. 在Visual Basic中，以下哪个是正确的条件语句？A. If x > 0 Then Print "Positive"B. If x > 0 ThenPrint "Positive"End IfC. If x > 0 ThenPrint "Positive"End IfD. If x > 0 ThenPrint "Positive"End If7. Visual Basic中，以下哪个是正确的循环结构？A. For i = 1 To 10Print iNext iB. For i = 1 To 10Print iLoopC. While i < 10Print ii = i + 1End WhileD. Do While i < 10Print ii = i + 1Loop8. 在Visual Basic中，以下哪个是正确的函数调用？A. Call MyFunction(5)B. MyFunction 5C. MyFunction(5)D. MyFunction Call 5答案：C9. Visual Basic中，以下哪个是正确的事件处理程序？A. Sub Form_Click()End SubB. Sub Form_Click(ByVal sender As Object, ByVal e As EventArgs)End SubC. Sub Form_Click(ByVal sender As Object)End SubD. Sub Form_Click(ByVal e As EventArgs)End Sub答案：B10. 在Visual Basic中，以下哪个是正确的窗体属性？A. Me.Caption = "My Form"B. Me.Text = "My Form"C. = "My Form"D. Me.Title = "My Form"答案：A二、填空题（每题2分，共20分）1. 在Visual Basic中，声明一个整型变量的正确语法是：Dim ________ As Integer。
VB程序设计在线考试答案精编
V B程序设计在线考试答案精编Document number：WTT-LKK-GBB-08921-EIGG-22986《VB程序设计》课程综合复习资料一、单项选择1．若要使标签控件显示时，不覆盖其背景内容，应设置标签控件的（D ）属性。
A．BACKCOLOR B．BORDERSTYLE C．FORECOLORD．BACKSTYLE2．如果要在文本框中输入字符时，只显示某个字符，如星号（*），运行时，在文本框中输入的字符仍然显示出来，而不显示星号，原因可能是（B ）A．文本框的MULTILINE属性值为TRUEB．文本框的LOCKED属性值为TRUEC．文本框的MULTILINE属性值为FALSED．文本框的LOCKED属性为FALSE3．下列关于属性设置的叙述错误的是：（ A）A．一个控件具有什么属性是VB预先设计好的，用户不能改变B．一个控件具有什么属性是VB预先设计好的，用户可以改变C．一个控件的属性即可以在属性窗口中设置，也可以用程序代码设置D．一个控件的属性在属性窗口中设置，还可以利用程序代码为其设置新值4．下列说法正确的是（C ）A．对象属性只能在“属性窗口”中设置B．一个新的工程可以在“工程窗口”中建立C．必须先建立一个工程，才能开始设计应用程序D．只能在“代码窗口”中编写程序代码5．下列关于窗体上控件的基本操作错误的是：（A ）A．下一次DEL键只能删除一个控件B．按下一次DEL键可以同时删除多个控件C．按住SHIFT键，然后单击每个要选择的控件，可以同时选中多个控件D．按住ALT键，然后单击每个要选择的控件，可以同时选中多个控件6．下列关于设置控件属性的叙述正确的是（C ）A．用户必须设置属性值B．所有的属性值都可以由用户随意设定C．属性值不必一一重新设置D．不同控件的属性项都完全一样7．如果将布尔常量值TRUE赋值给一个整型变量，则整型变量的值为（B ）A．0 B．-1 C．TRUE D．FALSE8．下列关于控件画法的叙述错误的是（D ）A．单击一次工具箱中的控件图标，只能在窗体上画出一个相应的控件B．按住CTRL键后单击一次工具箱中的控件图标，可以在窗体上画出多个相同类型的控件C．双击工具箱中的控件图标，所画控件的大小和位置是固定的D．不合用工具箱中的控件工具，不可以在窗估上画出图形对象，但可以写入文字字符9．应用程序设计完成后，应将程序保存，保存的过程是（D ）A．只保存窗体文件即可B．只保存工程文件即可C．先保存工程文件，之后保存窗体文件D．先保存窗体文件（或标准模块文件），之后还要保存工程文件10．VB应用程序的运行模式是（C ）A．解释运行模式B．编译运行模式C．两者都有D．汇编模式11．可视化编程的最大优点是（ C）A．具有标准工具箱B．一个工程文件由若干个窗体文件组成C．不需要编写大量代码来描述图形对象D．所见即所得12、当一个对象（如窗体或图片框）被移动或改变大小之后，或当一个覆盖该窗体被移开之后，如果要保持该所画图形的完整性，可以选择触发（ A）事件来完成图形的重画工作。
《VB语言程序设计》习题答案
《VB语言程序设计》习题参考答案第1章习题一、单选题1．D 2．B 3．C 4．A 5．C 6. A 7．A 8．B 9．C 10．(1)A (2)B二、多选题1．ACDE 2．BCDE 3．CD 4. CE三、填空题1．事件驱动 2．解释，编译 3．设计，运行，中断4. 属性，方法，事件5. Command2_Click6. 中央，代码7．MyForm.frm 8. (1)Cmd1_Click() (2)Print "VB语言程序设计"编程及上机调试1. 按要求设置窗体属性2．在窗体上建立一个标签Label1。
程序代码如下：Private Sub Form_Click()Label1.Caption = "你单击了窗体"End SubPrivate Sub Form_DblClick()Label1.Caption = "你双击了窗体"End Sub3．在窗体上建立两个文本框Text1(输入数)、Text2(输出数)和一个命令按钮Command1。
两个文本框的Text属性均为空。
Private Sub Command1_Click()Dim x As Singlex = Val(Text1.Text)Text2.Text = 15 * xEnd Sub第2章习题一、单选题1．①D，②D 2．①A，②C 3．A 4．B 5．B 6．B 7．C 8．D 9．B 10．B 11．A 12．A 13．B 14．A 15．B 16．A 17．B二、多选题1．BD 2．CD 3．AC 4. AD三、填空题1．(1) Sin(50*3.14159/180) (2) (2+x*y)/(2–y*y)(3) a*a–3*a*b/(3+a) (4) x^(3/8)+Sqr(y*y+4*a*a/(x+y^3))2．Int(50+6*Rnd)3．(1)138 (2)3 (3)214 (4) "inchina" (5)70 (6) "45"(7)04. "系统管理数据库"编程及上机调试1～3题：按要求完成操作练习。
VB程序设计试题及参考答案
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程序设计"分别代表（）。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
VB 程序设计》课程综合复习资料一、单项选择1．若要使标签控件显示时，不覆盖其背景内容，应设置标签控件的（ D ）属性。
A．BACKCOLOR B．BORDERSTYLE C．FORECOLOR D．BACKSTYLE 2．如果要在文本框中输入字符时，只显示某个字符，如星号（* ），运行时，在文本框中输入的字符仍然显示出来，而不显示星号，原因可能是（ B ）A. 文本框的MULTILINE属性值为TRUEB. 文本框的LOCKED!性值为TRUEC. 文本框的MULTILINE属性值为FALSED. 文本框的LOCKED!性为FALSE3. 下列关于属性设置的叙述错误的是：（A）A. —个控件具有什么属性是VB预先设计好的，用户不能改变B. 一个控件具有什么属性是VB预先设计好的，用户可以改变C. 一个控件的属性即可以在属性窗口中设置，也可以用程序代码设置D. —个控件的属性在属性窗口中设置，还可以利用程序代码为其设置新值4. 下列说法正确的是（C ）A. 对象属性只能在“属性窗口”中设置B. 一个新的工程可以在“工程窗口"中建立C. 必须先建立一个工程，才能开始设计应用程序D. 只能在“代码窗口”中编写程序代码5. 下列关于窗体上控件的基本操作错误的是：（A ）A. 下一次DEL键只能删除一个控件B. 按下一次DEL键可以同时删除多个控件C. 按住SHIFT键，然后单击每个要选择的控件，可以同时选中多个控件D. 按住ALT键，然后单击每个要选择的控件，可以同时选中多个控件6. 下列关于设置控件属性的叙述正确的是（C ）A. 用户必须设置属性值B. 所有的属性值都可以由用户随意设定C. 属性值不必一一重新设置D. 不同控件的属性项都完全一样7. 如果将布尔常量值TRUE赋值给一个整型变量，则整型变量的值为（B ）A. 0B. -1C. TRUED. FALSE8. 下列关于控件画法的叙述错误的是（ D ）A. 单击一次工具箱中的控件图标，只能在窗体上画岀一个相应的控件B. 按住CTRL键后单击一次工具箱中的控件图标，可以在窗体上画岀多个相同类型的控件C. 双击工具箱中的控件图标，所画控件的大小和位置是固定的D. 不合用工具箱中的控件工具，不可以在窗估上画岀图形对象，但可以写入文字字符9. 应用程序设计完成后，应将程序保存，保存的过程是（ D ）A. 只保存窗体文件即可B. 只保存工程文件即可C. 先保存工程文件，之后保存窗体文件D. 先保存窗体文件（或标准模块文件），之后还要保存工程文件10. VB应用程序的运行模式是（C ）A.解释运行模式B.编译运行模式C.两者都有D.汇编模式11．可视化编程的最大优点是（C）A. 具有标准工具箱B. 一个工程文件由若干个窗体文件组成C. 不需要编写大量代码来描述图形对象D. 所见即所得12、当一个对象（如窗体或图片框）被移动或改变大小之后，或当一个覆盖该窗体被移开之后，如果要保持该所画图形的完整性，可以选择触发（ A ）事件来完成图形的重画工作。
A．Paint B．Load C．Click D．Active13、滚动条控件的属性中，表示取值范围最大值的属性是（A）A．Max B．LargeChange C ．Min D．Value14、程序中如果需要检测和控制鼠标的位置和状态的改变，就需要使用鼠标事件，其中下面哪个选项用于表示拖动事件（A ）A．DragDrop B ．Mouse DownC．MouseUp D．MouseMove15、命令按钮的标题文字由（B ）属性来设置。
Caption C ．Name D ．（名称）A．Text B16、下面程序运行后输出的结果是（B ）。
Chr1="CCCCHIINAAAA"Chr2=Left（Chr1,3）PRINT Chr2ENDA ．CHIB ．CCC C ．INAD ．AAA17、以下语句的输出结果是（C ）。
Print Format$, "###,###.##"）A ．032,548,50B ．325,485.00C ．D ．32,548,5018、若要设置文本的显示颜色，则可用（ B ）属性来实现。
A ．BackColorB ．ForecolorC ．FillColorD ．Backstyle19、在运行时，若要调用某命令钮的Click 事件过程，则可设置该命令钮对象的（B ）属性为Ture来实现。
A ．EnabledB ．Value C．Default D．Cancel）。
20、表达式4+5 \ 6 * 7 / 8 Mod 9的值是（BA ．4 B．5 C．6D．7二、简答题1．在程序设计中为什么尽量不用GoTo语句？2．框架的作用是什么？3．如何为一个菜单项设置热键和快捷键？4．程序出错的类型有哪几种？5．在设计状态，若用户想打开代码窗口，应怎样操作？代码窗口主要包括哪几部分？6．表间的关系类型有哪几种？二、简答题1．答案要点：主要是为了结构化。
2．答案要点：框架主要是用作容器，可以实现多组单选按钮，并且可以美化界面。
3．答案要点：为一个菜单项设置热键时需要在相应字符前面加&，设置快捷键需要在菜单编辑器中选择。
4．答案要点：四种：语法错误、编译错误、运行错误和逻辑错误。
5．答案要点：在设计状态，打开代码窗口至少有三种方法，只要写一种即为正确；代码窗口主要三部分：对象列表、事件列表、代码窗口。
6．答案要点：表间的关系类型有三种：一对一、一对多和多对多。
三、编程题1．编程求任意两个正整数(利用两个文本框输入)的最大公约数，并利用标签输出结果。
Private Sub Command1_Click()Dim m, n, r As Integerm = Val ( )n = Val ( )If m < 0 Or n < 0 Then= " 输入数据有错！"Elser = m Mod nDo While r <> 0m = nn = rr = m Mod nLoop= " 最大公约数为：" & nEnd IfEnd Sub2．编程实现对n 个整数按由小到大的顺序排序。
Private Sub sort(arraya() As Integer, n As Integer)Dim p As Integer, i As Integer, j As Integer, temp As IntegerFor i = 1 To n - 1p = iFor j = i + 1 To nIf arraya(p) > arraya(j) Then p = jNext jIf p <> i Then temp = arraya(i) : arraya(i) = arraya(p) : arraya(p) = temp Next iEnd Sub3．请编程实现每30 秒在窗体上显示一次当前的时间。
Private Sub Form_Load()= 30000End SubPrivate Sub Timer1_Timer()Print TimeEnd Sub《VB程序设计》课程综合复习资料参考答案1答案要点：主要是为了结构化。
2•答案要点：框架主要是用作容器，可以实现多组单选按钮，并且可以美化界面。
3•答案要点：为一个菜单项设置热键时需要在相应字符前面加&设置快捷键需要在菜单编辑器中选择。
4•答案要点：四种：语法错误、编译错误、运行错误和逻辑错误。
5. 答案要点：在设计状态，打开代码窗口至少有三种方法，只要写一种即为正确；代码窗口主要三部分：对象列表、事件列表、代码窗口。
6. 答案要点：表间的关系类型有三种：一对一、一对多和多对多。
三、编程题1.参考程序如下：Private Sub Comma nd1_Click()Dim m, n, r As In tegerm = Val ()n = Val ()If m < 0 Or n < 0 The n=" 输入数据有错！”Elser = m Mod nDo While r <> 0Dim t As Integer 产生随机数r = m Mod nLoop= " 最大公约数为：" & nEnd IfEnd Sub2．参考程序如下：Private Sub sort(arraya() As Integer, n As Integer)Dim p As Integer, i As Integer, j As Integer, temp As IntegerFor i = 1 To n - 1p = iFor j = i + 1 To nIf arraya(p) > arraya(j) Then p = jNext jIf p <> i Then temp = arraya(i) : arraya(i) = arraya(p) : arraya(p) = tempNext iEnd Sub3．参考程序如下：Private Sub Form_Load()= 30000End SubPrivate Sub Timer1_Timer()Print TimeEnd Sub新建一个forml添加command1添加labelllabell 高度设的稍高一点，以显示数据。
form代码视图中加入以下语句.Private Sub Command1_Click() ' 定义变量Dim a(9) As IntegerDim i As IntegerDim r As IntegerRandomizeFor i = 0 To 9a(i) = CInt(Rnd() * 100)Next i ' 排序For i = 0 To 8For r = i + 1 To 9If a(i) > a(r) Thent = a(i)a(i) = a(r)a(r) = tEnd IfNext rNext i ' 显示数据__ III!For i = 0 To 9= + " 第" + CStr(i + 1) + " 个随机数=" + CStr(a(i)) + vbCrLfNext iEnd Sub对单选按钮进行分组，每一组单选按钮都是独立的，对一组单选按钮进行操作不会影响其他组单选. 按钮的选择；另外可对窗体上现有控件进行分组，提供视觉上的区分和总体的激活或屏蔽特性。
如果要通过键盘来访问菜单项，则需要为菜单项定义热键与快捷键。