³oÓ°ÝÃD©ñ¤Ó¤[¤~¨Óµo°Ý...
- ©«¤l
- 2842
- ¥DÃD
- 10
- ºëµØ
- 0
- ¿n¤À
- 2898
- ÂI¦W
- 0
- §@·~¨t²Î
- ¡e²¤¡f
- ³nÅ骩¥»
- ¡e²¤¡f
- ¾\ŪÅv
- 100
- ©Ê§O
- ¨k
- ¨Ó¦Û
- ¡e²¤¡f
- µù¥U®É¶¡
- 2013-5-13
- ³Ì«áµn¿ý
- 2025-4-28
|
¦^´_ 3# EGBT
¥i¥H¸Õ¸Õ:
Sub TEST1107_1()
Dim x, y, z As Integer
MsgBox TypeName(x)
MsgBox x = 0
MsgBox x = ""
MsgBox TypeName(z)
x = 1
MsgBox TypeName(x)
x = "J"
MsgBox TypeName(x)
MsgBox VarType(x)
End Sub
¥¼©w¸qªº¬° Variant , ªì©lÈ Empty, µ¥¦P¼Æ¦r0, ¤]µ¥¦P¤å¦r""
ÀH«á¨Ì©Ò½á¤_ªºÈ¬°¨äÃþ«¬, ÆF¬¡©Ê°ª, ¦ý¸û¦û°O¾ÐÅé!
ÁÙ¦³Ó MsgBox VarType(x) , ¥H¼Æ¦r¥Nªí¨äÃþ«¬,
¥i¥H¦h¬Ý¬ÝVBE¤º«Ø»¡©úÀÉ~~ |
-
1
µû¤À¤H¼Æ
-
|
|
|
|
|
|