请问各位
在asp.net中是否有二进制和十进制转换的函数？有没有把二进制的各位上的数值放入一个数组的的函数？ 问题点数：20、回复次数：3Top
1 楼abigfrog（千年精灵)(★JAVA★）回复于 2002-09-07 09:36:33 得分 0
好像没有，自己写嘛。Top
2 楼abigfrog（千年精灵)(★JAVA★）回复于 2002-09-07 09:37:57 得分 20
给你一个vb写的转换函数：
'==================================
'二进制转为十进制函数
'strBin 二进制字符串
'用法 Long bin2dec(strBin as String)
'返回： 二进制的十进制 长整数（Long）
'错误： 返回-1
'==================================
Public Function Bin2Dec(strBin As String) As Long
On Error GoTo Err:
Dim lDec As Long
Dim lCount As Long
Dim i As Long
lDec = 0
If strBin = "" Then strBin = "0"
lCount = Len(strBin)
For i = 1 To lCount
lDec = lDec + CInt(Left(strBin, 1)) * 2 ^ (Len(strBin) - 1)
strBin = Right(strBin, Len(strBin) - 1)
DoEvents
Next
Bin2Dec = lDec
Exit Function
Err:
Bin2Dec = -1
End FunctionTop
3 楼foxmayfly（甫几）回复于 2002-09-07 10:20:01 得分 0
这个不错，我省了不少
Top
