表34常用日期和时间格式字符串及其含义 符号 作用 符号 作用 d显示日期(1-31),个位前不加0 d显示日期(123),个位前加0 dd显示星期缩写〔Su-Sat) ddd 显示星期全名〔 Sunday saturday) d显示完整日期( yy/mm/do dddd 显示完整长日期y年m月d日) W星期为数字(1-7,1是星期日) 年中的星期数(1-~53) 显示月份〔1-12),个位前不加0 显示月份〔01-12),个位前加0 mm显示月份缩写〔 Jan-Dec 显示月份全名〔 January December y 显示一年中的天〔1366 y 两位数显示年份〔00~99 yy四位数显示年份〔0100999 9 季度数〔1-4) h 显示小时〔0-23),个位前不加0 显示小时〔00~23),个位前加0 在h后显示分〔059),个位前不加0 在h后显示分〔059),个位前加0 显示秒〔059),个位前不加0 显示秒〔009),个位前加0 tt显示完整时间〔小时、分和秒),默认格式为: AMPM12小时的时钟,中午前AM或am,中午 hh: mm: ss Ammn后理M或pm AP,0p12小时的时钟,中午前A或a,中午后P或p
表3-5·常用字符串格式字符串及其含义 符号 作用 字符串表达式 格式字符串 显示结果 强迫以小写显示 HELLO >|强迫以大写显示 hello HELLO @实际字符位数小于符号位数,字符前加空格 ABCDEF @@@@@@@"口囗 ABCDEF &实际字符位数小于符号位数,字符不前加空格| ABCDEF &是是是是是&” ABCDEF Dim MyTime, MyDate, MyStr MyTime=#17:04:23# MyDate=#January 27, 1993# MyStr= Formate( MyTime,"h:m:s")返回"174:23" MyStr= Format(MyTime, "hh: mm: Ss AMPM")'iE F05: 04: 23 PM MyStr= Format( MyDate,"ddd, mmm d yyyy")’返回" Wednesday.,an271993 用户自定义的格式 MyStr= Format(5459.4,"#,##0.00")’返回"5,45940 MyStr= Forma(334.9,"###0.00")返回"334.90 MyStr= Format(,0.00%0) 返回"50000%" MyStr= Format(" HELLO","<")'返回" hello MyStr= Format("This is it",">")iRF"THIS IS IT
举例: Dim MyTime, MyDate, MyStr MyTime = #17:04:23# MyDate = #January 27, 1993# 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(5459.4, "# #,# #0.00") ' 返回 "5,459.40" MyStr = Format(334.9, "# # #0.00") ' 返回 "334.90" MyStr = Format(5, "0.00%") ' 返回 "500.00%" MyStr = Format("HELLO", "<") ' 返回 "hello" MyStr = Format("This is it", ">") ' 返回 "THIS IS IT" 例
3.15打印机输出 1.打印机对象 VB6提供的打印机对象( Printer)允许用户使用安装在 Windows中的打印机。使用打印机对象的 Print方法可以把以往 输出到屏幕的内容输出到打印机。 (1)打印机对象的常用属性 Fontcount:打印机可用的字体总数。 FontName:字体名称。其值是字符串表达式,如:"宋体"。 Fontsize:字体大小。其值是数值表达式,用磅为单位 PrintQuality:打印质量。设置或返回打印机的分辨率,是整 型数(-1~-4对应分辨率从低到高)。如设置草稿质量: Printer Printoualit
3.1.5 打印机输出 1. 打印机对象 VB6 提 供 的 打印 机 对象 （ Printer ） 允 许用 户 使用 安 装 在 Windows中的打印机。使用打印机对象的Print方法可以把以往 输出到屏幕的内容输出到打印机。 （1）打印机对象的常用属性 FontCount：打印机可用的字体总数。 FontName：字体名称。其值是字符串表达式，如："宋体" 。 FontSize：字体大小。其值是数值表达式，用磅为单位。 PrintQuality：打印质量。设置或返回打印机的分辨率，是整 型数（-1～-4对应分辨率从低到高）。如设置草稿质量： Printer.PrintQuality＝-1
(2)打印机对象的常用方法 Print:打印。向打印机输出文本或数据 Pset、Line、 Circle:分别为画点、画线、画园。 Paint Picture:打印图形 EndDoc:文档结束。 NewPage:用以结束 Printer对象中的当前页并前进到下一页。 KillDoc:删除文档。立即终止当前的打印。 (3)语句示例: Printer print"ⅤB编程": Printer NewPage Pi=3. 1415926: Printer Print"Pi=l P Printer enddoc
（2）打印机对象的常用方法 Print：打印。向打印机输出文本或数据。 Pset、Line、Circle：分别为画点、画线、画园。 PaintPicture：打印图形。 EndDoc：文档结束。 NewPage：用以结束Printer对象中的当前页并前进到下一页。 KillDoc：删除文档。立即终止当前的打印。 （3）语句示例： Printer.Print "VB编程" ：Printer.NewPage Pi＝3.1415926：Printer.Print "Pi=";Pi Printer.EndDoc
2.打印ⅤB代码 在工程窗口内选择要打卬哪个窗体或模块中的代码,接着 打开“文件”菜单中的“打印”命令,出现如图3-5所示的 “打印”对话框。在“范围”栏内选择“当前模块”;在 “打印内容”栏内选择“代码” 打印-工程1 打印机: hp deskjet3320 serles 确定 范围 打印内容 C选定) 厂窗体图像) 当前模块0M V代码c C当前工程 厂窗体为文本〔r 置( 打印质量q):高 厂打印到文件 帮助Q 图3-5打印对话框 3打印ⅤB窗体 方法一、在图3-5对话框选择“窗体图像”即可。 方法二、使用窗体的 Printform方法,其语法为: 窗体名.] PrintForm
2. 打印VB代码 在工程窗口内选择要打印哪个窗体或模块中的代码，接着 打开“文件”菜单中的“打印”命令，出现如图3-5所示的 “打印”对话框。在“范围”栏内选择“当前模块”；在 “打印内容”栏内选择“代码” 。 图3-5 打印对话框 3. 打印VB窗体 方法一、在图3-5对话框选择“窗体图像”即可。 方法二、 使用窗体的PrintForm方法，其语法为： [窗体名.] PrintForm