下载文档原格式
Visual Basic程序设计综合练习题一及答案一、单项选择题（每题3分，共45分）1．无论何种控件，共同具有的属性是（）。
A．Text 属性B．Caption属性C．Name属性D．Autosize属性2．当需要上下文帮助时，选择要帮助的内容，希望出现MSDN窗口及显示所需的帮助信息，应按的键是（）。
A．Help B．F10 C．F1 D．Esc3．为了保存一个Visual Basic应用程序，下列说法正确的是（）。
A．只保存窗体文件（.frm）B．只保存工程文件（.vbp）C．分别保存工程文件和标准模块文件(.bas)D．分别保存工程文件、窗体文件和标准模块文件4．在Visual Basic中，变量的默认类型是（）。
A．Integer B．VariantC．Double D．Currency5．Timer控件可用于后台进程中，可在Timer事件内编程，要停止触发Timer事件，需要设置的属性是（）。
A．Interval=0或Enabled=False B．Interval=0或Visible=False C．Enabled=False 或Enabled=0 D．Interval=0且Enabled=False6．要使窗体在运行时不可改变窗体的大小和没有最大化和最小化按钮，只要对下列（）属性设置就有效。
A．MaxButton B．BorderSyleC．Width D．MinButton7．有程序代码如下：Text1.Text = "Visual Basic"，则Text1，Text ，和"Visual Basic"分别代表（）。
A．对象，值，属性B．对象，方法，属性C．对象，属性，值D．属性，对象，值8．要设置命令按钮的背景图形，必须设置的两个属性是（）。
A．Value和Icon B．Style和IconC．Caption和Picture D．Style和Picture9．在VB中，下列合法的变量名是（）。
vb练习题及答案VB（Visual Basic）是一种面向对象的编程语言，被广泛应用于软件开发中。
通过练习题的形式可以巩固和提升对VB语言的理解和应用能力。
本文将提供一些VB练习题及其答案，帮助读者巩固VB编程技巧。
题目一：计算器程序设计一个简单的计算器程序，要求能够进行基本的加、减、乘、除运算。
解答：在VB中创建一个新的Windows窗体应用程序项目，命名为“Calculator”。
首先，在窗体上添加一些按钮来表示数字和运算符。
然后，添加一个用于显示运算结果的文本框控件。
接下来，为数字按钮和运算符按钮分别添加点击事件处理程序。
在点击数字按钮时，将按钮对应的数字追加到文本框中。
在点击运算符按钮时，根据按钮的内容判断并执行相应的运算。
最后，通过运用VB的计算表达式功能和控件之间的交互，实现基本的加减乘除运算。
题目二：学生成绩管理设计一个程序用于管理学生成绩，要求能够输入学生信息、查询学生成绩、计算学生平均成绩等操作。
解答：在VB中创建一个新的Windows窗体应用程序项目，命名为“StudentGrade”。
首先，设计一个学生类（Student），包括学号、姓名、各科目成绩等属性。
然后，创建一个用于存储学生信息的集合（如数组或集合类）。
接下来，在窗体上添加文本框、按钮等控件，用于输入学生信息和进行相关操作。
通过按钮点击事件处理程序，实现以下功能：1.输入学生信息：获取文本框中的学生信息，并创建一个新的学生对象，将其添加到学生信息集合中。
2.查询学生成绩：根据学生学号或姓名等关键信息，在学生信息集合中查找对应学生，并显示其成绩信息。
3.计算学生平均成绩：遍历学生信息集合，计算每个学生的平均成绩，并显示在窗体上。
通过以上步骤，可以实现一个简单的学生成绩管理系统。
题目三：数据排序设计一个程序用于对一组数字进行排序，要求能够实现升序和降序排列。
解答：在VB中创建一个新的Windows窗体应用程序项目，命名为“DataSorting”。
Visual Basic练习题1、当文本框的内容发生变化时，必将触发（ C ）事件。
A、LostFocusB、KeyPressC、ChangeD、Click2、在Visual Basic中，下列（ D ）函数的值只为1，0，-1。
A、INT(X)B、ABS(X)C、SQR(X)D、SGN(X)3、下列Visual Basic程序段运行后，变量 a、b、c的值为（）。
a = 1 :b = 1 :c = 1Do While a + b + c < = 10a = a + 1b = b * 2c = b / 2LoopA、2 2 1B、3 4 2C、4 8 4D、4 4 24、当程序在运行过程中因某种原因中断时，VB进入（ C ）模式。
A、设计B、运行C、中断D、工具5、要改变控件的高度，应改变（ A ）属性。
A、HeightB、WidthC、TopD、Left6、下列Visual Basic程序段运行后，变量x的值为（）。
x = 3y = 77Dox = x + 2Loop Until x > Sqr (y)A、7B、8C、9D、107、在Visual Basic中，建立一个文本编辑区域，可采用下列（ C ）。
A、命令按钮B、标签控件C、文本控件D、定时器控件8、下列（ D ）表达式的值不等于4。
A、Int (4.1)B、Int (4.9)C、Abs (int (-3.9))D、Abs (int (-4.5))9、下列Visual Basic程序段运行后，变量m 的值为（）。
a = 2 :b = 1 :c = 5If a < b Then m = a Else m = bIf c < m Then m = cA、2B、1C、5D、三项答案均不是10、窗体模块文件的扩展名是（ A ）。
A、frmB、basC、vbpD、txt11、对象的三个要素是（ A ）。
A、属性、方法、事件B、色彩、高度、宽度C、事件、属性、色彩D、属性、高度、宽度12、下列合法的变量名是（ C ）。
VB简答练习题1 简述Timer控件中Interval属性和Enanbeled属性。
2 简要回答创建MDI应用程序的步骤。
3 用Visual Basic 语言编写-一个有两个整数参数m和n2的名为GetRand的Function的函数，功能是获取任意两个正整数间的随机整数(假如0<n:<m) ?4 简述selet.. .case语句执行流程。
5 引用数组元素时的注意事项有哪些?6 Visual Basic中有几种运算符?7 向文本文件中添加数据分为哪几步?8 Visual Basic 6.0中的动态数组与静态数组有何不同?9 如何创建一-个快速显示窗体?10 循环语句有几种语句?11 Shape 控件可以用来显示哪些图形?12 MDI应用程序有哪些特性?13 访问数组的常用方法有哪些?14 运行程序有哪几种方法?15 VB工程由哪几个模块组成?16 叙述VB的基本的设计机制。
17 叙述VB集成开发环境的组成。
18 叙述文件访间的类型。
19 运行程序有几种方法?20 VB 有哪些基本数据类型?21 标识符的命名规则是什么?22 访问数组的常用方法有哪些?23 VB过程参数有哪几种传递方式?有何不同?24 如何创建控件数组?25 简述For循环的语法格式。
26 通用的Sub过程有哪几种方式?27 打开属性窗口有哪几种方法?28 如何设置控件之间的对齐方式?29 简述运算符从高到低的优先顺序。
30 建立通用过程的操作步骤有哪些?31 打开代码窗口有哪几种方法?32 如何创建MDI应用程序?33 请写出随机文件的读写步骤。
34 请写出If语句的块语法格式。
35 工具箱的标准控件有哪些?36 简述创建动态数组的步骤。
37 建立事件过程有哪些方法?38 FSO对象模型包括哪些对象?答案：1．简述Timer控件中Interval属性和Enanbeled属性答：Timer控件中的Enanbeled设置或返回计时器控件的有效性，该属性值为布尔值，如果设置为True，则每经过指定的时间间隔将触发Timer事件，为False，计时器控件成为无效，停止工作。
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程序，实现一个简单的文本编辑器功能。
一、选择题一、选择题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。
Visual Basic程序设计期末综合练习题一一、单项选择题1.Visual Basic是一种面向对象的可视化编程语言,采取了(的编程机制。
A.从主程序开始执行B.按过程顺序执行C.事件驱动D.按模块顺序执行2.在Visual Basic中,窗体文件的扩展名为(。
A..vbpB..frmC..clsD..bas3.Visual Basic6.0集成开发环境有三种工作模式,下列不属于三种工作模式之一的是(。
A.设计模式B.编写代码模式C.中断模式D.执行模式4.如果对象的名称为Mytext,而且对象有一个属性Text,那么在代码中引用该属性的正确格式是(。
A.Text.MytextB.Mytext*TextC.Mytext.(TextD.Mytext.Text5.下列关于变量的说法不正确的是(。
A.局部变量在声明它的过程执行完毕后就被释放了B.局部变量的作用域仅限于声明它的过程C.静态局部变量是在过程中用Static语句声明的D.局部变量是指那些在过程中用Dim语句或Static语句声明的变量6.关于对象的属性不正确的是(。
A.对象的属性一般有属性名和属性值B.可通过属性窗口设置属性的值C.可通过程序代码设置属性的值D.对象的所有属性值均可在设计时设计7.在设计阶段,双击窗体上的某个控件时,打开的窗体是(。
A.工程资源管理器窗口B.工具箱窗口C.代码编辑器窗口D.属性窗口8.要在窗体的标题内显示“myfrm”,使用的语句是(。
A.Form.caption="myfrm"B.Form1.caption="myfrm"C.Form1.Print"myfrm"D.Form.Print"myfrm"9.在VB中,下列变量名不合法的是(。
A.file_1B.fileC.file-1D.file_1_210.在设计动画时,用时钟控件来控制动画速度的属性是(。
VB单元练习题一一、选择题1、Visual Basic集成开发环境中不包括下列哪些窗口？（D）A. 工具箱窗口B. 工程资源管理器窗口C. 属性窗口D. 命令窗口2、“一辆小客车在正常行进过程中被一辆大型货车撞坏了”，在这句话中，“客车”，“小”，“行进”和“被一辆大型货车撞坏了”分别对应Visual Basic中的哪些术语？（B ）A. 对象、属性、事件、方法B. 对象、属性、方法、事件C. 属性、对象、事件、方法D. 属性、对象、方法、事件3、对象的特征和状态特征称为？（ C ）A. 事件B. 方法C. 属性D. 类4、下面哪一个属性用来标识对象的名称？（D ）A. CaptionB. ValueC. TextD. Name5、下列哪个符号是合法的变量名? （A ）A. VB123B. AbsC. 99JiD. x\y6、数学式子10sin25o写成Visual Basic表达式是？（D）A. 10sin25B. 10*sin(25)C. 10*sin(25o)D. 10*sin(25*3.14/180)7、Visual Basic中不存在下列哪一种数据类型？（D ）A. 字符串类型B. 日期类型C. 逻辑类型D. 指针类型8、表达式Left(“Visual”,3)+Lcase(“AB”)的值是？（C）A. visABB. VisABC. VisabD. ualab9、表达式6+10 Mod 4*2+1的值是？（A）A. 9B. 11C. 1D. 310、把数值型转换为字符串型需要使用下列哪一种函数? （B）A. Val()B. Str()C. Asc()D. Chr()11、VB中窗体文件的扩展名是______。
（B）(A)VBP (B)FRM(对) (C)VBW (D)PDM12、在设计应用程序时，通过______窗口可以查看到应用程序工程中的所有组成部分。
（D）(A)代码窗口(B)窗体设计窗口(C)属性窗口(D)工程资源管理器窗口(对)13、在VisualBasic中，所有的窗体和控件都必定具有的一个属性是______。
一、单选题1. 一个完整的计算机系统应包括（ B ）。
(A)主机、键盘、显示器(B) 硬件系统和软件系统(C) 主机和其他外部设备 (D) 系统软件和应用软件2．我们通常说的“U盘”属于计算机部件中的（ C ）。
(A) 输出设备 (B) 输入设备(C) 存储设备 (D) 打印设备3.在下列存储器中，存储速度最快的是( D )。
(A)软盘 (B)硬盘 (C)光盘(D)内存4. 计算机中采用二进制，是因为（ D ）。
(A)可降低硬件成本(B)两个状态的系统具有稳定性(C)二进制的运算法则简单(D)上述三个原因5. 是Internet中的( B )。
(A) 硬件编号(B) 域名 (C) 密码 (D) 软件编号6. 下列设备中，（D ）不能作为计算机的输出设备（A）打印机（B）显示器（C）绘图仪（D）键盘[标准的输入设备]7. 计算机的主机由（B ）部件组成[主机箱内硬件的总称]（A）CPU、外存储器、外部设备（B）主机板，CPU和内存储器（C）CPU和存储器系统（D）主机箱、键盘、显示器8. 在Word中将文档中一部分文本内容复制到别处，首先要进行的操作是（ C ）（A）粘贴（B）复制（C）选择（D）剪切9. Windows系统中，回收站的功能是（B ）（A）浏览上网的计算机（B）存放删除文件（C）设置计算机参数（D）收发信件10. 关于电子邮件的叙述正确的是（C ）（A）电子邮件只能传输文本（B）电子邮件只能传输文本和图片（C）电子邮件可以传输文本、图片、视像、程序等（D）电子邮件不能传输图片11. 下列关于电子邮件的说法，正确的是（C ）（A）收件人必须有E_mail账号，发件人可以没有E_mail账号（B）发件人必须有E_mail账号，收件人可以没有E_mail账号（C）发件人和收件人均必须有E_mail账号（D）发件人必须知道收件人的邮政编码12.下列有关Word的叙述，正确的是（B ）（A）Word是一个应用软件，它只能对文字进行编辑处理（B）Word是在Windows环境下运行的应用软件（C）文档的缺省扩展名是.wrd（D）在Word中，一次只能打开一个文档13. 计算机当前的应用领域广泛，但据统计其应用最广泛的领域是（A ）（A）数据处理（B）科学计算（C）辅助设计（D）过程控制14. 在计算机的内部所处理的任何信息均是采用（B ）。
第一部分 程序设计部分程序设计题的设计格式及其处理步骤：（1）先画出处理界面（窗体），并注明各控件的名称；（2）再给出处理步骤，（3）写出程序代码：下面给出该类题目的求解事例，供参考：例如：设计程序，求1+2+3+...+N 的和值。
其处理过程是：（一）设计界面（在纸上画出界面，并注明各控件的名称）：（二）处理步骤：单击命令按钮，按以下步骤处理（1）定义3个变量：N ，s ，x ，分别用于存放：输入的数值，和值，控制循环（2）将文本框1的值，提供给变量N ；（3）s=0（累加前，将变量s 初始化为0）；（4）X=1（设置循环的开始值）（5） 当X<=N 时 重复执行S=s+xX=X+1（6）在文本框2中显示和值S（三）编写有关的代码：Private Sub Command1_Click()Dim n%，s%，x%N=val(text1.text)S=0X=1Do while x<=nS=s+xX=x+1LoopText2=sEnd Sub文本框1：TEXT1 文本框2：TEXT21：Command1标签1：Label1 标签2：第一部分 练习题目要求:要先给出所设计的窗体,并注明窗体上的各控件及其用途,然后给出处理步骤,并编写代码.1．设计一个程序，完成利用文本框输入任意两个数的乘法运算，并显示计算结果。
进一步完善程序，完成利用文本框输入任意两个数的加法、减法、乘法、除法运算，并显示计算结果；再进一步，改进，完成，利用随机函数，产生任意两个100到200之间的整数，并完成两个数的加法、减法、乘法、除法运算，并显示计算结果。
2．对于表达式：23z y x x e x ++++，当输入x,y,z 值求该表达式的值。
3．利用InputBox 函数输入一个正实数，用Print 方法在窗体上打印出其平方值、平方根、立方值,结果保留2位有效数字。
4．编写一个华氏温度与摄氏温度之间的转换程序，转换公式为：F ＝9/5×C ＋32及C ＝5/9（F －32）；其中，F ：华氏温度；C ：摄氏温度。
5．求方程AX+B=0的解。
当提供A,B 的值后,输出该式子，例如,当A=3,B=4, 输出:3X+4=0，并输出方程的解。
6．已知3个数，设计一个求出最大值的程序。
7．输入一个整数，判定是正数还是负数，并输出结果8．输入x,y,z 三个数，按从小到大的次序显示。
显示形式：由小到大输出9．输入一元二次方程ax 2 +bx+c=0的系数 a,b,c ，计算并输出一元二次方程的两个实根x 1,x 2。
10．求1+2+3+...+N 的和，N 利用inputbox （）函数输入，11．设计一个程序，对Sum=1+2+3+...+N ，求Sum 不超过10000的最大整数项数N 。
12．求出100到200之间所有的素数及其平均值,并输出13．利用循环，打印输出下列图形：AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA14．找出1000以内的所有的完全数。
完全数是指等于其所有因子和的数（包括1因子，但1不是完全数）；例如：6的因子有1、2、3，并且6=1+2+3，则6是完全数。
15．输入一组不重复的数据(10个数据)，同时找出最大值和最小值,并输出它们.17．输出如图所示的下三角数据18．用随机函数产生50个[10，100 ）的随机整数，并按照由小到大的顺序打印出来(10个数一行)。
程序界面如下：20．用随机函数产生100个[0，99]范围内的随机整数，统计个位上的数字分别为1，2，3，4，5，6，7，8，9，0的数的个数并打印出来21．.统计成绩分布22．定义一个判断X是否素数的子过程，并调用此过程打印出前100个素数。
提示：子过程的入口参数是X（整型），出口参数是W（整型），W为1,表示X是素数，W为0，表示X不是素数。
23．编写一个子过程(或函数过程)，功能是求阶乘，并调用该过程计算：S=1!+2!+3!+……+n！的值，其中n的值可以通过键盘随机输入，图2-7-1是程序界面。
图2-7-1 程序界面24．给出计算Sum=1+2+3+……+(n-1)+n 的和值的递归函数，并通过命令按钮事件调用，计算输出结果。
25．设有两个文本框TEXT1和TEXT2 ，在TEXT1中输入字符。
当遇到回车键时，将刚输入的字符串，在TEXT2框中显示，请设计程序完成该功能。
注意：回车键的ASCII码是13，其扫描码也是1326．设计一个程序，每间隔1秒，在文本框中显示数字，依次是：1 2 3 4 5 6 7 8 9 10 等等，直到显示30止。
27．设计一个程序，在窗体上当按下键盘上的“Ctrl”键并单击鼠标器的左键，然后在文本框中显示：“按下键盘上的Ctrl键并单击鼠标器的左键”。
28．编程把一个文本框中的内容，以文件形式存入磁盘。
假定文件名为c:\Myfile.txt。
29．编程建立一个包含若干行字符串的文本文件，然后将该文件的内容按行读出，加上行号后复制到另外一个文本文件中。
30．由键盘输入10位同学的学号和成绩，以文件名”student.txt”存入D盘。
31．从上题建立的D盘上的”student.dat”的文件中读取学生的姓名和成绩，求出最高分、最低分的学生姓名及成绩存入D:\cj.txt中典型编程练习题要求:要先给出所设计的窗体,并注明窗体上的各控件及其用途,然后给出处理步骤,并编写代码.1．编程求S=1！+2！+3！+┅┅+20！Private Sub Form_Click()Dim i, j As IntegerDim sum0 As DoubleDim sum As DoubleFor i = 1 To 3sum0 = 1For j = 1 To isum0 = sum0 * jNext jsum = sum + sum0Next iPrint sumEnd Sub2．编程输出3——200 之间的所有素数Private Sub Form_Click()Dim i, j As IntegerFor i = 3 To 200k = Sqr(i)For j = 2 To kIf i Mod j = 0 Then Exit ForNext jIf j > k ThenPrint iEnd IfNext iEnd Sub3．输入10个整数，求出它们的总和与积，并打印其中既能被5整除又能被3整除的数。
4．设计一个实现文件复制的程序:即将文件“C:\abc.txt”复制形成文件”d:\abc.txt”5．利用随机函数产生100个1到100之间的整数存放在一个数组a中，按照每行10个数输出该数组，再将其按照由小到大的顺序排序后输出。
6．插入问题：在一个具有n个元素的有序（升序）数组A中，插入数据x，插入后数列仍然有序。
（1）设计成一个子过程：Private Sub Instert(a() As Single,n As Integer，x As Single)有关的实现语句End Sub（2）设计另一个过程调用上述该过程，完成输入、输出。
7．顺序查找问题：在一个具有n个元素的有序（升序）数组A中，查找数据x，设计一个一查找函数Find，若找到则返回下标值，找不到返回-1。
Private Function Find(a() As Single, n As Integer，x As Single)As Integer 有关的实现语句End Function设计另一个过程调用上述该过程，完成输入、输出。
8．数制转换问题：将一个十进制整数m转换成r进制（2或8进制）字符串。
设计一个转换函数实现该功能。
Private Function TrDec(m As Integer,r As Integer)As String有关的实现语句End Function设计另一个过程调用上述该过程，完成输入、输出。
9．设有两个文本框TEXT1和TEXT2 ，在TEXT1中输入字符。
当遇到回车键时，将刚输入的字符串，在TEXT2框中显示，请设计程序完成该功能。
注意：回车键的ASCII码是13，其扫描码也是1310．设计一个程序，每间隔1秒，在文本框中显示数字，依次是：1 2 3 4 5 6 7 8 9 10 等等，直到显示30止。
11．设计一个程序，在窗体上当按下键盘上的“Ctrl”键并单击鼠标器的左键，然后在文本框中显示：“按下键盘上的Ctrl键并单击鼠标器的左键”。
第二部分分析程序，写出程序的运行结果或功能1．下面程序X$="a"Y$="b"Z$="c"For i=1 To 2X$=Y$Y$=Z$Z$=X$Next iPrint X$+Y$+Z$运行后的输出结果是：cbc2．下面程序For i=10 To 40 step 6Print iNext i的循环次数为：63．下面程序For i=1 To 2s=1For j=0 To i-1s=s+s*1Next jPrint sNext i执行后输出的结果为：244．下面程序i=0n=0Do while i<32i=(i+1)*(i+1)n=n+1LoopPrint n运行后的结果为“45．下面程序For I=1 To 3If I<=1 Then a=3If I<=2 Then a=2If I<=3 Then a=1Print aNext IPrint I运行时输出的结果是：11146．下面程序段Dim xx=Int(Rnd)+4Select Case xCase 5: Print "90~100"Case 4: Print "80~90"Case 3: Print "70~80"Case 2: Print "60~70"Case 1: Print "0~60"End Select显示的结果是：80~907．下面程序段For i=1 To 3 Step 1Print Spc(5-i)For j=1 To 2*i-1Print "*"Next jPrintNext i运行结果为：*********8．在窗体上画一个命令按钮，然后编写如下事件过程：Prinate Sub Command1_click()For i=1 To 4x=4For j=1 To 3x=3For k=1 To 2x=x+6Next kNext jNext iPrint xEnd Sub程序运行后，单击命令按钮，输出结果是：159．在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click()x=0Do until x=-1a=InputBox("请输入a的值")a=Val(a)b=InputBox("请输入b的值")b=Val(b)x=InputBox("请输入x的值")x=Val(x)a=a+b+xLoopPrint aEnd Sub程序运行后，单击命令按钮，依次在输入对话框中输入5，4，3，2，1，-1,则输出结果为：210．在窗体上画一个文本框（其中Name属性为Text1），然后编写如下事件过程：Private Form1_Load()Text1.Text=""Text1.Set FocusFor i=1 To 10sum=sum+iNext iText1.Text=sumEnd Sub上述程序的运行结果是：11．在窗体上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(其Name属性为Command1),然后编写如下事件过程：Private Sub Command1_Click()x=0Do while x<50x=(x+2)*(x+3)n=n+1LoopText1.Text=Str(n)Text2.Text=Str(x)End Sub程序运行后，单击命令按钮，在两个文本框中显示的值分别为：27212．写出下列程序段的运行结果__s=55________。
