请教一个关于算发的问题！
我想用ASP实现一个算法，具体如下
一个字节由8位二进制数字组成，既 "0 "和 "1 "
那么1个字节有多少种组成方式，既求 "0 "和 "1 "的组成数目
如下：
00000000       1
00000001       2
00000010       3
00000011       4
…………       N
N等于多少？

------解决方案--------------------
2的8次方,把它当作数组来看,一个未知长度的数组,它的集合数就是2的[数组长度]次方
例如:
a = Array(1, 1, 1, 1, 1, 1, 1, 1)
集合数就是
2 ^ (UBound(a) + 1)

http://community.csdn.net/Expert/topic/5430/5430564.xml?temp=.8955652

这里有个任意进制转换的函数,可以参考一下

------解决方案--------------------
'二进制转十进制

Function BinToD(s)
Dim ret,tmps,subi
ret=0
tmps=Trim(CStr(s))
If IsNumeric(s) Then
If Replace(Replace(tmps, "1 ", " "), "0 ", " ")= " " Then
For i=Len(tmps) To 1 Step -1
subI=CInt(Mid(tmps,Len(tmps)-i+1,1))
ret=ret+subI*2^(i-1)
Next
End If
End If
BinToD=ret
End Function