输入／输出篇
出处：网络

左对齐或者右对齐输出字符

　　 使用Format$函数生成左对齐或者右对齐的字符输出效果：

　　 Format$(123, "@@@@@@") 结果是 " 123"

　　 Format$(123, "!@@@@@@") 结果是 "123 "

　　 数字输出格式化

　　 使用Format$(value,"0.00"）得到保留2位小数的输出结果，再联合使用“@@@@@”格式，就可以得到右对齐的数字。比如：

　　 Print Format$(Format$(123.45, "0.00"), "@@@@@@@@")

Print Format$(Format$(3.4, "0.00"), "@@@@@@@@")

Print Format$(Format$(12345.6, "0.00"), "@@@@@@@@")

　　 上面3条语句将生成如下的输出效果：

123.45

3.40

12345.60

　　 快速读写数组

　　 你可以使用Put和Get命令从文件中快速读写数组，使用这种方法要比一次读写数组的每一项快得多。

Dim arr(1 To 100000) As Long

Dim fnum As Integer

fnum = FreeFile

Open "C:Tempxxx.dat" For Binary As fnum

Put #fnum, , arr

Close fnum

[返回]

首页 | 设为首页 | 加入收藏 | 关于本站 | 友情链接 | 版权声明