摘要：
原题：一个正整数，转成二进制后，这个二进制数包含多少个1？ 这个问题在网上看过多次，几番思考，也没有什么好的办法。采用最基本的办法，逐位判断，是1的统计加1，最后将统计数返回。 以下是这个思路的VB2008代码，不失一般性，将正整数的范围控制在（1~231-1） Private Function GetCount1OfValue(ByVal Value As Integer) As Integer Dim i As Integer, Count As Integer = 0 For i = 0 To 30 If (Value And 2 ^ i) = 2 ^ i Then Count += . 阅读全文
