判断类型
变量=TypeOf (判断数据) Is 类型
返回 True or False
例子：
If TypeOf (Rs_table(j)) Is Boolean Then
If (Rs_table(j) = True) Then
Str = "1"
ElseIf (Rs_table(j) = False) Then
Str = "0"
End If
Else
Str = Rs_table(j)
End If