7,789
社区成员
发帖
与我相关
我的任务
分享&H10是什么意思？
Public Function LenCheck(CheckStr As String) As Integer
Dim i As Integer
Dim bc As Integer
bytelen = 0
For i = 1 To Len(CheckStr)
bc = Asc(Mid(CheckStr, i, 1))
If bc < &H10 Then
bytelen = bytelen + 2
Else
bytelen = bytelen + 1
End If
Next i
End Function
&H10是什么意思？
Dim i As Integer
Dim bc As Integer
bytelen = 0
For i = 1 To Len(CheckStr)
bc = Asc(Mid(CheckStr, i, 1))
If bc < &H10 Then
bytelen = bytelen + 2
Else
bytelen = bytelen + 1
End If
Next i
End Function
&H10是什么意思？
...全文
请发表友善的回复…
发表回复
jlum99 2003-09-18
- 打赏
- 举报
呵呵，别急 1 2 3 4 5 6 7 8 9 A B C D E F
haipingma 2003-09-18
- 打赏
- 举报
16进制表示的16
淘米淘米 2003-09-18
- 打赏
- 举报
16进制的立即数：10，相当于2进制的10000，8进制的2000，10进制的16，呵呵
射天狼 2003-09-18
- 打赏
- 举报
对,是十六进制~~
viena 2003-09-18
- 打赏
- 举报
16进制表示的16
射天狼 2003-09-18
- 打赏
- 举报
对,是十六进制~~
道素 2003-09-18
- 打赏
- 举报
16进制的10
道素 2003-09-18
- 打赏
- 举报
16进制的10
