第12课:格式化函数

<上一课> <<主页>> <下一课>

格式化输出屏幕是一个非常重要的编程部分,它使得数据可以清楚及更系统化地呈现于用户的屏幕上。在上一课中我们已经学习了如何使用逗号和一些内建函数来呈现数据。在这一课中,我们将学习如何利用Visual Basic中的格式化功能来更好地控制输出格式,。

三种最常见VB的格式函数是  Tab, Space, 与及 Format

12.1 Tab  函数

Tab 函数的形式是 Tab (n); x

Tab 显示x 离开输出屏幕左边框 n个空格的位置。 Tab 和 x 间必须有一个分号。

范例1

.Private Sub Form_Activate

         Print "我"; Tab(5); "要"; Tab(10); "学"; Tab(15); "习"; Tab(20); "Visual Basic"

         Print

Print Tab(10); "我"; Tab(15); "要"; Tab(20); "学"; Tab(25); "习"; Tab(30); "Visual Basic"

Print

         Print Tab(15); "我"; Tab(20); ; "要"; Tab(25); "学"; Tab(30); "习"; Tab(35); “Visual Basic"

End sub

范例1 的输出画面如下图12.1所示:  

图12.1

12.2 Space 函数

Space 函数跟 Tab 函数很相似.然而,它门之间有一个微小的差别. Tab (n) 是指该项目离开屏幕左边框 n个空格,Space(n) 则指定两个项目之间距离n 空格。

范例 2

Private Sub Form_Activate()

Print "Visual"; Space(10); "Basic"

End Sub

 

在范例2 中, Visual 和 Basic 的距离是十个空格。

12.3 Format 函数

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所示的输出:

 

图12.2

<上一课> <<主页>> <下一课>

版权所有©2008 Dr.Liew Voon Kiong。保留所有权利|联系我们: admin@vbtutor.net

[Privacy Policy]