VB中print方法的特点 请编程举例说明

Print 方法

在 Immediate 窗口中显示文本。

语法

object.Print [outputlist]

Print 方法的语法具有下列对象限定符和部分：

部分 描述
object 必需的。对象表达式，其值为“应用于”列表中的对象。
outputlist 可选的。要打印的表达式或表达式的列表。如果省略，则打印一空白行。

outputlist 参数具有以下语法和部分：

{Spc(n) | Tab(n)} expression charpos

部分 描述
Spc(n) 可选的。用来在输出中插入空白字符，这里，n 为要插入的空白字符数。
Tab(n) 可选的。用来将插入点定位在绝对列号上，这里，n 为列号。使用无参数的 Tab(n) 将插入点定位在下一个打印区的起始位置。
expression 可选。要打印的数值表达式或字符串表达式。
charpos 可选。指定下个字符的插入点。使用分号 (;) 直接将插入点定位在上一个被显示的字符之后。使用 Tab(n) 将插入点定位在绝对列号上。使用无参数的 Tab 将插入点定位在下一个打印区的起始位置。如果省略 charpos，则在下一行打印下一字符。

说明

可以用空白或分号来分隔多个表达式。

对系统指定的国别设置，用小数点分隔符将所有打印到 Immediate 视窗的数据正确格式化。关键字要用适用于主应用程序的语言输出。

对于 Boolean 数据，或者打印 True 或者打印 False。根据主机应用程序的地区设置来翻译 True 和 False 关键字。

使用系统能识别的标准短日期格式书写 Date 数据。当日期或时间部件丢失或为零时，只书写已提供的部件。

如果 outputlist 数据是 Empty，则无内容可写。但是，如果 outputlist 数据是 Null，则输出 Null。在输出 Null 关键字时，要把关键字正确翻译出来。

要把错误数据作为 Error errorcode 输出。在输出 Error 关键字时，要把关键字正确翻译出来。

如果在具有缺省显示空间的模块外使用此方法，则需要 object。例如，如果没有指定对象就在标准模块上调用此方法，则将导致错误发生，但是，如果在窗体模块上进行调用，则会在窗体上显示“outputlist”。

注意 因为 Print 方法是按照字符比例进行打印，所以字符数与字符所占据的宽度固定的列的数目无关。例如，像 “W” 这样的宽字母占据的宽度超过一固定列宽，而像 "i" 这样的窄字母占据的宽度则较小。考虑到要使用比平均字符更宽的空间，表列一定要留有足够余地。另外，也可以使用固定间距的字体（像 Courier 字体）来确保每一字符均只占一列。
区域识别函数

不同的区域在显示日期、时间、数字、货币和其它信息时有不同的惯例。但是，没有必要了解用户所在区域的所有惯例。这是因为在 Visual Basic 中的一些函数使用用户的系统区域运行时自动确定惯例，系统区域可以使用操作系统提供的控制面板来设置。这些函数被称为区域识别函数。

Print 方法
尽管 Print 方法为不同的输出格式提供了很少的灵活性，但它确实使用了用户的系统区域。在以下示例中，将用正确的短日期格式打印日期，将用正确的小数点打印数字，将用正确的符号打印货币。

MyDate = #11/24/1997#
MyNumber = 26.5
Money = 1636.32
MyMoney = Format(Money, "###,###.##")
Debug.Print MyDate, MyNumber, MyMoney

此代码运行在英语/美国的区域时，以下输出将出现在立即窗口中。

11/24/1997 26.5 1,636.32

此代码运行在德语/德国的区域时，以下输出将出现在立即窗口中。

24/11/1997 26,5 1.632,32

详细信息 请参阅《语言参考》的“Print 方法”。

Format 函数
Format 函数可以接受格式代码，但格式代码总是产生相同的输出而不考虑用户的区域。例如，格式代码“mm-dd-yy”对于比利时的用户不适用，因为他们的日在月之前。

为了增加更多的灵活性，Format 函数还提供了命名格式可以在运行时自动决定使用何种转换，包括 General Date, Long Date, Short Date 和 Long Time。使用命名格式产生基于用户的系统区域的输出。命名格式甚至可以采用用户本国语言的输出，包括月名和星期名。如下例所示：

MyDate = #8/22/1997 5:22:20 PM#
NewDate1 = Format(MyDate, "Medium Date")
NewDate2 = Format(MyDate, "Short Date")
NewDate3 = Format(MyDate, "Long Date")
NewDate4 = Format(MyDate, "General Date")
Debug.Print NewDate1, NewDate2, NewDate3, NewDate4

代码运行在英语/美国区域时，下列输出显示在立即窗口中：

22-Aug-97 8/22/97 Monday, August 22, 1997 8/22/97 5:22:20 PM

代码运行在法语/法国区域时，下列输出显示在立即窗口中：

22-ao鹴-97 22/08/97 lundi 22 ao鹴 1997 22/08/97 17:22:20f

详细信息 请参阅《语言参考》里的“Format 函数”。

语法
object.Print [outputlist]
Print 方法的语法具有下列对象限定符和部分：
部分 描述
object 必需的。对象表达式，其值为“应用于”列表中的对象。
outputlist 可选的。要打印的表达式或表达式的列表。如果省略，则打印一空白行。
outputlist 参数具有以下语法和部分：
{Spc(n) | Tab(n)} expression charpos
部分 描述
Spc(n) 可选的。用来在输出中插入空白字符，这里，n 为要插入的空白字符数。
Tab(n) 可选的。用来将插入点定位在绝对列号上，这里，n 为列号。使用无参数的 Tab(n) 将插入点定位在下一个打印区的起始位置。
expression 可选。要打印的数值表达式或字符串表达式。
charpos 可选。指定下个字符的插入点。使用分号 (;) 直接将插入点定位在上一个被显示的字符之后。使用 Tab(n) 将插入点定位在绝对列号上。使用无参数的 Tab 将插入点定位在下一个打印区的起始位置。如果省略 charpos，则在下一行打印下一字符。