格式化输出屏幕是一个非常重要的编程部分,它使得数据可以清楚及更系统化地呈现于用户的屏幕上。在上一课中我们已经学习了如何使用逗号和一些内建函数来呈现数据。在这一课中,我们将学习如何利用Visual Basic中的格式化功能来更好地控制输出格式,ã€�
三种最常见VB的格式函数是 Tab, Space, 与及 Format
Tab 函数的形式是 Tab (n); x
Tab 显示x 离开输出屏幕左边æ¡� n个空格的位置ã€� Tab å’� x 间必须有一个分号ã€�
.Private Sub Form_Activate
Print "æˆ�"; Tab(5); "è¦�"; Tab(10); "å�"; Tab(15); "ä¹�"; Tab(20); "Visual Basic"
Print Tab(10); "æˆ�"; Tab(15); "è¦�"; Tab(20); "å�"; Tab(25); "ä¹�"; Tab(30); "Visual Basic"
Print Tab(15); "æˆ�"; Tab(20); ; "è¦�"; Tab(25); "å�"; Tab(30); "ä¹�"; Tab(35); “Visual Basic"
End sub
范例1 的输出画面如下图12.1所ç¤�:
Space 函数è·� Tab 函数很相ä¼�.然而,它门之间有一个微小的差别. Tab (n) 是指该项目离开屏幕左边æ¡� n个空格,Space(n) 则指定两个项目之间距离n 空格ã€�
Private Sub Form_Activate()
Print "Visual"; Space(10); "Basic"
End Sub
在范ä¾�2 中, Visual å’� Basic 的距离是十个空格ã€�
Format 函数拥有非常强大的格式化功能,它能以各种形式来显示数值。基本上它有两种类型的格式的功能,其中之一是内置的或预定义的格式,而另一个可以由用户定义ã€�
Format 函数的公式如ä¸�
Format (n, “style argumentâ€�)
其中ï¼�n是一个数字,“style argumentâ€�是表中所列的风格参数ã€�
|
Style argument |
说明 |
范例 |
|---|---|---|
|
General Number |
显示的数字无需以分隔符来显示千位数ã€� |
Format(8972.234, “General Numberâ€�)=8972.234 |
|
Fixed |
显示的数字无需以分隔符来显示千位数及四舍五入到两位小数点ã€� |
Format(8972.2, “Fixedâ€�)=8972.23 |
|
Standard |
显示的数字以分隔符来显示千位数及四舍五入到两位小数点ã€� |
Format(6648972.265, “Standardâ€�)= 6,648,972.27 |
|
Currency |
显示的数字有货币的符号以分隔符来显示千位数及四舍五入到两位小数点ã€� |
Format(6648972.265, “Currencyâ€�)= $6,648,972.27 |
|
Percent |
转换数的百分比的形式,显示一个%符号及四舍五入到两位小数点ã€� |
Format(0.56324, “Percentâ€�)=56.32 % |
范例3
Private Sub Form_Activate()
Print Format (8972.234, "General Number")
Print Format (8972.2, "Fixed")
Print Format (6648972.265, "Standard")
Print Format (6648972.265, "Currency")
Print Format (0.56324, "Percent")
End Sub
现在,运行程序,你会得到如图12.2所示的输出ï¼�
