色婷婷狠狠18禁久久YY,CHINESE性内射高清国产,国产女人18毛片水真多1,国产AV在线观看

比如輸入7轉換為00000111

阮建安2年前14瀏覽0評論

比如輸入7轉換為00000111?

1返回十進制數對應的二進制字串PublicFunctionD2B(ByValDnumAsLong)AsStringDimxxAsStringDimyyAsIntegerxx=""'字串累加清空DoWhileDnum>0'循環取余至小于1yy=DnumMod2'除2取余Dec=Dec\2'除2取整xx=Trim(Str(yy))&xx'字串累加LoopD2B=xx'返回字串EndFunction