第3章顺序结构程序设计

《第3章顺序结构程序设计》由会员上传分享，免费在线阅读，更多相关内容在工程资料-天天文库。

1、第3章顺序结构程序设计计算机处理任何问题的过程都可以抽象为如图3-1的流程:3.1数据输出的基本方法3.1.1用Print方法输出数据1)使用Print方法的基本规则［格式］［对象名.［Print［表达式列表］［功能］Print方法用于在窗体、图片框和打印机上显示或打印输出文本。说明：①对象名可以是窗体(Form)＞图片框(PictureBox)或打印机(Printer)的名称。如果省略对象名，则在当前窗体上直接输出。例如：运行下面程序时,单击窗体则在窗体输出“VisualBasic程序设计”。PrivateSubForm_Click()'在窗体上输出Print"VisualBas

2、ic程岸设计”EndSub②关键字Print可以用“？”代替,VisualBasic会自动翻译为Print□③表达式列表可以是一个或多个表达式，如果省略，则输出一个空行。输出数值数据时，前面有一个符号位，后面有一个空格，输出字符串数据时前后都没有空格。例如:PrivateSubForm_Click()'输出数值数据'输出字符串数据'输出空行'输出表达式的值Print123Print"VisualBasic"PrintPrint123*2EndSub④当输出多个表达式时，各表达式之间用分号“;”或逗号“，”分隔。；55分隔符：各输出项按紧凑格式输出，即后一数据项紧跟前一数据项输出；"

3、,55分隔符：各输出项按分区格式输出，此时系统会将一个输出行分为若干个区段，每个区段有14个字符宽，逗号之后的数据项将在当前输出位置的下一个区段输出。例如：PrivateSubForm_Click()Printa,b,2+a,Print2*bPrint"a=";Printa,Hb=H;bDimaAsInteger,bAsIntegera=4:b=8'以逗号作分隔符并以逗号结尾'以分号结尾'以逗号、分号作分隔符EndSub②若在Print语句行末尾没有分隔符，则输出当前输出项后自动换行。若Print语句以分号或逗号结束，则输出当前输出项后不换行，下一个Print输出的内容将按紧凑格式

4、输出(以分号结尾)或输出在下一个输出区段上(以逗号结尾)。2)在Print方法中使用格式控制函数VisualBasic还提供了两个与Print配合的函数Tab()和Spc(),使数据项按指定的位置输出。①Spc()函数［格式］Spc(n)［功能］作为Print方法中的输出项，输出n个空格。Spc()函数与输出的数据项之间用分号分隔。例如：PrivateSubForm_Activate()PrintPrintSpc(4);”欢迎学习”;Spc(4);"Visual'*;Spc(2);"Basic"EndSub®Tab()函数Tab(n);［功能］作为Print方法屮的输出项，确定当前

5、行的输出位置(字符的列数)，即整数n指定的列数。例如:PrivateSubForm_Activate()PrintPrintTab(6);n欢迎学习蔦Tab(16);HVisualH;Tab(23);HBasicHEndSub③使用位置属性CurrentX和CurrentYo例3-1在窗体中间输出一串文字。运行程序，结果如图3-5所示。图3-5在窗体中间输出文本'设置输出字体的大小'定义并初始化输出字符串的变量'获取输出字符串的宽'获取输出字符串的高“设置输出的水平位置'设置输出的垂直位置PrivateSubForm_Activate()Me.FontSize=30a="Visua

6、lBasic"w=Me.TextWidth(a)h=Me.TextHeight(a)Me.CurrentX=(Me.ScaleWidth-w)/2Me.CurrentY=(Me.ScaleHeight-h)/2PrintaEndSub3.1.2用消息对话框输出信息［格式］变量=MsgBox（提示［，按钮［,对话框标题］］）［］表示可选项。⑴“提示”是一个字符串，指定对话框中显示的字符串。可以用回车符（Chr（13））、换行符（Chr（10））使显示的文本换行（或使用回车换行的符号常量vbCrLf）,"omm的最大长度大约为1024个字符。⑵“对话框标题”是一个字符串，指定对话框的标

7、题。⑶“按钮”是一个数值表达式:按钮值+图标值+缺省按钮值+等模式值。如果省略此参数，默认为0。参数类型参数值符号常量含义按钮值0vbOKOnly显示"确定"按钮1vbOKCancel显示“确定”和“取消”按钮2vbAbortRetryIgnore显示“终止”、"重试”和“忽略”按钮3vbYesNoCancel显示"是"、"否"和"取消”按钮4vbYesNo显示'是”和“否”按钮5vbRetryCancel显示“重试”和“取消”按钮图标值16vbCritical显示停