第3章 顺序结构

《第3章 顺序结构》由会员上传分享，免费在线阅读，更多相关内容在应用文档-天天文库。

第3章顺序结构本章内容：数据输入数据输出标签文本框命令按钮程序举例1 3.1数据输入VB程序的执行则采用事件驱动机制，由用户或者系统触发某个事件去执行相应的事件过程。尽管事件处理过程之间并无特定的执行顺序，但是每个事件过程的内部却依然包含着顺序、选择和循环三种基本控制结构。顺序结构是结构化程序设计中最基本的控制结构之一，其语句按照书写的顺序依次逐条执行。2《VisualBasic程序设计简明教程》 3.1数据输入——InputBox函数调用InputBox函数时，系统将弹出一个输入对话框。InputBox函数的格式：InputBox(Prompt[,Title][,Default][,…])说明：（1）InputBox函数返回一个字符串，该字符串就是用户在对话框中输入的数据。（2）参数Prompt是必选项，它是一个字符串，用于提示用户当前应输入哪些数据。（3）Title和Default这两个参数均为可选项，前者作为对话框的标题，后者作为对话框的默认输入内容。（4）如果位于参数列表中间的可选项参数被省略，则必须用逗号标示这些被省略的参数。3《VisualBasic程序设计简明教程》 举例：DimnameAsString,scoreAsIntegername=InputBox(“请输入学生的姓名”,“姓名输入”)’省略了默认值score=Val(InputBox("请输入学生的成绩",,80))’省略了标题4《VisualBasic程序设计简明教程》 3.1数据输入——文本框控件用户可以在文本框控件中输入数据，然后在程序中通过赋值语句把它赋给某个变量。一般形式：变量=文本框对象.text举例：DimnameAsString,scoreAsIntegername=Text1.text’输入学生的姓名score=Val(Text2.text))’输入学生的成绩返回5《VisualBasic程序设计简明教程》 3.2数据输出——标签控件一般形式：标签对象.caption=表达式Label1.caption=name’输出学生的姓名Label2.caption=Str(score)’输出学生的成绩。3.2数据输出——文本框控件一般形式：文本框对象.text=表达式Text1.text=name’输出学生的姓名Text2.text=Str(score)’输出学生的成绩文本框控件既可以用于输入数据，也可以用于输出数据，这取决于控件对象是作为赋值运算符的左操作数还是右操作数。6《VisualBasic程序设计简明教程》 3.2数据输出——MsgBox函数l调用MsgBox函数时，系统将弹出一个消息对话框，该对话框能够显示一些提示性的信息，并接收用户做出的选择。MsgBox函数的格式：MsgBox(Prompt[,Buttons][,Title][,…])7《VisualBasic程序设计简明教程》 说明：（1）参数Prompt是必选项，它是一个字符串，可以作为输出的数据。（2）参数Buttons和参数Title均为可选项，前者是一个整型表达式，确定了消息对话框的类型；后者作为对话框的标题。Buttons的默认值是vbOKOnly，实际设置时可以由4个分组值相加而成。例如弹出一个采用应用模式的消息对话框，显示“终止”、“重试”和“忽略”按钮，图标为严重错误信息，默认是第一个按钮，Buttons的值可以写为2+16+0+0，也可以直接写为18。（3）MsgBox函数返回一个整数，该整数代表用户在对话框中选中的按钮。如果在函数调用时只给出第一个参数（Prompt）的值，就不必使用赋值语句；如果明确给出了其它参数的值，则必须用赋值语句把函数的返回值予以保存。8《VisualBasic程序设计简明教程》 举例：DimnameAsString,scoreAsIntegername="宋开莉"score=80MsgBox("学生姓名："&name&vbCr&"学生成绩："&score)9《VisualBasic程序设计简明教程》 3.2数据输出——Print方法Print的功能是在对象上输出信息，其中对象可以是窗体、图片框、立即窗口和打印机。Print方法的格式：[对象.]Print[表达式列表][;|,]10《VisualBasic程序设计简明教程》 说明：（1）调用Print方法时如果未给出对象名，则默认对象是窗体。（2）表达式列表是可选项，如果省略则输出一个空行。Print输出信息之后通常将会自动换行，如果语句末尾有分号（;）或者逗号（,），则表示不换行。（3）表达式列表中可以有多个表达式，表达式之间用空格、分号或者逗号分隔，其中空格和分号的效果相同。如果是数值表达式，就输出它的值；如果是字符串，则原样输出。（4）如果用分号（;）分隔表达式，按照紧凑格式输出数据；如果用逗号（,）分隔表达式，按照标准格式输出数据，此时当前数据项在下一个输出区中显示。11《VisualBasic程序设计简明教程》 举例：DimnameAsString,scoreAsIntegername="宋开莉"score=80Print"学生姓名：";’不换行PrintnamePrint"学生成绩：";score12《VisualBasic程序设计简明教程》 相关函数：1．Spc函数Spc函数的功能是在当前输出位置插入指定数量的空格，其格式是：Spc(n)2．Tab函数Tab函数的功能是将当前输出位置定位至指定的地方，其格式是：Tab(n)DimnameAsString,scoreAsIntegername="宋开莉"score=80Print"学生姓名：";PrintSpc(5);namePrint"学生成绩：";Tab(15);score13《VisualBasic程序设计简明教程》 相关函数：3.Format函数Format函数一般用于Print方法中，可以使得数值、字符串或者日期按指定的格式输出。Format函数的格式：Format(表达式[,格式字符串])PrintFormat(3.14159,"00.000")’输出结果为03.142PrintFormat(3.14159,"##.###E+##")’输出结果为31.416E-1返回14《VisualBasic程序设计简明教程》 3.3标签标签（Label）控件能够显示一些用户无法直接更改的文本信息，它通常作为一种辅助性的控件，用来标注那些自身不具备Caption属性的控件。在工具箱中表示为：标签的常用属性属性作用Name设置标签的对象名Caption设置标签所显示的文本信息Alignment设置标签上文本的对齐方式BackStyle确定标签的背景是否透明，默认值是1，表示不透明BorderStyle设置标签的边框类型，默认值是0，表示无边框AutoSize确定是否根据标签上文本的长度自动调整标签自身的尺寸，默认值是FalseWordWrap确定是否根据标签上文本的长度自动换行，默认值是False15《VisualBasic程序设计简明教程》 说明：（1）程序第一个标签控件的默认对象名是Label1，依次类推。（2）Caption是标签控件最重要的属性之一，其属性值是一个字符串，即显示的文本，最多允许有1024个字符。返回16《VisualBasic程序设计简明教程》 3.4文本框文本框（TextBox）控件是一种常用的标准控件，兼备数据输入和输出的功能，还提供了插入、选择以及复制等文本编辑手段。在工具箱中表示为：文本框的常用属性属性作用Name设置文本框的对象名Text设置文本框所显示的文本信息MaxLength设置文本框所显示的文本信息的最大长度，默认值是0，表示长度不受限制MultiLine确定文本框能否输入多行文本，默认值是False，表示只允许输入单行文本ScrollBars确定文本框能否有滚动条PasswordChar设置密码符号，默认值是空串SelText确定当前所选的文本SelStart确定所选文本的开始位置，如果未选中文本，则为插入点的位置SelLength确定所选文本的长度17《VisualBasic程序设计简明教程》 说明：（1）程序第一个文本框控件的默认对象名是Text1，依次类推。（2）Text是文本框控件最重要的属性之一，其属性值是一个字符串，即显示的文本。只允许输入单行文本时，最多可以有2048个字符；如果允许输入多行文本，则最多可以有32K个字符。18《VisualBasic程序设计简明教程》 文本框的常用事件：事件来源Change文本框的Text属性值发生改变GotFocus文本框获得焦点LostFocus文本框失去焦点KeyPress用户按下并且释放键盘上的一个键19《VisualBasic程序设计简明教程》 说明：（1）当用户在文本框中输入新内容，或者程序运行时修改了Text属性值，都会自动触发Change事件。（2）只有对象的Enabled和Visible的属性值是True时，它才有获得焦点的能力。在程序运行时，用户可以通过鼠标单击或者按Tab键切换，使某个控件获得焦点。（3）当用户按下并且释放键盘上的一个键，将会触发焦点所在控件的KeyPress事件。该事件返回所输入字符的Unicode码，在程序中加以判断，就会识别出用户刚才按下了哪个键。20《VisualBasic程序设计简明教程》 例3.1：在文本框中输入密码，然后单击窗体，在标签中显示该密码。完成步骤：新建一个工程，在窗体上分别创建2个标签、1个文本框和1个命令按钮。在属性窗口中对窗体和控件的属性进行设置。文本框的PasswordChar属性值设置为“*”，表示输入的字符都显示为“*”；标签Label2的BorderStyle属性值设置为1，表示该标签有边框。21《VisualBasic程序设计简明教程》 PrivateSubForm_Click()Label2.Caption="您输入的密码是："+Text1.TextEndSubPrivateSubCommand1_Click()EndEndSub代码及实现结果：返回22《VisualBasic程序设计简明教程》 3.5命令按钮命令按钮（CommandButton）控件通常用来接受用户的操作命令，一般通过单击命令按钮来触发事件过程，执行指定的操作，从而实现特定的功能。在工具箱中表示为：命令按钮的常用属性属性作用Name设置命令按钮的对象名Caption设置命令按钮的标题Default确定命令按钮是否为Enter键的默认按钮Cancel确定命令按钮是否为Esc键的默认按钮Enabled确定命令按钮是否有效，默认值是True，表示有效Visible确定命令按钮是否可见，默认值是True，表示可见Style设置命令按钮的外观，默认值是0，表示只能显示文字Picture设置命令按钮上显示的图片文件23《VisualBasic程序设计简明教程》 说明：（1）程序第一个命令按钮控件的默认对象名是Command1，依次类推。（2）设置Caption属性时，在标题的某个字母前插入一个连接符（&），即可为命令按钮设置快捷键。（3）当某个命令按钮的Default属性值为True时，按下Enter键就相当于用鼠标单击了该按钮；当某个命令按钮的Cancel属性值为True时，按下Esc键就相当于用鼠标单击了该按钮。（4）当某个命令按钮的Enabled属性值是False时，它就会失效并呈灰色，此时既不能接受用户的操作命令，也不能响应事件。当某个命令按钮的Visible属性值是False时，它在程序运行时将不会显示在窗体中。（5）当Style属性值是1时，表示在命令按钮上可以显示图形。此时即可在Picture属性中选择图片文件，程序运行时该命令按钮就会成为图形按钮。返回24《VisualBasic程序设计简明教程》 3.6程序举例——例3.2：输入3位学生的成绩，求其平均值。新建一个工程，在窗体上分别创建1个标签、1个文本框和2个命令按钮，并设置属性值。代码：PrivateSubCommand1_Click()Dimnum1AsInteger,num2AsInteger,num3AsInteger,averAsSinglenum1=Val(InputBox("请输入第1位学生的成绩"))num2=Val(InputBox("请输入第2位学生的成绩"))num3=Val(InputBox("请输入第3位学生的成绩"))aver=(num1+num2+num3)/3Text1.Text=averEndSubPrivateSubCommand2_Click()EndEndSub25《VisualBasic程序设计简明教程》 例3.4：1、交换两个整型变量的值。2、在窗体上分别创建3个标签、2个文本框和3个命令按钮，并设置属性值。PrivateSubCommand1_Click()Dima%,b%,tAsIntegera=Val(Text1.Text)b=Val(Text2.Text)t=aa=bb=tLabel3.Caption="交换后"Text1.Text=aText2.Text=bEndSubPrivateSubCommand2_Click()Label3.Caption="交换前"Text1.Text=""Text2.Text=""EndSubPrivateSubCommand3_Click()EndEndSub返回26《VisualBasic程序设计简明教程》