文档介绍：第四章顺序结构程序设计
本章主要内容
赋值语句
注释、暂停与程序结束
数据输入
数据输出
字体和字形
打印机输出
赋值语句
格式:目标操作符=源操作符
功能:把源操作符的值赋给变量Data
其中:
源操作符为:变量、表达式、常量及带有属性的对象
目标操作符为:变量和带有属性的对象
=:赋值号
例: Data=15
=Str(Data)
x=x+2
说明:
1、赋值语句兼有计算和赋值双重功能。
2、“=”是赋值号,与数学上的等号意义不同。
3、“目标操作符”和“源操作符”的数据类型通常要求一致,但Basic提供的对某些数据类型的自动转换机制,可强制变量转换为适当的数据类型。见P75
4、VB通常按“一行一句,一句一行”的规则书写,但允许多个语句放在同一行,用“:”隔开。
如: a=3:b=4:c=5
注释、暂停与程序结束
注释语句
格式:‘注释内容/ Rem 注释内容
说明:
1、注释语句是非执行语句。
2、任何字符均可放在注释语句中作为注释内容。
示例:
‘ This is a test statement
Rem 计算圆的周长
a=3:b=4:c=5 ‘a,b,c为三角形的边
暂停语句
格式:Stop
说明:
1、可放置在过程中的任何地方,相当于在程序代码中设置断点,类似于执行“运行”菜单中的“中断”命令。
2、执行Stop语句时,系统将自动打开“立即窗口”,方便程序员调试跟踪程序。
3、程序调试结束后,生成可执行文件之前,应删除代码中的所有Stop语句。
结束语句
格式:End
功能:通常用来结束一个程序的执行。
在不同环境下的其他用途:
End Sub:结束一个Sub过程
End Function:结束一个Function过程
End If:结束一个If语句块
End Type:结束记录类型的定义
End Select:结束情况语句
数据输入
InputBox函数
格式:Inputbox[$](prompt[,title][,default]
[,xpos,ypos][,helpfile,context])
参数说明:
1、prompt 提示字符串,不超过1024个字符。
2、title 显示对话框标题栏中的字符串表达式
3、default 显示文本框中的字符串表达式,在没有其
它输入时作为缺省值,若省略 default,则文本框为空。
4、xpos 指定对话框的左边与屏幕左边的水平距离
5、 ypos 指定对话框的上边与屏幕上边的距离
6、helpfile 字符串表达式,识别帮助文件,用该文件为对话框提供上下文相关的帮助。
7、context 数值表达式,由帮助文件的作者指定给某个帮助主题的帮助上下文编号。
标题
提示
字符串
例4-1 设计一个程序,由用户输入一个华氏温度F,程序可将其转换为摄氏温度C。转换公式为C=(9/5)(F-32)
Private mand1_Click()
Dim F, C As Long
F = Val(InputBox("请输入华氏温度", "例4-1"))
C = 5 / 9 * (F - 32)
= F
= C
End Sub
Private mand2_Click()
End
End Sub
到VB环境下运行