VB三种程序结构VisualBasic语言作为结构化程序设计语言提供

? Round(3.89456,3) 结果:3.895 说明：☆ 在三角函数中，以弧度表示；sqr的自变量不能是负数
☆ Rnd函数返回小于1，大于等于0的单精度随机数。 VB用于产生随机数的公式取决于称为种子（seed）的初始值。 默认情况下，每次运行一个应用程序，VB提供一相同的种子， 即Rnd产生相同序列的随机数。为了每次运行时，产生不同序 列的随机数，可执行Randomize语句，格式如下： Randomize [number] 如果省略number，则用系统计时器返回的值作为新的种子 Rnd(x): x<=0:得到的相同的随机数结果。 大于 0:序列中的下一个。 省略:序列中的下一个随机数。 例子：int((b-a+1)*rnd)+a 要产生30～50之间的随机数 int(Rnd*21)+30
参数说明
•提示内容：显示给用户的信息。最长1024字符。 如果 内容超过一行，则可以在每一行之间用回 车符 Chr(13))、换行符 (Chr(10)) 或是回 车与换行符的组合 (Chr(13) & Chr(10)) 将 各行分隔开来。 •答复按钮+图标：确定在消息框中按钮 的数目和类型，以及图标的类型。 •标题：显示在消息框标题栏上的文本。
3.2.1 顺序结构
顺序结构程序中的语句依照其在程序中的位置依次 顺序地执行。 1、 赋值语句 格式： 变量名/对象.属性名 = 表达式 功能：将赋值号右边表达式的值赋给赋值号左边的 变量或对象属性。 举例： Form1.width = 300 Temp = 20
说明：
1、 当表达式为数值型且与变量的精度不相同时，强制 转换成左边变量的精度。例如： Dim A as integer A = 4.7 ˊA是整型变量，A中的结果是5。 2、 当表达式是数字字符串，左边变量是数值类型时，自 动转换成数值类型再赋值；但当表达式有非数字字符或 空串时，则出错。例如； n=“123” ‘n中的结果是123 ’n为整形 n=“1a23” ‘出现“类型不匹配”的错误 3、 当逻辑型赋值给数值型时，True转换为-1，False转 换为 0 ；反之，当数值型赋给逻辑型时，非 0 转换为 True ， 0转换为False.
2、MsgBox函数：向用户显示信息（输出
MsgBox语句: MsgBox （提示内容 [,答复按钮+图标][,标题]） MsgBox函数： Dim x As Integer X=MsgBox(提示内容 [,答复按钮+图标][,标题])
功能：打开一个消息框，等待用户选择一个按钮。MsgBox 函数返回所选按钮对应的整数值，其数值的意义见后表。 若不需要返回值，则作为MsgBox语句。
格式2： [对象.]Print[Spc(n)/Tab(n)][表达式表] Spc(n)函数：用于在输出时插入n个空 格。 Tab（n）函数：表示在第n 列显示。
3.2.2 常用内部函数
数学函数
内部函数
转换函数 字符串函数 日期函数
一 数学函数
函数名 含义 示例 结果
Abs(N) Exp(N) Log(N) Rnd[(N)] Sgn(N) Sqr(N) Sin(N) Cos(N) Tan(N) Round(x,n)
按 钮 数 目
VbCritical 图标 VbQuestion 类型 VbExclamation VbInformation VbDefaultButton1 默认 VbDefaultButton2 按钮 VbDefaultButton3 VbApplicationModale 模式 VbSystemModal
取绝对值 e为底的指数函数，即ex 以e为底的自然对数 产生随机数 符号函数(1,0,-1) 平方根 正弦函数 余弦函数 正切函数 四舍五入函数
Abs(-3.5) Exp(3) Log(10) Rnd Sgn(-3.5) Sqr(9) Sin(0) Cos(0) Tan(0)
3.5 20.086 2.3 0-1之间的数 -1 3 0 1 0
（1）句法
变量名=InputBox(提示[,标题][,默认值][横坐标， 纵坐标]) （2）参数说明 •提示：提示信息，类型是字符串。 •标题：是对话框窗口中的标题文本，类型是 字符串。 •默认值：在用户输入信息之前，输入框中显 示的内容，类型是字符串。
例：
• bb = MsgBox("Βιβλιοθήκη Baidu误，重输吗？", vbYesNo + vbDefaultButton2 + vbCritical, "确认重输对话框") • If bb = vbNo Then End
•MsgBox函数返回所选按钮整数值的意义
内部常数 vbOk vbCancel vbAbout vbRetry vbIgnore vbYes vbNo
返回值 1 2 3 4 5 6 7
被单击的按钮 确定 取消 终止 重试 忽略 是 否
3、InputBox函数：从用户处获取信 息（输入）
功能：打开一个对话框，等待用户键入 内容。当用户单击 " 确定 " 按钮或按回 车键时，函数返回输入的值，其值的 类型为字符串。
"按钮"设置值及意义
分组 内部常数 VbOkOnly VbOkCancel VbAboutRetryIgnore VbYesNoCancel VbYesNo VbRetryCancel 按钮值 0 1 2 3 4 5 16 32 48 64 0 256 512 0 4096 描 述 只显示确定按钮 显示"确定"、"取消"按钮 显示"终止"、"重试"、"忽略"按 钮 显示"是"、 "否" 、 "取消"按钮 显示"是"、 "否" 显示"重试"、 "取消"按钮 关键信息图标，红色STOP标志 询问信息图标 ？ 警告信息图标 ！ 信息图标 I 第1个按钮为默认 第2个按钮为默认 第3个按钮为默认 应用模式 系统模式
4、print语句
格式1：对象. Print [表达式] [{，|；}] 功能：显示数据。 对 象 可 以 是 窗 体 （ Form ） 、 图 形 框 (PictureBox) 或 打 印 机 （Printer）。如果省略了对象，则在窗体上输出。 说明：① 表达式：可选项。可以是一个或多个表达式。当有多个表达式 时，要用分隔符（逗号、分号）隔开。当表达式缺省时，则屏幕显 示一个空行。 ② 输出格式分为标准输出格式和紧凑输出格式。 标准输出格式：以14个字符宽度划分为一个区段，每个数据项占一个区 段的位置。（数据项之间用逗号隔开） 紧凑输出格式：对于数值型数据，前面有一个符号位，后面有一个空格； 对于每个字符串，各个数据项之间没有间隔。（各数据项之间用分 号或空格作为分隔符）