谁能给我解释下下面代码中format 函数的意思?!

来源:百度知道 编辑:UC知道 时间:2024/05/29 14:20:18
Private Sub Form_Click() Dim i, j As Integer For i = 1 To 4 Print Tab(20 - 2 * i); For j = 1 To 2 * i - 1 Print Format(j, "!@@"); Next j Print Next i End Sub程序运行后的结果是
?v=1

Format 函数 返回字符串,其中含有一个表达式,它是根据格式表达式中的指令来格式化的。

Format函数用户自定义字符串格式
可以用下面任意字符来创建格式表达式用于字符串: @ : 字符占位符。显示字符或是空白。如果字符串在格式字符串中 @的位置有字符存在,那么就显示出来;否则,就在那个位置上显示空白。除非有惊叹号字符 (!) 在格式字符串中,否则字符占位符将由右而左被填充。 & : 字符占位符。显示字符或什么都不显示。如果字符串在格式字符串中和号 (&) 的位置有字符存在,那么就显示出来;否则,就什么都不显示。除非有惊叹号字符 (!) 在格式字符串中,否则字符占位符将由右而左被填充。 < : 强制小写。将所有字符以小写格式显示。 > : 强制大写。将所有字符以大写格式显示。 ! : 强制由左而右填充字符占位符。缺省值是由右而左填充字符占位符。

' 以系统设置的长时间格式返回当前系统时间。
MyStr = Format(Time, "Long Time")
' 以系统设置的长日期格式返回当前系统日期。
MyStr = Format(Date, "Long Date")
MyStr = Format(MyTime, "h:m:s") ' 返回 "17:4:23"。
MyStr = Format(MyTime, "hh:mm:ss AMPM") ' 返回 "05:04:23 PM"。
MyStr = Format(MyDate, "dddd, mmm d yyyy") ' 返回 "Wednesday, Jan 27 1993"。
' 如果没有指定格式,则返回字符串。
MyStr = Format(23) ' 返回 "23"。

' 用户自定义的格式。
MyStr = Format(5459.4, "##,##0。00&qu