vb编写十进制转二进制 用VB编程：将二进制转化为十进制？
用VB编程：将二进制转化为十进制？rivate Sub Form_Load() MsgBox BIN_to_DEC("11") End Sub Public Function BIN_to_DEC(B
用VB编程：将二进制转化为十进制？
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