下载文档原格式
可视化程序设计（VB）第一次作业一、单项选择题1. Visual Basic程序中分隔各语句的字符是(: )2. 工程文件的扩展名是（vbp）3. 下列运算符中，运算级别最高的是（*）4. 下列可作为Visual Basic的变量名的是 (Filename )5. 下面的程序的输出结果是(21 21 )x=5For i = 1 To 20 Step 2x=x+i\5Next iPrint x, i6. 下列赋值语句合法的是（A=A+B）7. 下列属性中，目录列表框和文件列表框都有的属性为（Path）。
8. 执行下面的程序段后，x的值为(21 )x=5For i = 1 To 20 Step 2x=x+i\5Next i9. 向一个顺序文件中写数据时，（Append）是从文件末尾添加的方式打开顺序文件。
10. Seek方法用于在（表）类型的记录集中查找满足条件的记录。
11. 当函数EOF()的返回值为真时，表示文件的指针指向（尾部）12. 如果要退出Do…Loop循环，可使用语句（Exit Do）。
13. 在VB中，称对象的数据为（属性）。
14. 不论何对象，都具有（Name）属性。
15. 使用Public Const语句声明一个全局的符号常量时，该语句应放在（标准模块的通用声明段）。
16. 下面关于变量的作用域，正确的描述是（同一模块中不同级的变量不能同名）。
17. 设a=2，b=3，c=4，d=5，下列表达式的值是（False）a＞b AND c＜=d OR 2*a＞c18. 把数值型转换为字符（串）型需要使用下列哪一个函数？（Str）19. 以下叙述错误的是（KeyPress事件中可以识别键盘上某个键的按下与释放）20. 用于设置或返回文件类型的属性是（Pattern）。
21. 要删除列表框中的某一个项目，需要使用（ReMoveItem）方法。
22. 以下语句的输出结果是(在立即窗口中) (Δ27ΔΔ65Δ) a=27 ＜CR＞ (＜CR＞为回车) b=65 ＜CR＞ Print a;b ＜CR＞23. 语句Print 5*5\5/5的输出结果是(25 )24. 编写如下事件过程：private sub form_mousedown（button as integer，shift as integer，x as single，y as single）if shift=6 and button=2 thenprint "BBBB"end ifend sub程序运行后，为了在窗体上输出“BBBB”，应执行的操作为（同时按下ctrl、alt键和鼠标右键）25. 如果X是一个正实数，对X的第三位小数四舍五入的表达式是（0.01 *Int ( 100 * ( X +0.005 ) )）。
第1次作业一、单项选择题（本大题共40分，共 20 小题，每小题 2 分）1. 表达x大于10且小于100的关系表达式为（）。
A.x>10 or x<100B.10<x<100C.x>10 and x<100D.10>x<1002. 关于VB描述错误的是（）。
A.VB集成开发环境是一组软件工具，集应用程序的设计、编辑、运行调试等于一体B.VB是面向过程的程序设计语言C.VB具有事件驱动的编程机制D.VB的工具箱窗口由被绘制成按钮形式的图标构成。
3. 下列程序段的执行结果为（）。
a=100:b=50 If a>b Then a=a-b elseb=b+a End if Print aA.10B.50C.100D.2004. 下列程序段的执行结果是（）。
x = Int(Rnd + 4) Select Case x Case5 Print "优秀" Case4 Print "良好" Case 5 Print "通过" Case Else Print "不通过" End SelectA.优秀B.良好C.通过D.不通过5. 要使循环体至少执行一次，应使用的循环结构是（）。
A.For……next循环B.While……wend循环C.Do……Loop while|until循环D.do[while|until]……loop循环6. 当变量x=2,y=5时，以下程序的输出结果为（）。
Do until y>5 x=x*y y=y+1 loop print xA.2B.5C.10D.207. 当执行以下程序时，在名为lblResult的标签框内将显示（）。
Private Sub cmdlt_click() Dim I,R R=0 For I=1 To 5 Step 1 R=R+I Next IlblResult.Caption=Str（R） End SubA.字符串15B.整数15C.字符串5D.整数58. 对象的属性用来描述对象的特征，它们是一组（）。
1、以下各项中不是VB 语言特点的是（语言特点的是（ ）。
A 图文混排图文混排 B 可视化编程可视化编程C 事件驱动事件驱动 D 结构化语言结构化语言2、以下各VB 对象中不是控件的是（对象中不是控件的是（ ）。
A 文本框文本框 B 列表框列表框 C 滚动条滚动条D 输入框输入框3、以下VB 对象没有Caption Caption（标题）属性的是（（标题）属性的是（（标题）属性的是（ ）。
A 窗体窗体 B 文本框文本框 C 标签标签D 复选框复选框4、应用VB 编写程序时，每个程序称为（编写程序时，每个程序称为（ ）。
A 窗体窗体 B 工程工程 C 过程过程D 函数函数5、以下各项中是列表框方法的是（、以下各项中是列表框方法的是（ ）。
A AddItem AddItem B ListCount ListCount C ListIndex ListIndexD Text6、对于下列各项：、对于下列各项：① 工具箱工具箱 ② 工程窗口工程窗口 ③ 输入框输入框 ④ 窗体窗口窗体窗口 ⑤ 属性窗口属性窗口 ⑥ 工作表工作表 不是Miccrosoft VB 6.0 Miccrosoft VB 6.0 的主界面中组成部分的有（的主界面中组成部分的有（的主界面中组成部分的有（ ）。
A ① ⑥B ① ③ C ① ② D ③ ⑥7、在Miccrosoft VB 6.0中，要编写程序代码，必须打开（中，要编写程序代码，必须打开（ ）。
A 工具箱工具箱 B 窗体窗口窗体窗口 C 代码窗口代码窗口 D 属性窗口属性窗口8、对于下列各项：、对于下列各项： ① 编写代码编写代码 ② 打印预览打印预览 ③ 调试运行调试运行 ④ 浏览网页浏览网页 ⑤ 界面设计界面设计 ⑥ 属性设置属性设置 在Miccrosoft VB 6.0中编写VB 语言程序的操作步骤顺序是（语言程序的操作步骤顺序是（ ）。
A ①④②③①④②③ B ⑤⑥①③⑤⑥①③ C ①⑥⑤③①⑥⑤③ D ⑤⑥③②⑤⑥③②9、在VB 程序中，某事件过程的首行是：程序中，某事件过程的首行是： Private Sub Command1_Click( ) Private Sub Command1_Click( ) 那么触发该过程执行的是（那么触发该过程执行的是（ ）。
可视化程序设计（VB） 14秋学期《可视化程序设计(VB)》在线作业1一,单选题1. 在窗体上画一个名称为Drive1的驱动器列表框，一个名称为Dir1的目录列表框。
当改变当前驱动器时，目录列表框应该与之同步改变。
设置两个控件同步的命令放在一个事件过程中，这个事件过程是（）。
A. Drive1_ChangeB. Drive1_ClickC. Dir1_ClickD. Dir1_Change?正确答案：A2. 下面程序段运行后，变量Value的值为（）。
x=20 IF x>=10 Then Value =5*x Else Value =4*xA. 100B. 80C. 90D. 70?正确答案：A3. 表达式Abs(-3.6)*sqr(100)的值是（）。
A. -360B. 360C. -36D. 36?正确答案：D4. 设有以下循环结构 Do 循环体 Loop While <条件> 则以下叙述中错误的是（）。
A. 若条件"是一个为0的常数，则一次也不执行循环体"B. "条件"可以是关系表达式、逻辑表达式或常数"C. 循环体中可以使用Exit Do语句D. "如果"条件"总是为True，则不停地执行循环体"?正确答案：A5. 在窗体上画一个命令按钮，名称为Command1，然后编写如下事件过程： Option Base 0 Private Sub Command1_Click() Dim city As Variant city = Array("北京", "上海", "天津", "沈阳") Print city(1) End Sub程序运行后，如果单击命令按钮，则在窗体上显示的内容是（）。
A. 空白B. 错误提示C. 北京D. 上海?正确答案：D6. 目录列表框的Path属性的作用是（）。
第1章可视化编程应用基础习题精选一、选择题1.Visual Basic是一种面向（）的程序设计语言。
A．过程B．用户C．方法D．对象2.Visual Basic是用于开发（）环境下的应用程序的工具。
A．Linux B．Windows C．NetWare D．UNIX3.VB6。
0不能开发基于（）的应用程序，也不能在这种环境下运行.A．Windows98 B．Windows2000 C．Windows NT D．UNIX4.与传统的程序设计语言相比,VB最突出的特点是（）.A．结构化程序设计B．程序开发环境C．事件驱动编程机制D．程序调试技术5.VB具有除（)之外的版本。
A．学习版B．专业版C．企业版D．网络版6.从功能上说，VB的3种版本（）。
A．学习版〉专业版>企业版B．企业版>专业版〉学习版C．专业版>企业版>学习版D．专业版〈企业版<学习版7.启动VB的方法中，一般不推荐使用（）。
A．从“开始”菜单中的程序B．双击桌面上的VB图标C．双击需要打开的工程文件D．双击需要打开的窗体文件8.下列不能打开属性窗口的操作是（）。
A．执行“视图”菜单中的“属性窗口”命令B．按F4键C．按Ctrl+T D．单击工具栏上的“属性窗口”按钮9.下列可以打开立即窗口的操作是（）。
A．Ctrl+D B．Ctrl+E C．Ctrl+F D．Ctrl+G10.双击窗体中的对象后，VB将显示的窗口是（）。
A．项目(工程）窗口B．工具箱C．代码窗口D．属性窗口11.用户可以通过（)模拟屏幕的小图像来布置窗体在屏幕上的位置。
A．窗体设计器B．快捷菜单C．立即窗口D．窗体布局窗口12.以下操作中（）不能打开属性窗口。
A．按F4键B．单击工具栏上的“属性窗口”按钮C．执行“视图”菜单中的“属性窗口”命令D．双击任何一个对象13.在VB中，调出对象浏览器的快捷键是（).A．F1 B．F2 C．F3 D．F414.要在调试时看到当前范围内每个变量以及所有对象的各成员的值，则要通过（）。
可视化程序设计（VB）C卷
二、判断
1、错
2、对
3、错
三、填空
1、立即、本地、监视
2、顺序访问、随机访问、二进制访
3、 form1.show form2.show
4、图形用户界面（Graphical User Interface，简称GUI，又称图形用户接口）是指采用图形方式显示的计算机操作用户界面。
5、顺序结构、选择结构、循环结构
6、记录字节
7、二维行列
8、Asc(“china”)
9、StatusBar1．Panels（2）．Picture＝LoadPicture（”C：＼Windows＼Winupd．ico”）
四、程序阅读
1、（1）a(i)<mini （2）index=i
2、
3、66 96
4、程序运行后窗体上显示的结果为：
第一行结果：Bb；第二行：BbCc；第三行结果：BbCcDd。
五、问答题
1、各项参数次序必须一一对应，除第一项参数“提示”不能省略外，其余参数均可省略，如果处于中间位置的参数省略，其对应的逗号不能省略。
2、有，算术表达式>字符串表达式>关系表达式>逻辑表达式
3、。
VB程序设计试题及答案（一)一、单选题1. VB6.0是一种面向 B 的编程环境。
（A）机器（B）对象(C）过程（D) 应用2. 要使FormI窗体的标题栏显示"欢迎使用VB",以下 D 语句是正确的。
（A) Forml。
Caption=“欢迎使用VB”（B) Forml。
Caption='欢迎使用VB’(C) Forml.Caption=欢迎使用VB(D）Forml.Caption=”欢迎使用VB”3。
若要使命令按钮不可操作,要对 A 属性进行设置。
(A）EnabIed （B)Visible(C）Backcolor (D)Caption4。
如果在窗体上已经创建了一个文本框对象TextI，可以通过 C 事件获得输入键值的ASCII码。
（A）Change (B）LostFocus（C) KeyPress （D）GotFocus5。
下面 A 是合法的变量名。
(A）X_yz (B）123ab。
（C) integer (D）X-Y6. 以下关系表达式中,其值为False的是 A 。
（A) "ABC">"AbC”（B）"女"〉"男”（C）”BASIC”=UCase（"basic）(D) ”123”<”23”7。
为了给x、y、z三个变量赋初值1,下面正确的赋值语句是 A .(A) x=1:y=1：z=1 （B) x=1,y=1，z=1(C）x=y=z=1 (D）xyz=18。
VB提供了结构化程序设计的三种基本结构，三种基本结构是 D 。
（A）递归结构、选择结构、循环结构（B)选择结构、过程结构、顺序结构(C)过程结构、输入输出结构、转向结构(D）选择结构、循环结构、顺序结构9. 下面If语句统计满足性别为男、职称为副教授以上、年龄小于40岁条件的人数，不正确的语句是 D 。
(A）If sex="男" And age=4O And InStr(duty，"教授"）〉O Then n=n+l （B) If sex=”男" And age=4O And (duty=”教授” Or duty="副教授") Then n=n+l（C）If sex=”男” And age=4O And Right（duty，2）="教授" Then n=n+l (D）If sex="男" And age=4O And duty="教授" And duty=”副教授” Then n=n+l10.下列关于Do…Loop循环结构执行循环次数的描述正确的是 D 。
四、简单程序设计题1．建立一个简单的应用程序，其窗体界面如下，单击窗体，则在窗体上显示“欢迎使用Visual Basic ！”，反复练习建立一个Visual Basic 应用程序的步骤。
2．建立一个简单的应用程序，其窗体界面如下，单击放大按钮，则文字“你好！”放大；单击缩小按钮，则文字“你好！”缩小；单击结束按钮，则结束程序的运行。
3．建立一个简单的应用程序，其窗体界面如下，单击输入按钮，则将光标定位在第一个文本框；单击大写转小写按钮，则将文本框1中的大写字母转化为小写显示在文本框2中；单击小写转大写按钮，则将文本框1中的小写字母转化为大写显示在文本框2中。
4.编写一个替换窗体标题的程序，初始运行如图2-2-1所示。
在文本框中输入文本，再点击“替换”按钮，会将窗体的标题替换为文本框中的文本，清除文本框中的文本，并将焦点设置到文本框. 图3-1-1 习题1-1程序界面图3-1-2 习题1-2程序运行界面图3-1-3 习题1-3程序运行界面四、简单程序设计题1．解：⑴ 建立用户界面以及界面中的对象启动Visual Basic 环境，选择“标准exe ”，创建工程、窗体。
⑵ 设置各个对象的属性调整窗体Form1的大小，将窗体Form1的Caption 属性设为练习1。
⑶ 为对象事件编写程序编写窗体对象Form1的单击事件驱动程序如图3-1-1(b)所示：⑷ 保存工程保存窗体：单击菜单“文件/保存form1”，并取名为习题1；保存工程：单击菜单“文件/保存工程”，并取名为习题1。
⑸运行程序按F5功能键或菜单“运行/启动”或运行按钮，运行程序，即可得到如图3-1-图3-1-1(a) 运行效果 图3-1-1(b) 程序代码1（a）所示的运行结果。
2．解：⑴建立用户界面以及界面中的对象①启动Visual Basic环境，选择“标准exe”，创建工程、窗体。
②单击窗口左边工具箱中的"标签按钮"，此时鼠标变成十字形状，拖动鼠标，在窗体上画1个标签："Label1"。
东大21春学期《可视化程序设计（VB）》在线平时作业1提示：东北大学课程学习已经开启，本套试卷是课程学习辅导资料，只作参考学习使用！！！一、单选题 (共 15 道试题,共 75 分)1.下面表达式的值不等于4是（）。
[A.]int(4.1)[B.]Int(4.9)[C.]Abs(int(-3.9))[D.]Abs(int(-4.5))[解析：请从上述选项中选择您认为正确的一项，并从填写到答案栏]参考答案是:D2.下面程序段运行后，变量m的值为（）。
a=2:b=1:c=5 IF a<b Then m=a Else m=b IF c<m Then m=c[A.]2[B.]1[C.]5[D.]以上答案都不对[解析：请从上述选项中选择您认为正确的一项，并从填写到答案栏]参考答案是:B3.在Visual Basic中，下列函数的值只为1，0，-1的是（）。
[A.]INT(X)[B.]ABS(X)[C.]SQR(X)[D.]SQN(X)[解析：请从上述选项中选择您认为正确的一项，并从填写到答案栏]参考答案是:D4.设窗体上有一个列表框控件List1，且其中含有若干列表项。
则以下能表示当前被选中的列表项内容的是（）。
[A.]List1.List[B.]List1.ListIndex[C.]List1.Index[D.]List1. Text[解析：请从上述选项中选择您认为正确的一项，并从填写到答案栏]参考答案是:D5.设有如下程序段： x=2 For i=1 To 10 Step 2 x=x+i Next 运行以上程序后，x的值是（）。
[A.]26[B.]27[C.]38[D.]57。
一、单项选择题：（每小题2分，共24分）1、下列哪个符号能作为V B中的变量名（）。
A、A B7B、7A BC、I FD、A[B]72、“X是小于100的非负数”，用V B表达式表示正确的是（）。
A、0≤x＜100B、0＜=X＜100C、0≤X O R X＜100D、0＜=X A N D X＜1003、数学式子S i n25°写成V B表达式是（）。
A、S i n25B、S i n（25°）C、S i n（25）D、S i n（25*3.14/180）4、下列哪组语句可以将变量A、B的值互换（）。
A、A=B：B=AB、A=C：C=B：B=AC、A=A+B：B=A－B：A=A－BD、A=（A+B）/2：B=（A=B）/25、函数I n t(R n d(0)*10)是在哪个范围内的整数（）。
A、（0，1）B、（1，0）C、（0，10）D、（1，9）6、一个对象可以执行的动作与可被对象识别的动作分别称为（）。
A、事件、方法B、方法、事件C、属性、方法D、过程、事件7、在窗体F o r m1的C l i c k事件过程中有以下语句：L a b e l1.C a p t i o n=“欢迎使用V B”该语句执行后标签控制的名称属性和C a p t i o n属性取值分别为（）。
A、L a b e l，欢迎使用V BB、L a b e l1，欢迎使用V BC、L a b e l1，C a p t i o nD、L a b e l1，L a b e l18、在调用过程时，下述说明正确的是（）。
A、只能使用C a l l语句用S u b过程B、调用S u b过程时，实参必须用括号括起来C、在表达式中调用F u n c t i o n过程时可以不用括号把实参括起来D、F u n c t i o n过程也可使用C a l l调用9、设S1、S2均为字符串变量，S1=“V i s u a l B a s i c”S2=“b”，则下面关系表达式中结果为T r u e的是（）。
A、l e n（S2）＞l e n（S1）B、C h r（66）&R i g h t（S1，4）=“B a s i c”C、L e f t（S1，8）＜S2D、M i d（S1，8，1）＞S210、下面哪个关键字是将光标设置到指定的文本框上（）。
A、T e x tB、N a m eC、s e l e c tD、S e t F o c u s11、在用菜单编辑器设计菜单时，必须输入的项有（）。
A、快捷键B、标题C、索引D、名称12、定时器的I n t e r v a l属性以（）为单位指定T i m e r事件之间的时间间隔。
A、分B、秒C、毫秒D、微秒二、填空题：（每空1分，共26分）1、V B程序执行的基本方法是由驱动子程序的运行。
2、开发一个V B应用程序的步骤分别是3、在V B程序中，工程项目文件的扩展名为窗体文件的扩展名为模块文件的扩展名为用户控件文件的扩展名为执行文件的扩展名为4、V B程序中，变量的作用域是指根据作用域的不同将变量分为5、V B中，常用的两种说明变量类型的声明语句是6、V B中，用于处理文字信息的输入和显示信息的控件分别是用于处理图形信息的控件分别是7、V B中，在预定对话框里有两种对话框分别称为它们所用函数分别为8、一个多文档界面的应用程序可以包含三类窗体分别是三、阅读程序，写出结果：（每小题6分，共30分）1、执行下面的程序，单击窗体后在窗体上显示的三行结果。
P r i v a t e S u b F o r m_C l i c k()D i m A s t r,A s t r1,A s t r2A s S t r i n gA s t r1="B"F o r I=1T o3A s t r2=L C a s e(A s t r1)A s t r1=A s t r1&A s t r2A s t r=A s t r&A s t r1P r i n t A s t rA s t r1=C h r(A s c(A s t r1)+1)N e x t IE n d S u b2、下面程序的功能是什么?P r i v a t e S u b C o m m a n d l_C l i c k() S1=0:S2=0M1=0:M2=0N=1D o w h i l e N<=100A=I N T(101*R N D)I f a m o d2=0T H E NS1=S1+A:M1=M1+1E l s eS2=S2+A:M2=M2+1E n d i fN=N+1L o o pP r i n t S1,S2P r i n t M1,M2E N D S u b3、下面程序的功能是什么?P r i v a t e S u b C o m m a n d1_C l i c k()D i m N A s I n t e g e r,I A s I n t e g e r,j A s l o n g,S A s l o n gN=V a l(T e x t1.T e x t)J=0：S=0F o r I=1T o nJ=J+I：S=S+JN e x t IL a b e l3.C a p t i o n=S t r$(S)E N D S u b4、执行下面的程序，单击命令按钮C o m m a n d1后在窗体上显示的图形功能是什么?P r i v a t e S u b C o m m a n d1_C l i c k()C l sP r i n tF o r n=1T o8P r i n t T a b(2*n+2);F o r m=1T o8P r i n t S p c(1);"*";N e x t mP r i n tN e x t nE n d S u b5、下面程序的功能是什么? P r i v a t e S u b F o r m_C l i c k()D i m a A s I n t e g e rD i m b A s I n t e g e rD i m c A s I n t e g e rD i m s A s L o n gD i m t o t A s L o n ga=10b=6c=4C a l l f a c t(a,t o t)s=t o tC a l l f a c t(b,t o t)s=s/t o tC a l l f a c t(c,t o t)s=s/t o tP r i n t a;"!/";b;"!/";c;"!=";s E n d S u bS u b f a c t(m A s I n t e g e r,t o t a l A s L o n g)D i m I A s I n t e g e rt o t a l=1F o r I=1T o mt o t a l=t o t a l*IN e x t IE n d S u b四、程序设计：（每小题10分，共20分）1、编写程序：利用文本框检查用户口令，而且使用静态变量来限制输入口令的次数。
界面如下图所示：2、编写程序：设计一个计时器，能够设置倒计时的时间，并进行倒计时。
界面如图所示：一、单项选择题（每小题2分,共24分）二、填空题（每空1分，共26分）1、事件2、设计用户界面；设置属性；编写事件过程代码；运行3、·V B P；·F R M；·B A S；·C L S；·E X E4、变量的有效范围；全局变量和局部变量5、D i m变量名(a s数据类型)和s t a t i c变量名(a s数据类型)6、文本框；标签框；图片框；图像框7、消息框；输入对话框；M s g b o x；I n p u t b o x函数8、M D I父窗体(M D I窗体，即主窗体)；M D I子窗体(简称子窗体)；普通窗体(或称标准窗体)三、阅读程序，写出结果：（每小题6分，共30分）1、程序运行后，窗体上显示的结果为：第一行结果：B b；第二行：B b C c；第三行结果：B b C c D d。
2、程序的功能是：找出101间能被2整除的随机数并且累加出和。
3、程序的功能是：分两重循环，内循环求1→N的累加，外循环求内循环的每次累加结果的形式：S=1+(1+2)+(1+2+3)+…+(1+2+3+…+n)4、显示的图形为：由“*”号组成的平行四边形。
5、程序的功能是：利用子程序计算阶乘为：四、程序设计：（每小题10分，共20分）1、编写文本框T e x t1的K e y P r e s s事件代码：P r i v a t e S u b T e x t1_K e y P r e s s(K e y A s c i i A s I n t e g e r) S t a t i c n A s I n t e g e rI f K e y A s c i i=13T h e nI f L C a s e(T e x t1.T e x t)="l o n g x b"T h e nL a b e l1.C a p t i o n="欢迎使用本系统"E l s en=n+1I f n=3T h e nL a b e l1.C a p t i o n="对不起，您无权使用"T e x t1.E n a b l e d=F a l s eE l s eL a b e l1.C a p t i o n="对不起，口令错"T e x t1.S e l S t a r t=0T e x t1.S e l L e n g t h=L e n(T e x t1.T e x t)E n d I fE n d I fE n d I fE n d S u b2、程序代码如下：P r i v a t e S u b C o m m a n d1_C l i c k（）T i m e r1.E n a b l e d=T r u eT i m e r1.T a g=T e x t1.T e x t*60F r a m e1.C a p t i o n=“现在开始倒计时”E n d S u bP r i v a t e S u b T i m e r1_T i m e r（）T i m e r1.T a g=T i m e r1.T a g-1I f m<0T h e nT i m e r1.E n a b l e r=F a l s eM s g B o x“预定的时间到了！”，0，“倒计时”F r a m e1.C a p t i o n=“请输入计时的分钟数：”T e x t1.T e x t=0E x i t S u bE n d I fn1=F o r m a t（m M o d60,“00”）n2=F o r m a t（m\60）M o d60,“00：”）n3=F o r m a t（m\3600）,“00：”）T e x t1.T e x t=n3&n2&n1E n d S u b。
