第五章' c$ f) W. R/ R! h1 Q
一、数据输出---Print方法$ v0 ]" Y# }7 N+ @! [) Q1 j
(一)Print方法
* q0 F" r* F3 f: K& g2 V/ J Print方法可以在窗体上显示文本字符串和表达式的值,并可在其他图形对象或打印机上输出信息。其一般格式为:4 o6 F+ m/ ]: e/ `6 K. X; F4 D
[对象名称.]Print[表达式表][,|;]
7 l7 |' W: l& n% V/ Y& c Print方法的格式和功能与BASIC语言中的PRINT语句类似,它们都可以用来进行输出操作。* a3 w0 i/ o( q: v* ~8 A" S& V$ G
(二)与Print方法有关的函数
! @7 a2 K3 G N; |0 o 1.Tab函数
$ l- J8 v3 T Q5 G 格式:Tab(n)0 ^. r& C: q$ Q) m* M
2.Spc函数
' N: l1 p8 l3 \( `' m* x9 _# u 格式:Spc(n) S N6 ^( ?. u. @8 p5 u* R y: M9 B
3.空格函数8 l- p9 e/ G" b7 U B4 g J
格式:Space$(n)
/ _3 i, J0 y! F0 a9 G" U2 K (三)格式输出: L9 Q) ^ _2 i! Q1 n4 G( [6 d9 v% C
用格式输出函数Format$可以使数值或日期按指定的格式输出。一般格式为:, N" n3 k: T' @: `0 o J7 y
Format$(数值表达式,格式字符串)
! k3 n8 x: u% p3 c* n8 x( U6 ` 该函数的功能是:按“格式字符串”指定的格式输出“数值表达式”的值。如果省略“格式字符串”,则Format$函数的功能与Str$函数基本相同,惟一的差别是,当把正数转换成字符串时,Str$函数在字符串前面留有一个空格,而Format$函数则不留空格。& f6 W3 X8 V( N6 r: j
(四)其他方法和属性
I% u" [- \* s6 K: b 1.Cls方法
5 R5 d/ E; \; D6 R7 s# M 格式:[对象.]Cls8 t- B- W% Q5 P5 ?6 ~. I! g
2.Move方法
+ C4 x1 U: r0 J* | r/ I- ?* q 格式:[对象.]Move左边距离[,上边距离][,宽度[,高度]]]1 x; d2 {& E4 h
3.TextHeight和TextWidth方法
# |6 T' r# {7 g 格式:[对象.]TextHeight(字符串)[对象.]TextWidth(字符串)
; }9 m8 L4 h* A 二、数据输入-InputBox函数9 c4 q3 ~9 _4 I8 W, D
InputBox函数可产生一个对话框,这个对话框作为输入数据的界面,等待用户输入数据,并返回所输入的内容。其格式为:InputBox(prompt,[,title][,default][,xpos,ypos][,helpfile,context]该函数有7个参数$ K0 h6 |5 D1 E* N) U( `
三、MsgBox函数和MsgBox语句
& K7 Z& s# [8 H. q# H4 x. r' G (一)MsgBox函数
( `) B' W1 ] L& H1 | MsgBox函数的格式如下: R& O" \8 Z, H! H8 U3 O* o/ w( D
MsgBox(msg[,type][,title][,helpfile,context]该函数有5个参数" W8 j8 e4 ?9 M2 [# \6 I
(二)MsgBox语句
% p% W/ e2 l9 u MsgBox函数也可以写成语句形式,即:
. C0 z5 l. x) H# ?1 D/ V' t MsgBox Msg$[,type%][,title$][,helpfile,context]
8 I$ a- U( h& Y 各参数的含义及作用与MsgBox函数相同,由于MsgBox语句没有返回值,因而常用于较简单的信息显示。
. H. a) @1 I9 U2 q 四、字形- l1 |5 \5 Y( `; _9 v
(一)字体类型和大小
: Q6 Z% g- N: E& k 1.字体类型
3 l* {: ]/ i% z6 n+ Z4 h 字体类型通过FontName属性设置,一般格式为:[窗体.][控件.]|Printer.FontName[=″字体类型″]* t" C" X6 A3 S0 c0 s( x
2.字体大小# I' n Z( |8 g% `0 p) N
字体大小通过FontSize属性设置,一般格式为:FontSize[=点数]
, [7 s7 o' w6 r" `; w) P 这里的“点数”用来设定字体的大小。在默认情况下,系统使用最小的字体,“点数”为9。如果省略“=点数”,则返回当前字体的大小。4 O8 d- a, i; N# Y
(二)其他属性& I( r8 e6 g& Q: y
1.粗体字$ u* [$ ]' b! |8 s
粗体字由FontBold属性设置,一般格式为:FontBold[=Boolean] A/ C# a0 r; `, A+ u1 r
该属性可以取两个值,即True和False。当FontBold属性为True时,文本以粗体字输出,否则按正常字输出。默认为False。
. U# \8 R8 @+ ]' {% F! _( b 2.斜体字: I% p0 U6 F, T6 P+ A% w8 a
斜体字通过FontItalic属性设置,其格式为:FontItalic[=Boolean]3 `4 A' @) ?3 p2 ^1 o' }
当FontItalic属性被设置为True时,文本以斜体字输出。该属性的默认值为False
! T0 {, s& Y: e1 `* T9 v9 b0 H# {1 c 3.加删除线' Y5 e% B( U2 {
格式为:
* x0 q, K" p$ x/ y& l FontStrikethru[=Boolean], T# u0 T# L) j3 \; s3 I# p
如果把FontStrikethru属性设置为True,则在输出的文本中部画一条直线,直线的长度与文本的长度相同。该属性的默认值为False。9 v: l u/ U& D. {) H
4.加下划线
' ~2 u* {& z* W9 Y) z 下划线即底线,用FontUnderline属性可以给输出的文本加上底线。其格式为:FontUnderline[=Boolean]
9 [9 i2 q# U5 g6 ~) U) j 如果FontUnderline属性被设置为True,则可使输出的文本加下划线。该属性的默认值为False。在上面的各种属性中,可以省略方括号中的内容。在这种情况下,将输出属性的当前值或默认值。
" f: C. l. N$ h$ g 5.重叠显示
' H. s+ U. q/ A9 g% w# R+ D 当以图形或文本作为背景显示新的信息时,有时候需要保留原来的背景,使新显示的信息与背景重叠,这可以通过FontTransParent属性来实现,格式如下:FontTrnasParent[=Boolean]
8 G1 w+ R4 i6 Z" f 如果该属性被设置为True,则前景的图形或文本可以与背景重叠显示;如果被设置为False,则背景将被前景的图形或文本覆盖。
. J1 `" S3 ^( I 五、打印机输出
8 B* }' h, O4 B+ D$ s2 A- f. X (一)直接输出& I5 m B- J! D. ?+ Y6 x$ a
所谓直接输出,就是把信息直接送往打印机,所使用的仍是Print方法,只是把Print方法的对象改为Printer,其格式为rinter.Print[表达式表]
" t. _8 s0 q8 d+ Z$ N. f (二)窗体输出# @! p* t, C, y: _" q6 A3 v6 v
在Visual Basic中,还可以用PrintForm方法通过窗体来打印信息,其格式为:[窗体.]PrintForm |