Visual Basic程序设计期末综合练习
- 格式:doc
- 大小:583.50 KB
- 文档页数:26
一、单项选择题1. 在代码中引用一个控件时,应使用控件的()属性A. CaptionB. NameC. TextD. Index2. 以下4种描述中,错误的是()A.常量在程序执行期间其值不会发生改变B.根据数据类型不同,常量可分为字符型常量、数值常量、日期、时间型常量和布尔型常量C.符号常量是用一个标识符来代表一个常数,好像是为常数取一个名字,但仍保持常数的性质D. 符号常量的使用和变量的使用没有差别3. Visual Basic中可以用类型说明符来标识变量的类型,其中表示货币型的是()A.% B. #C.@ D. $4. 表达式16/4-2^5*8/4 MOD 5\2的值为()A. 14B. 4C. 20D. 25. 表达式Int(Rnd*71)+10产生的随机整数范围是()A. (10,80)B.(10,81)C. [10,80]D.[10,81]6. 表达式ASC("F")的类型是()A. 字符表达式B.关系表达式C.算术表达式D.逻辑表达式7. 要定义5个元素的整型数组,以下语句正确的是()A. Dim arr(5) As IntegerB. Dim arr(1 To 5)C. Dim arr(4) As IntegerD. 以上都不对8. 如要获得滚动条的当前值,可访问的属性是()A. TextB.ValueC. MaxD. Min9. 下列关于For…Next语句的说法正确的是()A. 循环变量、初值、终值和步长都必须为数值型B.step后的步长只为正数C. 初值必须小于终值D.初值必须大于终值10. 若要求从文本框中输入密码时在文本框中只显示*号,则应当在此文本框的属性窗口中设置()A. Text属性值为*B. Caption属性值为*C. Password属性值为空D. Passwordchar属性值为*11. 67890属于()类型数据A.整型B. 单精度浮点数C. 货币型D. 长整型12. 下列关于工具箱的说法正确的是()A. 工具箱中控件的数目是固定不变的B. 工具箱中包含了所有的VB控件C. VB的内部控件不能从工具箱中移除D. ActiveX控件不能添加到工具箱中13. Visual Basic的三种工作模式是()A. 编辑、编译与运行B. 设计、运行与中断C. 中断、打开与关闭D. 设计、编辑与编译14. 如果变量a=2、b="abc"、c="acd"、d=5,则表达式a<d OR b>c AND b<>c的值为()A.true B. false C. yes D. no15. 下列变量名中正确的是()A. 3SB. PrintC. Select My NameD. Select_116. 语句Print"ABC";Spc(4); "DEF"的输出结果是()A. ABCDEFB. ABCDEFC. ABC DEFD. ABCDEF17. 多分支结构执行哪一个分支的依据是()A. Select Case语句的“测试表达式”与Case语句的“变量值列表”同为falseB. Select Case语句的“测试表达式”与Case语句的“变量值列表”同为trueC. Select Case语句的“测试表达式”与Case语句的“变量值列表”相匹配D. Select Case语句的“测试表达式”与Case语句的“变量值列表”完全相等18. InputBox函数的返回值的类型为()A. 数值B. 数值或字符串(视输入的数据而定)C. 变体D. 字符串19. 下列赋值语句()是有效的A. sum=sum-sumB. x+2=x+2C. x+y=sumD. last=y/020. 以下关于列表框的叙述错误的是()A. 可通过属性“Item”,返回列表框中的项目B. 可通过属性“Text”,得到当前列表项中的内容C. 可通过属性“ListIndex”返回当前选中的列表项的索引D. 可通过属性“ListCount”返回列表框中项目的数目21. 下列符号常量的声明中,()是不合法的A. Const a As Single=1.1B. Const a As Interger="12"C. Const a As Double=Sin(1)D. Const a="OK"22. 以下控件或方法具有输入和输出双重功能的为()A. PrintB. TextboxC. OptionbuttonD. Checkbox23. 若要获得列表框中被选中的列表项的内容,可以通过访问()属性来实现A. NameB. LlistIndexC. ListCountD. Text24. 在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Command1_Click( )b=5c=6Print a=b+cEnd Sub程序运行后,单击命令按钮,其结果为()A. a=11B. a=b+cC. a=D. False25. 以下Case语句中错误的是()。
第2章1.新建工程,在窗体上创建两个命令按钮Command1、Command2,一个标签Label1,界面如图2-5所示,程序运行要求如下:1)单击“改变颜色”按钮,标签上的文字内容改为“颜色已经改变”,文字颜色改为红色。
“改变颜色”按钮代码:Label1.ForeColor = vbRedLabel1.Caption = "颜色已经改变"2)单击“改变字体”按钮,标签上的字体改为“黑体”。
“改变字体”按钮代码:Label1.FontName = "黑体"图2-5程序运行界面最后将工程文件、窗体文件分别以lx2-2.vbp、lx2-2.frm为文件名保存在D:\EX文件夹下。
2.设计一个留言薄。
新建一个工程,在窗体上创建2个标签,2个文本框,1个命令按钮,属性设置如图2-6所示,。
要求单击“提交”按钮后,上面的文本框内容复制到下面的文本框中,且下面文本框中的内容不能修改。
单击“清除”按钮则清除两个文本框中的内容。
“提交”按钮代码:Text2.Text = Text1.Text“清除”按钮代码:Text1.Text = ""Text2.Text = ""图2-6 程序界面最后将工程文件、窗体文件分别以lx2-4.vbp、lx2-4.frm为文件名保存在D:\EX文件夹下。
3.设计一个程序,程序界面如图2-7所示。
当单击“显示”按钮时,在文本框中显示“欢迎使用VB!”;当单击“清除”按钮时,清除文本框内的文本;当单击“退出”按钮时,结束程序运行。
“显示”按钮代码:Text1.Text = "欢迎使用VB!"“清除”按钮代码:Text1.Text = ""“退出”按钮代码:End图2-7 程序运行界面最后将工程文件、窗体文件分别以lx2-5.vbp、lx2-5.frm为文件名保存在D:\EX文件夹下。
: 合练(69)【Visual Basic程序设计】期末综合练习一及答案Visual Basic程序设计期末综合练习一2012 年6 月7 H一、单项选择题(将正确答案填在括号内)1.后缀为.fm的文件表示()。
A.类模块文件B.窗体文件C.标准类模块文件D.窗体二进制数据文件2.窗体的Load事件的触发时机是()。
A.用户单击窗体时B・窗体被加载时C.窗体显示之后D.窗体被卸载时3.与传统的程序设计语言相比,Visual Basic授突出的特点是)。
A.结构化程序设计B.程序开发环境C.事件驱动编程机制D.程序调试技术4.无论何种控件,共同具有的属性是( )oA. Text属性B. Caption 属性C. Name属性D. Autosize 属性5.有程序代码如下:Textl .Text =" VB简单易学,功能强大”则Textl > Text、和” VB简单易学,功能强大”分别代表()oA.对象,值,属性B.对象,属性,值C.对彖,方法,属性D.属性,对彖,值6.刚建立一个新的标准EXE 工程后,不在工具箱中出现的控件是()。
A.单选按纽B.图片框C.框架D.通用对话框7.如果要在文本框中键入字符吋,只显示某个字符,如星号(* ),应设置文本框的()属性。
A . CaptionB . PasswordChar C. TextD. Char8.如果对象的名称为Mytext,而且对象有一个属性Text,那么在代码中引用该属性的正确格式是()。
A.Text.MytextB. Mytext.TextC. Mytext.(Text)D. Mytext*Text9.将数据项"China"添加到列表框Listl中成为第一项,应使用的语句是()。
A . List 1. AddItem''China'',0B.Listl.AddItem,,China,\lListl.AddItem,,China,\A. SINA > HelpD 、FlB 、 F10C 、 Esc14.以下可以作为Visual Basic 变量名的是()oC- COS ( X)D. X ( -1 )15.不属于VB 数据库引擎的是( )o A. ODBCB. Jet 引擎D. Listl.Addltem^l,China"10. 要在窗体的标题栏内显示”欢迎您! ”,使用的语句是()。
Visual Basic程序设计期末综合练习题二一、单选题1.在下列有关Visual Basic旳论述中,错误旳是()。
A.采用了事件驱动旳编程机制B.是面向对象旳编程语言C.是可视化旳程序设计语言D是面向过程旳程序设计语言.2.应用程序打包后,其包文献旳后缀为()。
A..exe B..txtC..cab D..ocx3.在新建一种“原则EXE”工程后,不在工具箱中浮现旳控件是()。
A.列表框B.通用对话框C.驱动器列表框D.图片框4.设窗体旳名称为Form1,则在程序运营过程中,单击窗体时,被执行旳事件过程旳名称是()。
A.Form1_Click() B. Form1_DbClick()C.Form_Click() D.Form_DbClick()5.对于定期器(Timer)控件,设立其定期与否启动旳属性是()。
A.Index B.Tag C.Enabled D.Interval6.在Visual Basic中,工程文献旳扩展名为()。
A..frm B..vbpC..cls D..bas7.有程序代码如下:Text1.Text = "欢迎走进VB世界!"则Text1,Text ,和"欢迎走进VB世界!"分别代表()。
A.对象,值,属性B.对象,属性,值C.对象,措施,属性D.属性,对象,值8.如下论述中对旳旳是()。
A.窗体旳Name属性指定窗体旳名称,用来标记一种窗体B.窗体旳Name属性旳值是显示在窗体标题栏中旳文本C.可以在运营期间变化对象旳Name属性旳值D.对象旳Name属性值可觉得空9. VB提供了构造化程序设计旳三种基本构造是()。
A.选择构造、过程构造、顺序构造B.选择构造、循环构造、顺序构造C.过程构造、转向构造、递归构造D.递归构造、选择构造、循环构造10.在VB中,下列变量名不合法旳是()。
A.take_1 B.take C.take_1_2 D. take-1 11.下列说法中对旳旳是()。
2020年Visual Basic 程序设计期末测试复习题288题[含答案]一、选择题1.下列_______属性用于设置或返回文本框中的文本。
a) Captionb) Textc) Named) DragIcon 答案:B2.下列程序段的执行结果为___。
X=5y=-20if not x>0 thenx=y-3elsey=x+3print x-y;y-xend ifa) -3 3b) 5 -8c) 3 -3d) 25 -25 答案:A3.在Visual Basic设计界面中不能隐藏的窗口是______。
a) 工程窗口b) 属性窗口c) 立即窗口d) 窗体窗口答案:A4.整型变量占用的字节数为______。
a) 2个字节b) 3个字节c) 4个字节d) 5个字节答案:A5.下列选项中,哪一项是所有控件共有的属性_______。
a) Captionb) Valuec) Textd) Name 答案:D6.下列数据类型不可能占8个字节的是_____数据类型。
a) Dateb) Longc) Doubled) Currency 答案:B7.如果有声明Dim a(5) As Integer,则该数组共占用______个字节内存。
a) 5b) 6c) 10d) 12 答案:D8.下列控件不能改变大小的有_______。
a) TextBoxb) Labelc) Timerd) PictureBox 答案:C9.若要取消窗体的最大化功能,则可设置______属性为False来实现。
a) ControlBoxb) MinButtonc) MaxButtond) Enabeld 答案:C10.若要以代码方式设置在文本框中显示文本的字体大小,则可用文本框的______属性来实现。
a) FontNameb) Fontc) FontSized) FontBold 答案:C11.写列选项中,合法的变量是______。
Visual Basic程序设计期末综合练习一、单选题1. 以下不属于Visual Basic6.0的特点的选项是()。
A、可视化编程B、算法设计C、面向对象程序设计D、事件驱动2.在设计阶段,当双击窗体时,所打开的窗口是()。
A、工程资源管理器窗口B、工具箱窗口C、代码编辑器窗口D、属性窗口3.假定已在窗体上画了多个控件,并有一个控件是活动的,为了在属性窗口中设置窗体的属性,预先应执行的操作是()。
A、单击窗体上没有控件的地方B、单击任一个控件C、不执行任何操作D、双击窗体的标题栏4.在VB6.0集成开发环境中有三种工作模式,下列不属于三种工作模式之一的是()。
A、设计模式B、中断模式C、执行模式D、编写代码模式5.当需要上下文帮助时,选择要帮助的内容,希望出现MSDN窗口及显示所需的帮助信息,应按的键是()。
A、HelpB、F1C、EscD、F106.在设计应用程序时,可以查看到应用程序工程中所有组成部分的窗口是()。
A、窗体布局窗口B、代码编辑器窗口C、属性窗口D、工程资源管理器窗口7.11.窗体设计窗口的主要功能是()。
A、设计控件外观B、编写源程序代码C、建立用户界面D、设置对象属性8.VB6.0集成开发环境可以()。
A、编辑、调试、运行程序,但不能生成可执行文件B、编辑、生成可执行文件、运行程序,但不能调试程序C、编辑、调试、生成可执行程序,但不能运行程序D、编辑、调试、运行程序,也能生成可执行文件9.Visual Basic应用程序处于执行模式时,这时()。
A、既不能设计界面,也不能编写代码B、可以编辑代码,不能设计界面C、可以设计界面,不能编辑代码D、既能设计界面,也能编写代码10.后缀为.vbp的文件表示VB 的()。
A、类模块文件B、窗体文件C、工程文件D、标准类模块文件11.为了保存一个Visual Basic应用程序,下列说法正确的是()。
A、只保存窗体文件(.frm)B、只保存工程文件(.vbp)C、分别保存工程文件和标准模块文件(.bas)D、分别保存工程文件、窗体文件和标准模块文件12.下面关于工程的概念中错误的是()。
Visual Basic程序设计期末试题一、单项选择题(每小题2分,共40分)1.能够改变标签(Label)控件显示标题的属性是( B )。
A.Name B.Caption C.Text D.Border2.当一个工程中含有多个窗体时,其中的启动窗体是(C )。
A.启动VB时创建的第一个窗体 B.第一个添加的窗体C.在“工程属性”对话框中指定的窗体 D.最后一个添加的窗体3.当运行程序时,系统自动执行启动窗体的( A )事件。
A.Load B.Unload C.Click D.LostFocus4.下列4项中合法的变量名是( D )。
A.2xyz B.IntegerC.x-yz D.x_yz5.表达式24 / 2 - 2 ^ 3 *4 / 4 Mod 5 \ 3( A )A.12 B.16C.20 D.326.要清除List列表框控件中的所有项目,可采用的方法是(B )A.Erase B.ClearC.Click D.Delete7.下列正确的赋值语句是( C )A.x+y=z B.2=x+yC.z=x+y D.x=Integer+28.可通过下列何种属性来设置或返回List列表框控件中当前选定项目的索引(C )。
A.ListIndex B.ListCount C.ListText D.LisItem9.若窗体Form1左上角的坐标为(-250,300),右下角的坐标为(350,-200),那么X轴和Y轴的正方向是( D )A.向左和向上 B.向左和向下C.向右和向下 D.向右和向上10.如果仅需要得到当前系统时间,则可以使用哪个函数( A )A.TimeB.YearC.NowD.Date11.数学关系8≤y<40表示成正确的VB表达式为( C )A、8<=y<40B、8<=y AND<40C、8<=y AND y<40D、8<=y OR y<4012.Dim A(-1 To 4, 5) As String定义的数组包含的元素个数是( B )A.30 B.36C.25 D.2013.应用程序打包后,其包文件的后缀是( B )A..cab B..exeC..ocx D..vbp14.能够实现“窗体总在最前端”界面效果的API函数是( A )A.SetWindowPos B.SetWindowAPIC.Private D.Public15.某窗体的Name属性为MyFrm,则它的Load事件的过程名为( D )A.MyFrm_LoadB.Me_LoadC.Form1_LoadD.Form_Load16.MsgBox函数的返回值的类型是(A )A.整型 B.字符串C.逻辑型 D.日期型17.以读方式打开D盘中的 Text.dat文件,正确的语句是( D )A.open"D:\text.dat" For Output As # 1B.open" D:\text.dat" For Input As # 1C.open" D:\text.dat" For Input AsD.open"text.dat" For Random As # 118.在VB中,Access数据库属于(A )A.本地数据库 B.外部数据库C.远程数据库 D.OLE数据库19.当Winsock控件处于关闭状态时,其State属性的值是(B )A.1 B.0C.2 D.-120.后缀为.Vbp的文件表示VB 的( C )A.类模块文件 B.窗体文件C.工程文件 D.标准类模块文件二、填空题(每小题1分,共15分)1.用Line方法画直线后,2.在VB中,要想获得某个相关控件或语句的帮助信息,一般可首先选中该控件或语句,34.如果要每隔10s产生一个Timer事件,则Interval属性应设置为1000 0。
Visual Basic程序设计期末综合练习期末综合练习一一、单项选择题1.如果要在文本框中键入字符时,只显示某个字符,如星号(*),应设置文本框的()属性。
A.Caption B.PasswordChar C.Text D.Locked2.在Visual Basic中,程序执行的顺序是()。
A.从主程序开始执行B.由代码行的顺序决定C.由事件驱动D.按模块顺序执行3.MsgBox函数的返回值的数据类型是()。
A.字符串B.日期型C.逻辑型D.整型4.后缀为.bas的文件表示()。
A.类模块文件B.窗体文件C.窗体二进制数据文件D.标准类模块文件5.要使窗体在运行时不可改变窗体的大小和没有最大化和最小化按钮,只要对下列()属性设置就有效。
A.MaxButton B.BorderSyleC.Width D.MinButton6.多窗体程序是由多个窗体组成。
在缺省情况下,VB在应用程序执行时,总是把()指定为启动窗体。
A.不包含任何控件的窗体 B.设计时的第一个窗体C.最后一个添加的窗体 D.命名为Frm1的窗体7.VB程序中通常不会产生错误提示的是()。
A.编译错误B.实时错误C.运行时错误D.逻辑错误8.应用程序打包后,其包文件的后缀为()。
A..exe B..cabC..txt D..ocx9.要设置命令按钮的背景图形,必须设置的两个属性是()。
A.Style和Picture B.Style和IconC.Caption和Picture D.Value和Icon10.当运行程序时,系统自动执行启动窗体的()事件过程。
A.Load B.UnloadC.Click D.GotFocus11.下列关于变量的说法不正确的是()。
A.局部变量是指那些在过程中用Dim语句或Static语句声明的变量B.局部变量在声明它的过程执行完毕后就被释放了C.静态局部变量是在过程中用Static语句声明的D.局部变量的作用域仅限于声明它的过程12.设窗体的名称为Form1,则在程序运行过程中,单击窗体时,被执行的事件过程的名称是()。
A.Form1_Click() B. Form1_DbClick()C.Form_Click() D.Form_DbClick()13.如下数组声明语句,正确的是()。
A.Dim a[3,4] As Integer B.Dim a(3,4) As IntegerC.Dim a(n,n) As Integer D.Dim a(3 4) As Integer 14.能够改变标签(Label)控件显示标题的属性是()。
A.Name B.CaptionC.Text D.Click15.若使图像框Image控件自动适应其中的图形大小,应()。
A.将控件的AutoSize属性设为True B .将控件的AutoSize属性设为False C.将控件的Stretche属性设为True D.将控件的Stretche属性设为False 16.在VB中,要想快速获得某个相关控件或语句的帮助信息,一般可首先选中该控件或语句,然后按的键是()A.Help B.F10 C. F1 D.Enter17.执行Form1.Scale (-14, 14)-(14, -14)语句后,Form1窗体坐标系x轴和y轴的正方向是()。
A.向左和向下B.向右和向上C.向左和向上D.向右和向下18.Visual Basic6.0集成开发环境有三种工作模式,下列不属于三种工作模式之一的是()。
A.设计模式B.执行模式C.中断模式D.编写代码模式19.Timer控件可用于后台进程中,可在Timer事件内编程,要停止触发Timer事件,需要设置的属性是()A.Interval=0或Enabled=False B.Interval=0或Visible=FalseC.Interval=0且Enabled=False D.Enabled=False 且Visible=False20.以下叙述中正确的是()。
A.窗体的Name属性的值是显示在窗体标题栏中的文本B.对象的Name属性值可以为空C.可以在运行期间改变对象的Name属性的值D.窗体的Name属性指定窗体的名称,用来标识一个窗体21.使用ADO数据模型时,建立Recordset和Connection对象连接的属性是()。
A.Execute B.CommandTypeC.Open D.ActiveConnection22.在设计动画时,用时钟控件来控制动画速度的属性是()A.Enabled B.IntervalC.Timer D.Move23.要发送数据,通称使用Winsock控件的()。
A.Accept方法B.Listen方法C.SendData方法D.GetDate方法24.在VB中,下列变量名不合法的是()。
A.take_1 B.take C.take-1 D.take_1_2 25.用来从数据库表中删除记录的SQL命令是()。
A.DELETE B.SELECTC.UPDATE D.WHERE26.用于设置在文本框中显示字符的属性是()。
A.AutoSizi B.PasswordcharC.MultiLine D.ScrollBars27.不属于VB数据库引擎的是()。
A.ODBC B.BDEC.Jet引擎D.OLE DB28.确定一个控件在窗体上的位置的属性是()。
A.Width或Height B.Width和HeightC.Top或Left D.Top和Left29.如果创建了命令按钮数组控件,那么Click事件的参数是()A.Tag B.CaptionC.Index D.没有参数30.下列赋值语句正确的是()。
A.a = b + c B.b + c = aC.-b = a D.4 = a + b二、填空题1.在VB中想获得帮助,需要按的键是;要设置断点需要按键。
2. Dim s As String,则运行时变量s的初始值是。
3.窗体文件和工程文件的扩展名分别是和。
4.定时器(Timer)控件可识别的事件是,发生该事件的时间间隔由定时器的属性设置。
5.在控件数组中,所有元素的属性均相同,数组中的每个元素由属性指定。
6.执行赋值语句a="123"+"456",变量a的值是。
7.假设ADOcn为一个Connection对象,那么在VB程序中声明并创建ADOcn的语句是。
8.表达式3 + 15 Mod 4 * 2 + 2的值是。
9.一个VB应用程序可以包含个vbp文件。
10.要在窗体Form1内显示“欢迎您!”,使用的语句是。
11.列表框控件中最后一项的序号等于ListCount属性减。
12.变量的声明方法有隐式和声明两种。
任何变量在声明后均有一个初始值,一般情况下,数值型变量的初始值为。
13.全局变量是指那些在中有效的变量,一般在模块代码编辑器的顶部使用声明14.设某个程序中要用到一个二维数组,要求数组名为A,类型为整型,第一维下标从-1到2,第二维下标从1到4,则相应数组声明语句为。
15.Dim i As Integer,则运行时变量i的初始值是。
16.过程级变量是指在过程内部声明的变量,只有在该过程中的代码才能访问这个变量。
模块级或窗体级变量的作用域是,全局变量在整个应用程序中有效,其作用域是。
17.VB中参数传递的方式有两种,一种是参数,另一种是参数。
18.Winsock控件主要用来编制或协议的通话程序。
三、阅读程序题阅读下列程序并写出程序运行结果1.Private Sub Form_Click()Dim I As Integer, j As IntegerDim c As Integerc = 1For I = 1 To 3For j = 1 To 2c = c + 3Next jNext IPrint cEnd Sub文件框Text1的输出结果是:2.Private Sub Command1_Click()Dim n As Integer,y As Integer,x As IntegerX = 1Do While x < 20n = n + 1y = x + yx = x * (x + 1)LoopText1.Text = nText2.Text = xText3.Text = yEnd Sub写出程序运行时单击Command1后,文件框Text1、Text2和Text3的输出结果。
3.Private Sub Command1_Click()Dim s As DoubleDim i As Integers = 5i = 1Do While i < 9i = i + 2s = s + iLoopText1.Text = sEnd Sub写出程序运行时,单击命令按钮文本框Text1中的输出结果。
4.Private Sub Command1_Click()Dim x As IntegerStatic s As Integerx = Val(InputBox("请输入一个正整数="))If x < 5 Thens = s * xElses = s + xEnd IfText1.Text = "s=" & Str(s)End Sub程序运行时连续3次单击Command1,且设输入的数据为6、5、4时,分别写出文本框Text1的值。
5.Function F(a As Integer)b = 2Static cb = b + 1c = c + 1F = a + b + cEnd FunctionPrivate Sub Command1_Click()Dim a As Integera = 2For i = 1 To 3Print F(a)Next iEnd Sub写出程序运行时,单击命令按钮在窗体上的输出结果。
6.Private Sub Form_Click()Dim c As Integer, j As Integer, k As Integerk = 1c = 2For j = 1 To 5If j > 3 Thenc = c + 6Exit ForElsek = k + 3End IfNext jPrint c, kEnd Sub写出程序运行时单击窗体后,Form1上的输出结果。
7.Private Sub Command1_Click()Dim a As Integer: Dim b As Integera = 10:b = 20Change1 a, bPrint "A1="; a, "B1="; ba = 10:b = 20Change2 a, bPrint "A2="; a, "B2="; bEnd SubSub Change1(ByVal x As Integer, ByVal y As Integer) t = x: x = y: y = tEnd SubSub Change2(x As Integer, y As Integer)t = x: x = y: y = tEnd Sub写出程序运行时,单击窗体Form1上的输出结果。