程序的顺序结构(教育精品).ppt
第三章 顺序结构程序设计 从计算机程序的结构来看,一个计算机程序总从计算机程序的结构来看,一个计算机程序总从计算机程序的结构来看,一个计算机程序总从计算机程序的结构来看,一个计算机程序总是由如下是由如下是由如下是由如下3 3种基本结构:种基本结构:种基本结构:种基本结构:顺序结构、选择结构、循顺序结构、选择结构、循顺序结构、选择结构、循顺序结构、选择结构、循环结构组成。本章介绍顺序结构及其相关的语句。环结构组成。本章介绍顺序结构及其相关的语句。环结构组成。本章介绍顺序结构及其相关的语句。环结构组成。本章介绍顺序结构及其相关的语句。顺序结构由赋值、输入、输出等语句或函数、过程顺序结构由赋值、输入、输出等语句或函数、过程顺序结构由赋值、输入、输出等语句或函数、过程顺序结构由赋值、输入、输出等语句或函数、过程组成,这些语句不会改变程序的流程,总是在执行组成,这些语句不会改变程序的流程,总是在执行组成,这些语句不会改变程序的流程,总是在执行组成,这些语句不会改变程序的流程,总是在执行完后,接着执行程序的下一语句。完后,接着执行程序的下一语句。完后,接着执行程序的下一语句。完后,接着执行程序的下一语句。3.1 赋值语句赋值语句 3.2 数据输入数据输入 3.3 数据输出数据输出 3.4 暂停暂停(Stop)、结束、结束(End)语句语句 3.1 赋值语句赋值语句赋值语句赋值语句赋值语句(Let)(Let)的格式是:的格式是:的格式是:的格式是:Let|.=【说明说明说明说明】1 1、关键字、关键字、关键字、关键字LetLet可不写;可不写;可不写;可不写;2 2、按标识符命名规则定义;按标识符命名规则定义;按标识符命名规则定义;按标识符命名规则定义;3 3、变量未赋值时,数值型变量的值为、变量未赋值时,数值型变量的值为、变量未赋值时,数值型变量的值为、变量未赋值时,数值型变量的值为0 0,字符串变量的,字符串变量的,字符串变量的,字符串变量的值为空串值为空串值为空串值为空串;4 4、“”赋值号与数学中的等号意义不同;赋值号与数学中的等号意义不同;赋值号与数学中的等号意义不同;赋值号与数学中的等号意义不同;5 5、赋值号左边必须是单个的变量或对象属性。、赋值号左边必须是单个的变量或对象属性。、赋值号左边必须是单个的变量或对象属性。、赋值号左边必须是单个的变量或对象属性。6 6、变量名或对象属性名的类型应与表达式的类型相容。、变量名或对象属性名的类型应与表达式的类型相容。、变量名或对象属性名的类型应与表达式的类型相容。、变量名或对象属性名的类型应与表达式的类型相容。例3.1:交换两个变量的值 按照下图设计界面,两个变量的值分别输入到界面上按照下图设计界面,两个变量的值分别输入到界面上按照下图设计界面,两个变量的值分别输入到界面上按照下图设计界面,两个变量的值分别输入到界面上的两个标签中,并对标签做如下图所示的属性设置。单击的两个标签中,并对标签做如下图所示的属性设置。单击的两个标签中,并对标签做如下图所示的属性设置。单击的两个标签中,并对标签做如下图所示的属性设置。单击按钮按钮按钮按钮“交换两个变量的值交换两个变量的值交换两个变量的值交换两个变量的值”,两个文本框中的内容马上交,两个文本框中的内容马上交,两个文本框中的内容马上交,两个文本框中的内容马上交换换换换并显示出来。并显示出来。并显示出来。并显示出来。例例 3.13.13.2 数据输入3.2.1 用输入框用输入框(InputBox)输入数据输入数据3.2.2 用文本框用文本框(TextBox)输入数据输入数据3.2.1 用输入框输入数据 InputBox函数是输入函数,该函数提供函数是输入函数,该函数提供一个对话框给用户进行数值和文本的输入。一个对话框给用户进行数值和文本的输入。函数格式是:函数格式是:=InputBox(,)功能:用对话框形式让用户进行数值和文本数功能:用对话框形式让用户进行数值和文本数 据输入,所输入的内容由函数值返回。据输入,所输入的内容由函数值返回。3.2.1 用输入框输入数据【说明说明说明说明】1 1、为运行时在对话框中需显示的附加信息,本项为运行时在对话框中需显示的附加信息,本项为运行时在对话框中需显示的附加信息,本项为运行时在对话框中需显示的附加信息,本项 为字符串,必须设定;为字符串,必须设定;为字符串,必须设定;为字符串,必须设定;2 2、为运行时对话框的标题,如不设定,则为该为运行时对话框的标题,如不设定,则为该为运行时对话框的标题,如不设定,则为该为运行时对话框的标题,如不设定,则为该 工程的名字;工程的名字;工程的名字;工程的名字;3 3、为运行时出现在对话框中文本框里的默认值,如为运行时出现在对话框中文本框里的默认值,如为运行时出现在对话框中文本框里的默认值,如为运行时出现在对话框中文本框里的默认值,如 不设定,对话框中的文本框为空;不设定,对话框中的文本框为空;不设定,对话框中的文本框为空;不设定,对话框中的文本框为空;4 4、x 和和和和y 控制对话框在窗体中出现的位置;控制对话框在窗体中出现的位置;控制对话框在窗体中出现的位置;控制对话框在窗体中出现的位置;5 5、当、当、当、当InputBoxInputBox函数被执行时,用户可以在出现的对话框中的函数被执行时,用户可以在出现的对话框中的函数被执行时,用户可以在出现的对话框中的函数被执行时,用户可以在出现的对话框中的 文本框里输入,所输入的内容由函数值返回;文本框里输入,所输入的内容由函数值返回;文本框里输入,所输入的内容由函数值返回;文本框里输入,所输入的内容由函数值返回;6 6、在格式中,如省略某个语法成分不写,则其前方的逗号、在格式中,如省略某个语法成分不写,则其前方的逗号、在格式中,如省略某个语法成分不写,则其前方的逗号、在格式中,如省略某个语法成分不写,则其前方的逗号“,”必须写上。必须写上。必须写上。必须写上。例例例例3.23.2:求两个整数之和:求两个整数之和:求两个整数之和:求两个整数之和 按照下图设计界面,两个加数由按照下图设计界面,两个加数由按照下图设计界面,两个加数由按照下图设计界面,两个加数由InputBoxInputBox函数提供。函数提供。函数提供。函数提供。点点点点击击击击“加数输入加数输入加数输入加数输入”按钮,依次弹出左图所示对话框,输入加数,按钮,依次弹出左图所示对话框,输入加数,按钮,依次弹出左图所示对话框,输入加数,按钮,依次弹出左图所示对话框,输入加数,点击点击点击点击“求和求和求和求和”按钮,计算两数之和并显示在相应文本框中。按钮,计算两数之和并显示在相应文本框中。按钮,计算两数之和并显示在相应文本框中。按钮,计算两数之和并显示在相应文本框中。例例 3.23.23.2.2 用文本框输入数据 1、文本框的常用属性、文本框的常用属性 (1 1)TextText属性属性属性属性:文本框的默认属性为:文本框的默认属性为:文本框的默认属性为:文本框的默认属性为TextText,即文本框,即文本框,即文本框,即文本框中显示的文本,是文本框最重要的属性。中显示的文本,是文本框最重要的属性。中显示的文本,是文本框最重要的属性。中显示的文本,是文本框最重要的属性。(2 2)MultiLineMultiLine属性:逻辑型。当属性:逻辑型。当属性:逻辑型。当属性:逻辑型。当MultiLineMultiLine属性为属性为属性为属性为TrueTrue时,文本框可以输入或显示多行文本,且会在时,文本框可以输入或显示多行文本,且会在时,文本框可以输入或显示多行文本,且会在时,文本框可以输入或显示多行文本,且会在输入的内容超出文本框时自动换行。默认值为输入的内容超出文本框时自动换行。默认值为输入的内容超出文本框时自动换行。默认值为输入的内容超出文本框时自动换行。默认值为FalseFalse。(3 3)LockedLocked属性属性属性属性:逻辑型,默认值为:逻辑型,默认值为:逻辑型,默认值为:逻辑型,默认值为FalseFalse。若设置。若设置。若设置。若设置为为为为TrueTrue,则文本框只能显示文本,不能输入或编辑,则文本框只能显示文本,不能输入或编辑,则文本框只能显示文本,不能输入或编辑,则文本框只能显示文本,不能输入或编辑文本。文本。文本。文本。3.2.2 用文本框输入数据 1、文本框的常用属性、文本框的常用属性 (4 4)MaxLengthMaxLength属性:用于限制用户在文本框中输入属性:用于限制用户在文本框中输入属性:用于限制用户在文本框中输入属性:用于限制用户在文本框中输入 的字数。默认值为的字数。默认值为的字数。默认值为的字数。默认值为0 0,即不限制字数。(注意:,即不限制字数。(注意:,即不限制字数。(注意:,即不限制字数。(注意:VBVB中一个汉字的长度相当于一个西文字符)。中一个汉字的长度相当于一个西文字符)。中一个汉字的长度相当于一个西文字符)。中一个汉字的长度相当于一个西文字符)。(5 5)PasswordCharPasswordChar属性:字符串类型。当属性:字符串类型。当属性:字符串类型。当属性:字符串类型。当MultiLineMultiLine 属性值为属性值为属性值为属性值为FalseFalse时,该属性可以用于口令输入。如时,该属性可以用于口令输入。如时,该属性可以用于口令输入。如时,该属性可以用于口令输入。如 果把果把果把果把PasswordCharPasswordChar属性设置为一个字符,如星号属性设置为一个字符,如星号属性设置为一个字符,如星号属性设置为一个字符,如星号 “*”“*”,则在文本框中键入字符时,只显示星号,不,则在文本框中键入字符时,只显示星号,不,则在文本框中键入字符时,只显示星号,不,则在文本框中键入字符时,只显示星号,不 显示键入的字符。但是显示键入的字符。但是显示键入的字符。但是显示键入的字符。但是TextText属性接收的仍是用户输属性接收的仍是用户输属性接收的仍是用户输属性接收的仍是用户输 入的文本。入的文本。入的文本。入的文本。3.2.2 用文本框输入数据 1、文本框的常用属性、文本框的常用属性 (6 6)ScrollBarsScrollBars属性:数值型。该属性用于确定文本属性:数值型。该属性用于确定文本属性:数值型。该属性用于确定文本属性:数值型。该属性用于确定文本 框是否带滚动条。有以下框是否带滚动条。有以下框是否带滚动条。有以下框是否带滚动条。有以下4 4种选择:种选择:种选择:种选择:0 None0 None 没有滚动条没有滚动条没有滚动条没有滚动条 1 Horizontal1 Horizontal 只有水平滚动条只有水平滚动条只有水平滚动条只有水平滚动条 2 Vertical2 Vertical 只有垂直滚动条只有垂直滚动条只有垂直滚动条只有垂直滚动条 3 Both3 Both 同时具有水平和垂直滚动条同时具有水平和垂直滚动条同时具有水平和垂直滚动条同时具有水平和垂直滚动条 只有当只有当只有当只有当MultiLineMultiLine属性值为属性值为属性值为属性值为TrueTrue时,文本框才显时,文本框才显时,文本框才显时,文本框才显示滚动条。示滚动条。示滚动条。示滚动条。3.2.2 用文本框输入数据 1 1、文本框的常用属性、文本框的常用属性、文本框的常用属性、文本框的常用属性 (7 7)SelStartSelStart、SelLengthSelLength、SelTextSelText属性:这三个属性不能属性:这三个属性不能属性:这三个属性不能属性:这三个属性不能 在属性窗口中设置,只能在代码窗口中设置。在属性窗口中设置,只能在代码窗口中设置。在属性窗口中设置,只能在代码窗口中设置。在属性窗口中设置,只能在代码窗口中设置。SelStartSelStart:在代码中指定从文本框中的第几个字符开始选:在代码中指定从文本框中的第几个字符开始选:在代码中指定从文本框中的第几个字符开始选:在代码中指定从文本框中的第几个字符开始选 定(注:文本框中第一个字符的位置是定(注:文本框中第一个字符的位置是定(注:文本框中第一个字符的位置是定(注:文本框中第一个字符的位置是0 0),或当用户用),或当用户用),或当用户用),或当用户用 鼠标拖动选定时返回其选定文本的开始位置。鼠标拖动选定时返回其选定文本的开始位置。鼠标拖动选定时返回其选定文本的开始位置。鼠标拖动选定时返回其选定文本的开始位置。SelLengthSelLength:选定的文本的长度。:选定的文本的长度。:选定的文本的长度。:选定的文本的长度。SelTextSelText:选定文本的内容。其实,设置了:选定文本的内容。其实,设置了:选定文本的内容。其实,设置了:选定文本的内容。其实,设置了SelStartSelStart和和和和 SelLengthSelLength,即选定了文本,即选定了文本,即选定了文本,即选定了文本,VBVB会自动将选定的文本送会自动将选定的文本送会自动将选定的文本送会自动将选定的文本送 入入入入SelTextSelText存放。存放。存放。存放。3.2.2 用文本框输入数据 1 1、文本框的常用属性、文本框的常用属性、文本框的常用属性、文本框的常用属性 (8 8)TabIndexTabIndex、TabStopTabStop属性:这两个属性用于控制属性:这两个属性用于控制属性:这两个属性用于控制属性:这两个属性用于控制TabTab键序。键序。键序。键序。TabIndexTabIndex属性属性属性属性 TabIndexTabIndex属性决定控件接收焦点的顺序。当在窗体上画出属性决定控件接收焦点的顺序。当在窗体上画出属性决定控件接收焦点的顺序。当在窗体上画出属性决定控件接收焦点的顺序。当在窗体上画出第一个控件时,第一个控件时,第一个控件时,第一个控件时,VBVB分配给控件的分配给控件的分配给控件的分配给控件的TabIndexTabIndex属性默认值为属性默认值为属性默认值为属性默认值为0 0,第,第,第,第二个为二个为二个为二个为1 1,第三个为,第三个为,第三个为,第三个为2 2,依次类推。,依次类推。,依次类推。,依次类推。TabStopTabStop属性属性属性属性 TabStopTabStop属性决定焦点是否能够停留在该控件上。将控件属性决定焦点是否能够停留在该控件上。将控件属性决定焦点是否能够停留在该控件上。将控件属性决定焦点是否能够停留在该控件上。将控件的的的的TabStopTabStop属性设为属性设为属性设为属性设为FalseFalse,便可将此控件从键序中删除,但,便可将此控件从键序中删除,但,便可将此控件从键序中删除,但,便可将此控件从键序中删除,但仍然保持它在实际仍然保持它在实际仍然保持它在实际仍然保持它在实际TabTab键序中的位置,只不过在按键序中的位置,只不过在按键序中的位置,只不过在按键序中的位置,只不过在按TabTab键时这键时这键时这键时这个控件将被跳过。个控件将被跳过。个控件将被跳过。个控件将被跳过。3.2.2 用文本框输入数据 2、事件和方法、事件和方法 文本框除了支持鼠标的文本框除了支持鼠标的文本框除了支持鼠标的文本框除了支持鼠标的ClickClick、DblClickDblClick事件外,事件外,事件外,事件外,还支持还支持还支持还支持ChangeChange、GotFocusGotFocus、LostFocusLostFocus、KeyPressKeyPress等事件和等事件和等事件和等事件和SetFocusSetFocus方法。方法。方法。方法。(1 1)ChangeChange事件:当用户向文本框输入新的内容,事件:当用户向文本框输入新的内容,事件:当用户向文本框输入新的内容,事件:当用户向文本框输入新的内容,或在程序代码中对文本框的或在程序代码中对文本框的或在程序代码中对文本框的或在程序代码中对文本框的TextText属性进行赋值从而改属性进行赋值从而改属性进行赋值从而改属性进行赋值从而改变了文本框的变了文本框的变了文本框的变了文本框的TextText属性时,将触发属性时,将触发属性时,将触发属性时,将触发ChangeChange事件。事件。事件。事件。例例例例3.33.3:按照下图设计界面,在上面的文本框中输入按照下图设计界面,在上面的文本框中输入按照下图设计界面,在上面的文本框中输入按照下图设计界面,在上面的文本框中输入和编辑文本,在下面的文本框中同步显示不同格式的和编辑文本,在下面的文本框中同步显示不同格式的和编辑文本,在下面的文本框中同步显示不同格式的和编辑文本,在下面的文本框中同步显示不同格式的相应文本。相应文本。相应文本。相应文本。例例 3.33.33.2.2 用文本框输入数据 2、事件和方法、事件和方法 (2 2)GotFocusGotFocus事件:当运行时用事件:当运行时用事件:当运行时用事件:当运行时用TabTab键或用鼠标选键或用鼠标选键或用鼠标选键或用鼠标选择对象,或用择对象,或用择对象,或用择对象,或用SetFocusSetFocus方法使光标落在对象上时,触方法使光标落在对象上时,触方法使光标落在对象上时,触方法使光标落在对象上时,触发该事件,称之为发该事件,称之为发该事件,称之为发该事件,称之为“获得焦点获得焦点获得焦点获得焦点”。该事件适用于窗体和。该事件适用于窗体和。该事件适用于窗体和。该事件适用于窗体和大部分可接受键盘输入的控件。大部分可接受键盘输入的控件。大部分可接受键盘输入的控件。大部分可接受键盘输入的控件。(3 3)LostFocusLostFocus事件:当按下事件:当按下事件:当按下事件:当按下TabTab键使光标离开当前键使光标离开当前键使光标离开当前键使光标离开当前文本框,或者用鼠标选择窗体的其他对象时触发该事文本框,或者用鼠标选择窗体的其他对象时触发该事文本框,或者用鼠标选择窗体的其他对象时触发该事文本框,或者用鼠标选择窗体的其他对象时触发该事件,称之为件,称之为件,称之为件,称之为“失去焦点失去焦点失去焦点失去焦点”。例例3.4:改写例改写例改写例改写例3.23.2,两个加数直接由文本框输入。按,两个加数直接由文本框输入。按,两个加数直接由文本框输入。按,两个加数直接由文本框输入。按照下图设计界面。照下图设计界面。照下图设计界面。照下图设计界面。例例 3.43.43.2.2 用文本框输入数据 2、事件和方法、事件和方法 (4 4)KeyPressKeyPress事件:当在键盘上按下某个特殊键时事件:当在键盘上按下某个特殊键时事件:当在键盘上按下某个特殊键时事件:当在键盘上按下某个特殊键时触发该事件。触发该事件。触发该事件。触发该事件。KeyPressKeyPress事件返回一个参数事件返回一个参数事件返回一个参数事件返回一个参数KeyAsciiKeyAscii,该参数值为整数,表示所按下键的该参数值为整数,表示所按下键的该参数值为整数,表示所按下键的该参数值为整数,表示所按下键的ASCIIASCII码值。码值。码值。码值。例例例例3.5 3.5 在窗体上建立一个文本框,将输入到文本框中的在窗体上建立一个文本框,将输入到文本框中的在窗体上建立一个文本框,将输入到文本框中的在窗体上建立一个文本框,将输入到文本框中的大写字母直接转换为小写。界面如下图所示。大写字母直接转换为小写。界面如下图所示。大写字母直接转换为小写。界面如下图所示。大写字母直接转换为小写。界面如下图所示。例例 3.53.53.2.2 用文本框输入数据 2、事件和方法、事件和方法 (5 5)SetFocusSetFocus方法:方法:方法:方法:SetFocusSetFocus方法是文本框常用方法是文本框常用方法是文本框常用方法是文本框常用的方法,该方法是把光标移到指定的文本框中,使该的方法,该方法是把光标移到指定的文本框中,使该的方法,该方法是把光标移到指定的文本框中,使该的方法,该方法是把光标移到指定的文本框中,使该文本框获得焦点。当在窗体上建立了多个文本框后,文本框获得焦点。当在窗体上建立了多个文本框后,文本框获得焦点。当在窗体上建立了多个文本框后,文本框获得焦点。当在窗体上建立了多个文本框后,可以使用该方法把光标置于所需要的文本框上。使用可以使用该方法把光标置于所需要的文本框上。使用可以使用该方法把光标置于所需要的文本框上。使用可以使用该方法把光标置于所需要的文本框上。使用格式如下:格式如下:格式如下:格式如下:.SetFocusSetFocus例如:将焦点定位在文本框例如:将焦点定位在文本框例如:将焦点定位在文本框例如:将焦点定位在文本框Text1Text1中,使用语句:中,使用语句:中,使用语句:中,使用语句:Text1.SetFocusText1.SetFocus3.3 数据输出3.3.1 用用Print方法输出数据方法输出数据3.3.2 用消息框用消息框(MsgBox)输出数据输出数据3.3.3 用文本框用文本框(TextBox)输出数据输出数据3.3.4 用标签用标签(Label)输出数据输出数据3.3.1 用用Print方法输出数据方法输出数据(1)Print方法方法(2)与与Print方法有关的函数方法有关的函数3.3.1 用用Print方法输出数据方法输出数据(1)Print方法方法 PrintPrint方法可以在窗体、图片框、打印机和立即窗口等对象方法可以在窗体、图片框、打印机和立即窗口等对象方法可以在窗体、图片框、打印机和立即窗口等对象方法可以在窗体、图片框、打印机和立即窗口等对象上输出数据。其语法格式为:上输出数据。其语法格式为:上输出数据。其语法格式为:上输出数据。其语法格式为:.Print.Print,|;,|;【说明说明说明说明】1 1、格式中的、格式中的、格式中的、格式中的 可以是窗体可以是窗体可以是窗体可以是窗体FormForm,图片框,图片框,图片框,图片框PictureBoxPictureBox或或或或打印机打印机打印机打印机PrinterPrinter。如果省略,则在当前窗体上直接输出。如果省略,则在当前窗体上直接输出。如果省略,则在当前窗体上直接输出。如果省略,则在当前窗体上直接输出。2 2、是一个或多个表达式,可以是数字表达式或是一个或多个表达式,可以是数字表达式或是一个或多个表达式,可以是数字表达式或是一个或多个表达式,可以是数字表达式或字符串。对于数值表达式,将输出表达式的值;对于字符串,字符串。对于数值表达式,将输出表达式的值;对于字符串,字符串。对于数值表达式,将输出表达式的值;对于字符串,字符串。对于数值表达式,将输出表达式的值;对于字符串,则照原样输出;对于变量,则输出变量的内容。则照原样输出;对于变量,则输出变量的内容。则照原样输出;对于变量,则输出变量的内容。则照原样输出;对于变量,则输出变量的内容。后如不加逗号后如不加逗号后如不加逗号后如不加逗号“,”,”或分号或分号或分号或分号“;”;”,则表示下一次再用,则表示下一次再用,则表示下一次再用,则表示下一次再用PrintPrint打印打印打印打印输出时输出时输出时输出时将在新的一行开始。将在新的一行开始。将在新的一行开始。将在新的一行开始。3.3.1 用用Print方法输出数据方法输出数据(1)Print方法方法【说明说明说明说明】3 3、当输出多个表达式时,各表达式之间用分隔符逗号、当输出多个表达式时,各表达式之间用分隔符逗号、当输出多个表达式时,各表达式之间用分隔符逗号、当输出多个表达式时,各表达式之间用分隔符逗号“,”或或或或分分分分号号号号“;”隔开。如果使用逗号分隔符,则各输出项按标准输出隔开。如果使用逗号分隔符,则各输出项按标准输出隔开。如果使用逗号分隔符,则各输出项按标准输出隔开。如果使用逗号分隔符,则各输出项按标准输出(分区输出)格式显示,此时,以(分区输出)格式显示,此时,以(分区输出)格式显示,此时,以(分区输出)格式显示,此时,以1414个字符宽度为单位将输出个字符宽度为单位将输出个字符宽度为单位将输出个字符宽度为单位将输出行分为若干区段,逗号后面的表达式在下一个区段输出。如果行分为若干区段,逗号后面的表达式在下一个区段输出。如果行分为若干区段,逗号后面的表达式在下一个区段输出。如果行分为若干区段,逗号后面的表达式在下一个区段输出。如果使用分号分隔符,则按紧凑格式输出,即数值型数据后多一个使用分号分隔符,则按紧凑格式输出,即数值型数据后多一个使用分号分隔符,则按紧凑格式输出,即数值型数据后多一个使用分号分隔符,则按紧凑格式输出,即数值型数据后多一个空格,字符串后没有空格。空格,字符串后没有空格。空格,字符串后没有空格。空格,字符串后没有空格。3.3.1 用用Print方法输出数据方法输出数据(1)Print方法方法【说明说明说明说明】(4)(4)如果在语句行的末尾使用逗号分隔符,则下一个如果在语句行的末尾使用逗号分隔符,则下一个如果在语句行的末尾使用逗号分隔符,则下一个如果在语句行的末尾使用逗号分隔符,则下一个PrintPrint输出的输出的输出的输出的内容将在当前内容将在当前内容将在当前内容将在当前PrintPrint所输出信息的下一个分区显示;如果在语句所输出信息的下一个分区显示;如果在语句所输出信息的下一个分区显示;如果在语句所输出信息的下一个分区显示;如果在语句行的末尾使用分号分隔符,则下一个行的末尾使用分号分隔符,则下一个行的末尾使用分号分隔符,则下一个行的末尾使用分号分隔符,则下一个PrintPrint输出的内容将紧跟在输出的内容将紧跟在输出的内容将紧跟在输出的内容将紧跟在当前当前当前当前PrintPrint所输出的信息后面;如果省略语句行末尾的分隔符,所输出的信息后面;如果省略语句行末尾的分隔符,所输出的信息后面;如果省略语句行末尾的分隔符,所输出的信息后面;如果省略语句行末尾的分隔符,则则则则PrintPrint方法将自动换行。方法将自动换行。方法将自动换行。方法将自动换行。(5)Print(5)Print方法具有计算和输出的双重功能,对于表达式,总是先方法具有计算和输出的双重功能,对于表达式,总是先方法具有计算和输出的双重功能,对于表达式,总是先方法具有计算和输出的双重功能,对于表达式,总是先计算后输出。计算后输出。计算后输出。计算后输出。3.3.1 用用Print方法输出数据方法输出数据(2)与与Print方法有关的函数方法有关的函数(1)Tab(1)Tab函数函数函数函数在在在在PrintPrint方法中,可以使用方法中,可以使用方法中,可以使用方法中,可以使用TabTab函数对输出定位,其格式为:函数对输出定位,其格式为:函数对输出定位,其格式为:函数对输出定位,其格式为:Tab(nTab(n););【说明说明说明说明】1 1、n n为数值表达式,其值为一整数。为数值表达式,其值为一整数。为数值表达式,其值为一整数。为数值表达式,其值为一整数。TabTab函数把显示或打印位函数把显示或打印位函数把显示或打印位函数把显示或打印位置移到由参数置移到由参数置移到由参数置移到由参数n n指定的列数,从此列开始输出数据。要输出的指定的列数,从此列开始输出数据。要输出的指定的列数,从此列开始输出数据。要输出的指定的列数,从此列开始输出数据。要输出的内容放在内容放在内容放在内容放在TabTab函数后面,并用分号隔开。函数后面,并用分号隔开。函数后面,并用分号隔开。函数后面,并用分号隔开。2 2、通常最左边的列号为、通常最左边的列号为、通常最左边的列号为、通常最左边的列号为1 1。如果当前的显示位置已经超过。如果当前的显示位置已经超过。如果当前的显示位置已经超过。如果当前的显示位置已经超过n n,则自动下移一行;当则自动下移一行;当则自动下移一行;当则自动下移一行;当n n大于行的宽度时,显示位置为:大于行的宽度时,显示位置为:大于行的宽度时,显示位置为:大于行的宽度时,显示位置为:n Mod n Mod 。3 3、当在一个、当在一个、当在一个、当在一个PrintPrint方法中有多个方法中有多个方法中有多个方法中有多个TabTab函数时,每个函数时,每个函数时,每个函数时,每个TabTab函数对应函数对应函数对应函数对应一个输出项,各输出项之间用分号隔开。一个输出项,各输出项之间用分号隔开。一个输出项,各输出项之间用分号隔开。一个输出项,各输出项之间用分号隔开。3.3.1 用用Print方法输出数据方法输出数据(2)与与Print方法有关的函数方法有关的函数(2)(2)SpcSpc函数函数函数函数在在在在PrintPrint方法中,也可以使用方法中,也可以使用方法中,也可以使用方法中,也可以使用SpcSpc函数来对输出进行定位。与函数来对输出进行定位。与函数来对输出进行定位。与函数来对输出进行定位。与TabTab函数不同,函数不同,函数不同,函数不同,SpcSpc函数提供若干空格。其格式为:函数提供若干空格。其格式为:函数提供若干空格。其格式为:函数提供若干空格。其格式为:Spc(nSpc(n););【说明说明说明说明】1 1、n n为数值表达式,其值为一整数,表示在显示或打印下一个为数值表达式,其值为一整数,表示在显示或打印下一个为数值表达式,其值为一整数,表示在显示或打印下一个为数值表达式,其值为一整数,表示在显示或打印下一个表达式之前插入的空格数。表达式之前插入的空格数。表达式之前插入的空格数。表达式之前插入的空格数。2 2、SpcSpc函数与输出项之间用分号隔开。函数与输出项之间用分号隔开。函数与输出项之间用分号隔开。函数与输出项之间用分号隔开。3 3、当、当、当、当PrintPrint方法与不同大小的字体一起使用时,使用方法与不同大小的字体一起使用时,使用方法与不同大小的字体一起使用时,使用方法与不同大小的字体一起使用时,使用SpcSpc函数函数函数函数打印的空格字符的宽度总是等于选用字体内以磅数为单位的所打印的空格字符的宽度总是等于选用字体内以磅数为单位的所打印的空格字符的宽度总是等于选用字体内以磅数为单位的所打印的空格字符的宽度总是等于选用字体内以磅数为单位的所有字符的平均宽度。有字符的平均宽度。有字符的平均宽度。有字符的平均宽度。例例3.6:用用用用PrintPrint方法输出数据到窗体上。输出结果如方法输出数据到窗体上。输出结果如方法输出数据到窗体上。输出结果如方法输出数据到窗体上。输出结果如下图所示。下图所示。下图所示。下图所示。例例 3.63.63.3.2 用消息框输出数据用消息框输出数据 在在在在WindowsWindows中,如果操作有误,通常会在屏幕上显示中,如果操作有误,通常会在屏幕上显示中,如果操作有误,通常会在屏幕上显示中,如果操作有误,通常会在屏幕上显示一个对话框,提示用户进行选择,然后系统根据选择确定其一个对话框,提示用户进行选择,然后系统根据选择确定其一个对话框,提示用户进行选择,然后系统根据选择确定其一个对话框,提示用户进行选择,然后系统根据选择确定其后的操作。后的操作。后的操作。后的操作。VBVB提供的提供的提供的提供的MsgBoxMsgBox函数就可以实现此功能,它函数就可以实现此功能,它函数就可以实现此功能,它函数就可以实现此功能,它可以向用户传送信息,并可以接收用户在对话框上的选择,可以向用户传送信息,并可以接收用户在对话框上的选择,可以向用户传送信息,并可以接收用户在对话框上的选择,可以向用户传送信息,并可以接收用户在对话框上的选择,以此作为程序继续执行的依据。以此作为程序继续执行的依据。以此作为程序继续执行的依据。以此作为程序继续执行的依据。函数格式为:函数格式为:函数格式为:函数格式为:=MsgBoxMsgBox(,)功能:用对话框形式为用户提供信息并要求用户单击其中一功能:用对话框形式为用户提供信息并要求用户单击其中一功能:用对话框形式为用户提供信息并要求用户单击其中一功能:用对话框形式为用户提供信息并要求用户单击其中一个按钮作答,用户单击了哪个按钮,由函数返回代表该按钮个按钮作答,用户单击了哪个按钮,由函数返回代表该按钮个按钮作答,用户单击了哪个按钮,由函数返回代表该按钮个按钮作答,用户单击了哪个按钮,由函数返回代表该按钮类型的整数值。类型的整数值。类型的整数值。类型的整数值。3.3.2 用消息框输出数据用消息框输出数据【说明说明说明说明】1 1、为运行时在对话框中显示的为用户提供的文本为运行时在对话框中显示的为用户提供的文本为运行时在对话框中显示的为用户提供的文本为运行时在对话框中显示的为用户提供的文本信息。本项为字符串,必须设定,无提示时,可设定为空值;信息。本项为字符串,必须设定,无提示时,可设定为空值;信息。本项为字符串,必须设定,无提示时,可设定为空值;信息。本项为字符串,必须设定,无提示时,可设定为空值;2 2、为运行时出现在对话框中的标题,如不设定,为运行时出现在对话框中的标题,如不设定,为运行时出现在对话框中的标题,如不设定,为运行时出现在对话框中的标题,如不设定,则为该工程的名字;则为该工程的名字;则为该工程的名字;则为该工程的名字;3 3、为运行时出现在对话框中的按钮类型组合,为运行时出现在对话框中的按钮类型组合,为运行时出现在对话框中的按钮类型组合,为运行时出现在对话框中的按钮类型组合,如不设定,则只出现如不设定,则只出现如不设定,则只出现如不设定,则只出现“确定确定确定确定”按钮;按钮;按钮;按钮;4 4、如果省略了某些参数,相应的逗号分隔符不能省略;、如果省略了某些参数,相应的逗号分隔符不能省略;、如果省略了某些参数,相应的逗号分隔符不能省略;、如果省略了某些参数,相应的逗号分隔符不能省略;5 5、当、当、当、当MsgBoxMsgBox函数被执行时,出现的对话框中按钮类型个数、函数被执行时,出现的对话框中按钮类型个数、函数被执行时,出现的对话框中按钮类型个数、函数被执行时,出现的对话框中按钮类型个数、类型由类型由类型由类型由 的整数值确定,具体设置值见的整数值确定,具体设置值见的整数值确定,具体设置值见的整数值确定,具体设置值见表表表表3-43-4,函,函,函,函数返回的值代表该类型按钮,具体返回值见数返回的值代表该类型按钮,具体返回值见数返回的值代表该类型按钮,具体返回值见数返回的值代表该类型按钮,具体返回值见表表表表3-53-5;3.3.2 用消息框输出数据用消息框输出数据例如:例如:例如:例如:Dim Dim s,xs,x As Integer As Integers=s=数据输入错误!数据输入错误!数据输入错误!数据输入错误!&vbCrLfvbCrLf&结束程序运行结束程序运行结束程序运行结束程序运行,按终止按终止按终止按终止,s=s&s=s&vbCrLfvbCrLf&重新输入重新输入重新输入重新输入,按重试按重试按重试按重试,&,&vbCrLfvbCrLf&放弃放弃放弃放弃,按忽略按忽略按忽略按忽略 x=x=MsgBox(s,vbAbortRetryIgnoreMsgBox(s,vbAbortRetryIgnore,信息框例子信息框例子信息框例子信息框例子)依次执行上面的语句后,显示的信息对话框如下图所示。当依次执行上面的语句后,显示的信息对话框如下图所示。当依次执行上面的语句后,显示的信息对话框如下图所示。当依次执行上面的语句后,显示的信息对话框如下图所示。当用户按用户按用户按用户按“终止终止终止终止”、“重试重试重试重试”、“忽略忽略忽略忽略”按钮时其值分别为按钮时其值分别为按钮时其值分别为按钮时其值分别为3 3,4 4,5 5并赋并赋并赋并赋值给值给值给值给x x。3.3.3 用文本框输出数据用文本框输出数据 前面介绍了如何用文本框输入数据,实际上,也前面介绍了如何用文本框输入数据,实际上,也前面介绍了如何用文本框输入数据,实际上,也前面介绍了如何用文本框输入数据,实际上,也