vb編寫十進制轉(zhuǎn)二進制 用VB編程：將二進制轉(zhuǎn)化為十進制？
用VB編程：將二進制轉(zhuǎn)化為十進制？rivate Sub Form_Load() MsgBox BIN_to_DEC("11") End Sub Public Function BIN_to_DEC(B
用VB編程：將二進制轉(zhuǎn)化為十進制？
rivate Sub Form_Load() MsgBox BIN_to_DEC("11") End Sub Public Function BIN_to_DEC(ByVal Bin As String) As Long Dim i As Long For i = 1 To Len(Bin) BIN_to_DEC = BIN_to_DEC * 2 Val(Mid(Bin， i， 1)) Next i End Function
私有子窗體u Load（）MsgBox BIN to u to u DEC（“11”）End Sub