VB二级考试分章练习打印.doc

第一章 Visual Basic基础一、 选择题1 与传统的程序设计语言相比，Visual Basic最突出的特点是A) 结构化程序设计B) 程序开发环境C) 事件驱动编程机制D) 程序调试技术2在正确安装VB后，可以通过多种方式启动VB。在以下方式中，不能启动VB的是：A) 通过“开始”菜单中的“程序”命令B) 通过“我的电脑”找到VB6.exe，双击该文件名C) 通过“开始”菜单中的“运行”命令D) 进入DOS方式，执行VB6.exe。3为了用键盘打开菜单和执行菜单命令，第一步应按的键是A) 功能键F10或Alt B) Shift+功能键F4C) Ctrl或功能键F8D) Ctrl+Alt4VB6.0集成环境的主窗口中不包括A) 标题栏B) 菜单栏C) 状态栏D) 工具栏5用标准工具栏中的工具按钮不能执行的操作是A) 添加工程B) 打印源程序C) 运行程序D) 打开工程6VB窗体设计器的主要功能是A) 建立用户界面B) 编写源程序代码C) 画图D) 显示文字7以下叙述中正确的是A) 用属性窗口只能设置窗体的属性B) 用属性窗口只能设置控件的属性C) 用属性窗口可以设置窗体和控件的属性D) 用属性窗口只能设置对象的属性答案：1. C2. D 3. A4.C 5. B6. A 7.C二、 填空题1 VB6.0分为3个版本，这3种版本是_、_和_。2 可以通过_菜单中的_命令退出VB。3 退出VB的快捷键是_。4 快捷键Ctrl+O的功能相当于执行_菜单中的_命令，或者相当于单击工具栏上的_按钮。5 如果打开了不需要的菜单或对话框，可以用_键关闭。6 工程文件的扩展名是_，窗体文件的扩展名是_。7 VB中的菜单栏有2种形式，分别为_形式和_形式。8 属性窗口分为4个部分，分别是_，_，_，_。答案：1 学习版 专业版 企业版2 文件 退出3 Alt+Q4 文件 打开工程 打开工程5 ESC6 .vbp .frm7 固定 浮动8 对象下拉列表 属性显示方式 属性列表 属性说明第二章 可视化编程的概念与步骤一、 选择题 1 下列可以激活属性窗口的操作是A) 用鼠标双击窗体的任何部位B) 执行“工程”菜单中的“属性窗口”命令C) 按Ctrl+F4键D) 按F4键2下列不能打开工具箱窗口的操作是A) 执行“视图”菜单中的“工具箱”命令B) 按Alt+F8键C) 单击工具栏上的“工具箱”按钮D) 按Alt+V，然后按X键3下列叙述中正确的是A) 只有窗体才是VB中的对象B) 只有控件才是VB中的对象C) 控件和窗体都是VB中的对象D) 控件和窗体都不是VB中的对象4为了把窗体上的某个控件变为活动的，应执行的操作是A) 单击窗体的边框B) 单击该控件的内部C) 双击该控件D) 双击窗体5确定一个控件在窗体上的位置的属性是A) Width或HeightB) Width和HeightC) Top或LeftD) Top和Left6确定一个窗体或控件的大小的属性是A) Width或HeightB) Width和HeightC) Top或LeftD) Top和Left7为了同时改变一个活动控件的高度和宽度，正确的操作是A) 拖拉控件4个角上的某个小方块B) 只能拖拉位于控件右下角的小方块C) 只能拖拉位于控件左下角的小方块D) 不能同时改变控件的高度和宽度8若窗体的名称（Name属性）为Form1，则把窗体的标题设为“VB Test”的语句为A) Form1=”VB Test”B) Caption=”VB Test”C) Form1.Text=”VB Test”D) Form1.Name=”VB Test”9下列不能打开代码窗口的操作是A) 双击窗体上的某个控件B) 双击窗体C) 按F7键D) 单击窗体或控件10为了保存一个VB应用程序，应当A) 只保存窗体文件(.frm)B) 只保存工程文件(.vbp)C) 分别保存工程文件和标准模块文件(.bas)D) 分别保存工程文件、窗体文件和标准模块文件11为了装入一个VB应用程序，应当A) 只装入窗体文件(.frm)B) 只装入工程文件(.vbp)C) 分别装入工程文件和标准模块文件(.bas)D) 分别装入工程文件、窗体文件和标准模块文件12为了使窗体的大小可以改变，必须把他的BorderStyle属性设置为A) 1B) 2C) 3D) 413决定窗体标题条显示内容的属性是A) TextB) NameC) CaptionD) BackStyle14当窗体最小化时缩小为一个图标，设置这个图标的属性是A) MouseIconB) IconC) PictureD) MousePoint15为了取消窗体的最大化功能，需要把它的一个属性设置为False，这个属性是A) ControlBoxB) MinButtonC) EnabledD) MaxButton16决定窗体有无控制菜单的属性是A) ControlBoxB) MinButtonC) EnabledD) MaxButton17为了使一个窗体从屏幕上消失但仍在内存中，所使用的方法或语句为A) ShowB) HideC) LoadD) Unload 18下列操作中不能向工程中添加窗体的是A) 执行“工程”菜单中的“添加窗体”命令B) 单击工具栏上的“添加窗体”按钮C) 右击窗体，在弹出的菜单中选择“添加窗体”命令D) 右击工程资源管理器，在弹出的菜单中选择“添加”命令，然后在下一级菜单中选择“添加窗体”命令19当一个工程含有多个窗体时，其中的启动窗体是A) 启动Visual Basic时建立的窗体B) 第一个添加的窗体C) 最后一个添加的窗体D) 在“工程属性”对话框中指定的窗体20关于多重窗体应用程序，以下描述中不正确的是 A) 对于多重窗体应用程序，可以有多个当前窗体B) 多重窗体应用程序的启动窗体可以在设计时设定C) 多重窗体应用程序中每个窗体作为一个磁盘文件保存，所有窗体、标准模块等作为一个工程文件被保存D) 多重窗体应用程序可以编译生成一个exe文件答案：1. D 2.B 3.C 4.B 5.D 6.B 7.A 8.B 9.D 10.D 11.B 12.B 13.C 14.B 15.D 16.A 17.B 18.C 19.D 20. A二、 填空题1 VB中的控件分为3类，他们是_、_、_。2 一个控件在窗体上的位置由_和_属性决定，其大小由_和_属性决定。3 可以通过多种方式激活属性窗口，这些方式是_、_、_、_、_。4 为了选择多个控件，可以按住_键，然后单击每个控件。5 在窗体上画两个文本框和一个命令按钮，并在命令按钮的代码窗口中编写如下事件过程 Private Sub Command1_Click() Text1.Text = VB Programming Text2.Text = Text1.Text Text1.Text = ABCDEnd Sub程序运行后，单击命令按钮，两个文本框中显示的内容分别为_和_。6 用VB开发应用程序时，一般需要_、_和_3步。7 控件和窗体的Name属性只能通过_设置，不能在_期间设置。8 代码窗口分为左右两栏，左边一栏称为_，右边一栏称为_。9 为了在输入程序时能自动进行语法检查，必须执行_菜单中的_命令，打开_对话框，然后选择“编辑器”选项卡中的_选项10在保存VB应用程序时，窗体文件和工程文件的扩展名分别为_和_。11为了把一个VB应用程序装入内存，只要装入_文件即可。12若要加载一个新窗体，使用_语句实现；若要卸载一个窗体，使用_语句实现。13若要显示一个窗体，使用_方法；若要隐藏一个窗体，使用_方法；清除窗体上的内容，使用_方法。答案：1 内部控件（或标准控件） ActiveX控件 可插入对象2 Top Left Width Height3 用鼠标单击属性窗口的任何部位，执行“视图”菜单中的“属性窗口”命令，按F4键，单击工具栏上的“属性窗口”按钮，按Ctrl+PgDn或Ctrl+PgUp4 Shift或Ctrl5 ABCD VB Programming6 建立可视用户界面 设置对象属性 编写代码7 属性窗口 运行8 对象框 过程/事件框9 工具 选项 选项 自动语法检查10 .frm .vbp11 工程12 Load Unload13 Show Hide Cls第3章 Visual Basic基本控件一、 选择题1 为了在按下回车键时执行某个命令按钮的事件过程，需要把该按钮的哪个属性设为TrueA) ValueB) DefaultC) CancelD) Enabled2 为了在按下ESC键时执行某个命令按钮的事件过程，需要把该按钮的哪个属性设为TrueA) ValueB) DefaultC) CancelD) Enabled3用菜单编辑器创建菜单时，如果要在菜单中添加一条分隔线，正确的操作是A) 在标题输入框中输入“”（减号）B) 在名称输入框中输入“”（减号）C) 在标题输入框中输入“_”（下划线）D) 在名称输入框中输入“_”（下划线）4，在显示菜单时，菜单的哪个属性为Ture时将用灰色显示该菜单项标题A) CaptionB) CheckedC) EnabledD) Visible5设有菜单结构如下表所示标题名称层次显示Appear1大图标BigIcon2小图标SmallIcon2要求在运行时，当鼠标单击菜单项“大图标”时，在这个菜单项前面就添加一个“”，下面正确的过程是A) Private Sub Bigicon_Click()B) Private Sub Bigicon_Click()Bigicon.Checked = False Me.Appear.Bigicon.Checked = TrueEnd Sub End SubC) Private Sub Bigicon_Click()D) Private Sub Bigicon_Click()Bigicon.Checked = True Appear.Bigicon.Checked = TrueEnd Sub End Sub6设在菜单编辑器中定义了一个菜单项，名为menu1。为了在运行时隐藏该菜单项，应在程序中使用的语句是A) menu1.Enabled = TrueB) menu1.Enabled = FalseC) menu1.Visible = True D) menu1.Visible = False7为了使文本框同时具有水平和垂直滚动条，应该把Multiline属性设为Ture，然后再把ScrollBars属性设置为A) 0B) 1C) 2D) 38使文本框获得焦点的方法是A) ChangeB) GotFocusC) SetFocusD) LostFocus9为了使标签覆盖背景，应把BackStyle属性设置为A) 0B) 1C) TureD) False10为了使标签中的内容居中显示，应把Alignment属性设置为A) 0B) 1C) 2D) 311决定标签内显示内容的属性是A) TextB) NameC) AlignmentD) Caption12在窗体（Name属性为Form1）上画两个文本框（Name属性分别为Text1和Text2）和一个命令按钮（Name属性为Command1），然后编写如下两个事件过程：Private Sub Command1_Click()a = Text1.Text+Text2.TextPrint aEnd SubPrivate Sub Form_Load()Text1.Text = Text2.Text = End Sub程序运行后，在第一个文本框（Text1）和第二个文本框（Text2）中分别输入123和321，然后单击命令按钮，则输出结果为A) 444B) 321123C) 123321D) 13223113当拖动滚动条中的滚动块时，将触发滚动条的事件是A) MoveB) ChangeC) ScrollD) SetFocus答案：1. B 2. C 3. A 4. C 5. C 6. D 7.D 8.C 9.B 10.C 11.D 12. C 13. C 二、 填空题1在VB中可以建立_菜单和_菜单。2菜单编辑器可以分为3个部分，即_、_和_。3如果要将某个菜单项设计为分隔线，则该菜单项的标题应设置为_。4在菜单编辑器中，菜单项后面4个小点的含义是_。5建立弹出式菜单所使用的方法是_。6为了使标签能自动调整大小以显示全部文本内容，应把标签的_属性设为True 。7要在文本框中显示垂直滚动条，必须把_属性设为2，同时还应把_属性设为_。8有一个名称为Text1的文本框，为使其有焦点，应执行的语句是_。9为了使一个标签透明且没有边框，必须把它的BorderStyle属性设为_，并把BackStyle属性设为_。9 假定一个文本框的Name属性为Text1，为了在该文本框中显示“Hello”，所使用的语句为_。答案：1下拉式菜单 弹出式菜单 2数据区 编辑区 菜单项显示区3下划线4子菜单5PopupMenu6 Autosize7 ScrollBars MultiLine True8 Text1.SetFocus9 0 010 Text1.text=”Hello” 或 Text=”Hello” 第4章 代码基础选择题1 在Visual Basic中，下列优先级最高的运算符是A*BCDNot2 以下关系表达式中，其值为False的是AXYZ XYz BVisual Basic visualbasicCthe there DInteger Int3 设有如下声明：Dim x As Integer 如果Sgn(x)的值为-1，则表示x的值是A整数B大于0的整数C等于0的整数D小于0的整数4 下列表达式中值为-6的是AFix(-5.678)BInt(-5.678)CFix(-5.678+0.5)DInt(-5.678+0.5)5 以下语句的输出结果是 Print 3 + 4 5 * 6 /7 Mod 8A3B4C5D66 下列可作为Visual Basic 的变量名的是A3*DeltaBPrintCharCAbsDAB7 下列可作为Visual Basic 的变量名的是AFilenameBA(A+B)CA%DDPrint8 下列可作为Visual Basic 中所允许的形式的数是A25.74B3.457E-100C.368D1.87E+509 下列可作为Visual Basic 中所允许的形式的数是A10(1.256)BD32C2.5ED12E310 下面的数写成普通的十进制数是 2.65358979335278D-006A0.0000265358979335278B0.00000265358979335278C0.000265358979335278D0.00000026535897933527811 下面的数写成普通的十进制数是 1.21576654590569D+019A12157665459056900B121576654590569000C1215766545905690000D1215766545905690000012 下面的数写成普通的十进制数是 8.6787E8A86787000B867870000C8678700D867870000013 下面的数写成普通的十进制数是2.567E-12A0.000000000002567B0.0000000002567C0.000000002567D0.0000000000256714 设a = 2，b = 3，c = 4，d = 5，下列表达式的值是 ab AND ccATrueBFalseC-1D115 设a = 2，b = 3，c = 4，d = 5，下列表达式的值是 32*b OR a=c AND bc OR cdA1BTrueCFalseD-116 设a = 2，b = 3，c = 4，d = 5，下列表达式的值是 NOT a=c OR 4*c=b2 AND ba+cA-1B1CTrueDFalse17 实现字符的Unicode编码方式ANSI编码方式相互转换的函数是AStrBStrConvCTrimDMid二、填空题1 设有如下程序段：a$ = Visual Basic Programingb$ = .NETc$ = Left(a$, 12) & b$ & Right(a$, 11)执行该程序段后，变量c$的值为。2 假定有如下的变量定义：Dim a, b As Integer则变量a被定义为类型，b被定义为类型。3 设有如下的程序段：a$ = BeijingShanghai : b$ = Mid(a$, InStr(a$, g) + 1)执行上面的程序段后，变量b$的值为。4 下列Visual Basic表达式有错误，其正确的形式是。CONTT.DE+COS(28)5 下列Visual Basic表达式有错误，其正确的形式是。-3/8+8.INT24.86 下列Visual Basic表达式有错误，其正确的形式是。(8+6)(4-2)+SIN(2*)7 下列Visual Basic表达式有错误，其正确的形式是。(x+y)+z80-5 (C+D)8 与下列数学式子对应的Visual Basic 表达式是。cos2(c+d)(C+D)为弧度 )9 与下列数学式子对应的Visual Basic 表达式是。5+(a+b)210 与下列数学式子对应的Visual Basic 表达式是。cos(x)(sin(x)+1)(x为弧度)11 与下列数学式子对应的Visual Basic 表达式是。e2+212 与下列数学式子对应的Visual Basic 表达式是。2a(7+b)13 与下列数学式子对应的Visual Basic 表达式是。8e3.ln214 以下语句的输出结果是。Print chr$(65) (为回车，下同)15 以下语句的输出结果是。Print sgn(2) 16 执行以下语句后，输出结果是、。a$ = Good b$ = MorningPrint a$ + b$Print a$ & b$17 执行以下语句后，输出结果是、。s$ = ABCDEFGHIJKPrint Left$(s$, 4)Print Right$(s$, 4)18 执行以下语句后，输出结果是、。s$ = ABCDEFGHIJKPrint Mid$(s$, 3, 4)Print Len(s$)19 执行以下语句后，输出结果是、。s$ = ABCDEFGHIJKPrint InStr(s$, efg)Print LCase(s$)20 假定当前日期为2003年10月5日，星期五，则执行以下语句后，输出结果是、。Print Day(Now) Print Month(Now) Print Year(Now) Print Weekday(Now) 21 在Visual Basic中，字符串常量要用括起来，日期/时间型常量要用括起来。22 5.0/6.0版的Visual Basic中，字符采用编码方式。在这种编码方案中，一个中文字符或一个西文字符均视为个字符，每个字符用个字节编码。23 下列语句的输出结果是。Print Int(12345.6789 * 100 + 0.5) / 100答案：1.A2.B3.D4.B5.B6.B7.A8.C9.D10.B11.D12.B13.A14.B15.C16.D17.B1. Visual Basic.NET Programing2. 变体(Variant)、整型(Integer)3. Shanghai4. CONTT*DE+Cos(28*3.14159/180)5. (-3)/8+8*Int(24.8)6. (8+6)(4/(-2)+Sin(2*3.14159)7. (x+y)+z)*80-5*(C+D)8. Cos(c+d)2或Cos(c+d)*Cos(c+d)9. 5+(a+b)2或5+(a+b)*(a+b)10. Cos(x)*(Sin(x)+1)11. Exp(2)+212. 2*a*(7+b)13. 8*Exp(3)*Log(2)14. A15. 116. Good MorningGood Morning17. ABCDHIJK18. CDEF1119. 0abcdefghijk20. 5102003621. 双引号#22. Unicode1223. 12345.68顺序结构选择题 1.假定Picture1和Text1分别为图片框和文本框的名称，下列不正确的语句是A) Print 25B) Picture1.Print 25C) Text1.Print 25 D) Debug.Print 252以下语句的输出结果是（在立即窗口中）a=27 (为回车，下同)b=65Print a;bA) 27 65B) 27 65 C) 27 65 D) 27 65 (表示空格，下同)3以下语句的输出结果是（在立即窗口中）a=Beijingb=ShangHai Print a;b A) Beijing ShangHaiB) Beijing ShangHaiC) BeijingShangHai D) Beijing ShangHai 4语句Print 5*55/5的输出结果是A) 5 B) 25 C) 0 D) 15设a、b、c为整型变量，其值分别为1、2、3，以下程序段的输出结果是a=b : b=c : c=aPrint a; b; cA) 1 2 3 B) 2 3 1 C) 3 2 1 D) 2 3 26语句Print Sgn(-62)+Int(-62)+Int(62)的输出结果是A) -36 B) 1 C) -1 D) -727以下语句的输出结果是a=Sqr(3)Print Format ( a, $#.#)A) $1.732 B) $1.732 C) $1732 D) $0001.7328以下程序段的输出结果是a=Sqr(3)b=Sqr(2)c=abPrint cA) 1 B) 0 C) False D) True9以下语句的输出结果是Print Format (32548.5, 000,000.00)A) 32548.5 B) 32,548.5 C) 032,548.50 D) 32,548.5010执行以下程序段后，变量c$的值为a$ = Visual Basic Programing b$ = Quickc$ = b$ & UCase(Mid$(a$, 7, 6) & Right$(a$, 11)A) Visual Basic Programing B) Quick Basic Programing C) QUICK Basic Programing D) Quick BASIC Programing11表达式456*7/8 Mod 9的值是 A) 4 B) 5 C) 6 D) 712InputBox函数返回值的类型为A) 数值 B)字符串 C) 变体 D) 数值或字符串（视输入的数据而定）13在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click() a = InputBox(Enter the First integer) b = InputBox(Enter the Second integer) Print b + aEnd Sub程序运行后，单击命令按钮，先后在输入对话框中分别输入456和123，则输出结果是A) 579 B) 123 C) 456 D) 12345614在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click() Dim a As Integer, b As Integer a = InputBox(Enter the First integer) b = InputBox(Enter the Second integer) Print b + aEnd Sub程序运行后，单击命令按钮，先后在输入对话框中分别输入456和123，则输出结果是A) 579 B) 123 C) 456 D) 12345615执行下面的语句后，所产生的信息框的标题是a = MsgBox(AAAA, , BBBB, , 5)A) BBBB B) 空 C) AAAA D) 出错，不能产生信息框答案：1.C 2.D 3.C 4.B 5.D 6.C 7.B 8.D 9.C 10.D 11.B 12.B 13.d 14.A 15.A填空题1.语句Print 25+32=; 25+32的输出结果是_。2.以下语句的输出结果是_。s$=Chinas$=BeijingPrint s$3.以下语句的输出结果是_。a%=3.14156Print a%4.设a=Sqr(2)*Sqr(3)，下列语句的输出结果分别是_、_、_、_。Print Fomat$(a, 000.00)Print Fomat$(a, #.#0)Print Fomat$(a, 00.00E+00)Print Fomat$(a, -#.#)5.阅读程序：Sub Form_Click() a = 10: b = 15: c = 20: d = 25 Print a; Spc(5); b; Spc(7); c Print a; Space$(8); b; Space$(5); c Print c; Spc(3); +; Spc(3); d; Print Spc(3); =; Spc(3); c + dEnd Sub6以下程序段的输出结果是x = 8 Print x + 1; x + 2; x + 31. 以下程序段的功能是x = 8.6 y = Int(x + 0.5) Print y答案：12532572Beijing334002.45 2.449 24.49E-01 -2.4490510152010152020+25 =456 9 10 117对变量x四舍五入后取整第6章 选择结构一、选择题1.已知一个人出生的年、月、日分别存放在变量y0、m0、d0中，当前日期的年、月、日分别存放在变量y1、m1、d1中，这个人的实足年龄存放在变量age中。则以下可以正确计算实足年龄的程序段式Aage = y1 - y0Bage = y1 - y0If m1 m0 Then If m1 m0 Or d1 d0 Then age = age - 1 age = age - 1ElseIf d1 d0 Then End If age = age - 1End IfCage = y1 - y0 Dage = y1 - y0If m1 m0 Then If m1 m0 Then age = age - 1 age = age - 1End If End If If m1 = m0 And d1 d0 Then If d1 3, 长城, ) _ & IIf(a 8, 故宫, ) _ & IIf(a 7, 颐和园, ) Text1.Text = tEnd Sub程序运行后，单击命令按钮，则在文本框中显示的内容是A旅游景点：长城故宫B旅游景点：长城颐和园C旅游景点：颐和园 D旅游景点：故宫3.假定x的值为5，则在执行以下语句时，其输出结果为“Result”的Select Case语句是ASelect Case x BSelect Case x Case 10 To 1 Case Is 5, Is 5, 1, 3 To 10 Case 1, 3, Is 5 Print ResultPrint Result End SelectEnd Select4.设a=6，则执行x = Iif(a5, -1, 0)后，x的值为A5B6C0D-15.设有函数r 1x=0则下列能正确计算该函数值的语句是AIf x = 0 Then r = 2 End IfBIf x = 0) Then r = 2 else r=1End IfCPrint (IIf(x 0, 1, 2)Dr = IIf(x 0 y = x + 1 Case Is = 0 y = x + 2 Case Else y = x + 3 End Select Label1.Caption = x Label2.Caption = yEnd Sub程序运行后，单击窗体，标签Label1和Label2中显示的内容分别是A-5和-2B-5和-4C-5和-3 D-5和-57.设置复选框或单选按钮标题对齐方式的属性是AAlignBAlignmentCSortedDValue二、填空题1. 以下程序段所对应的函数表达式是。x = InputBox(Enter an Integer)x = CInt(x)Select Case x Case Is = 0y = 0 Case Is = 10 y = 5 + 2 * x Case Is 15 y = 0End Select三、编程题1 编写一个“选择旅游地区”程序，旅客可以在窗体上选择自己想要去旅游的地区。假定共有三个地区，包括新加坡、马来西亚和泰国，每个旅客可以选择其中的一个、两个和三个地区，然后在文本框中显示所选择的旅游地区。2 给定三角形的三条边长，计算三角形的面积。编写程序，首先判断给出的三条边能否构成三角形，如可以构成，则计算并输出该三角形的面积，否则要求重新输入。当输入-1时结束程序。3 从键盘上输入一个学生的学号和考试成绩，然后输出该学生的学号、成绩，并根据成绩按下面的规定输出对该学生的评语：成绩9010070896069059评语 优秀 良好 及格不及格答案：1.C2.B3.C4.D5.D6.A7.B 0x=01. y = 5 + 2xx=10 x-5x15第7章 循环结构一、选择题1 假定有下面的程序段：For i = 1 To 3 For j = 1 To i For k = j To 3 Print i=; i; j=; j; k=; k Next k Next j Next i这是一个三重循环程序，在这个程序中，外层、中层和内层循环的循环次数是A3、6和14B3、8和16C3、4和12D3、9和182 假定有以下当循环：WhileNot 条件循环体Wend则执行循环体的“条件”是ATrueB1CFalseD-13. 阅读下面的程序：Private Sub Form_Click() Dim m, n As Integer m = InputBox(请输入 M 的值) m = Val(m) m1 = m n = InputBox(请输入 N 的值) n = Val(n) n1 = n Do While n 0 remin = m Mod n m = n n = remin Loop Print m1, n1, mEnd Sub程序运行后，单击窗体，在输入对话框中分别输入16和24，在程序在窗体上的输出结果为A16244B16248C24166D241684. 阅读下面的程序：Private Sub Form