0x00010058 本来就是数字,何错之有呢? 难道写成16进制就不是数字了? Local $a
Local $b=False
Local $c=0.234
Local $d='0'
Local $e=Binary("0x00204060")
MsgBox(0,$a,_VarGetType($a))
MsgBox(0,$b,_VarGetType($b))
MsgBox(0,$c,_VarGetType($c))
MsgBox(0,$d,_VarGetType($d))
MsgBox(0,$e,_VarGetType($e))
Func _VarGetType($var)
Local$Type=VarGetType($var)
Switch $Type
Case "int32"
Return "32 位带符号整数"
Case "int64"
Return "64 位带符号整数"
Case "string"
Return "字符串"
Case "Double"
Return "双精度浮点数"
Case "bool"
Return "布尔值"
Case "binary"
Return "二进制数据"
Case "Pointer"
Return "内存地址指针"
EndSwitch
EndFunc 本帖最后由 netegg 于 2012-7-1 19:25 编辑
回复 16# Qokelate
没说你的题目,说的是句柄那个判断,真要是较真的话,计算机里有字符吗?都是数 代码收下学习.
略微改一下8楼的代码,运行后出现的结果我不太明白
本帖最后由 32714107 于 2012-7-2 07:01 编辑Local $a
Local $sTip
$a=InputBox("","请输入a")
Select
Case IsString($a)
$sTip = '字符串'
Case IsNumber($a)
$sTip = '数字'
Case IsKeyword($a)
$sTip = '关键字'
Case IsHWnd($a)
$sTip = '句柄'
Case IsObj($a)
$sTip = '对象'
Case Not $a
$sTip = '神马也不是,NULL'
;各种IsXXXXX函数判断
EndSelect
MsgBox(0, 0,"$a是"&$a)
MsgBox(0, 0, '$a是' & $sTip)
如开始输入10,出现的结果是$a是10,确定后再出现$a是字符串,这是什么原因啊?
页:
1
[2]