MsgBox语句与MsgBox函数:



MsgBox "欢迎使用VB" & Chr$(13) + Chr$(10) & "祝您学习愉快、进步" 黑体表示换行符
换行符也可以使用:MsgBox "欢迎使用VB" & vbCrLf & "祝您学习愉快、进步" & vbCrLf &



用法: MsgBox "欢迎使用VB" & vbCrLf & "祝您学习愉快、进步" , 0 (列表中的值)
MsgBox "欢迎使用VB" & vbCrLf & "祝您学习愉快、进步" , 35 (列表中值3和32相加得到的)

MsgBox "欢迎使用VB" & vbCrLf & "祝您学习愉快、进步" , 35+768,这是个例子
这是个例子设置的是msgbox弹出对话框的标题名称。
Msgbox函数:

例:


打印机输出:




数据输出的Print方法:






格式输出:



例:
print format$(0012,#) 则输出12
print format$(12,"0000") 则输出 0012
print format$(1234,"00") 则输出1234
print format$(12345,"000000,0") 则输出 0,012,345
print format$(12345.123,"000000,0.00") 则输出0,012,345.12
print format$(12345.123,"0000,000.00") 则输出0,012,345.12


例:
print format$(10,"$0.00") 则输出$10.00

例:
print format$(10,"+0.00") 则输出 +10.00
print format$(10,"-0.00") 则输出 -10.00
print format$(10,"-0.00") 则输出 -10.00
print format$(-10,"+0.00") 则输出 -+10.00
print format$(+10,"+0.00") 则输出 -+10.00

例:
print format$(123.45,"0.00E+00") 则输出 123E+02
print format$(123.45,"0.00E-00") 则输出 123E02
与Print方法有关的函数:



例子:

SPC函数:


数据输入的InputBox函数:







字体类型:


例:

字体名要和当前系统中字体名相同。

Option Explicit
Private Sub Command1_Click()
Text1.FontBold = Not Text1.FontBold 单击加粗,再单击不加粗。如此切换
End Sub
其他方法和属性:


Move方法:




CurrentX和CurrentY属性:

 定义输出“你好”的位置
   定义输出“你好”的位置

TextHeight和TextWidth方法:


例:


ScaleWidth和ScaleHeight属性:


例:
在中心位置输出字符串:

单击窗体时先清除窗体内容:












