vba编写程序 二进制转换位十进制

具体要求 按下按钮，弹出输入对话框，请用户输入一个二进制数
将用户输入的二进制数转换为十进制数，用信息对话框输出
用for语句
坐等高手 万分感谢
球高手指导下阿
简单点就行啊

简单实现方法：
插入一个按钮，双击打开输入如下代码：
Private Sub CommandButton1_Click()
Dim strnum

strnum = InputBox("请输入一个二进制数, 注意数据格式!", "输入数据", vbOK + vbCancel)
If strnum = "" Then
Exit Sub
Else
MsgBox "该二进制数值转化为的十进制数值为 " & Application.Bin2Dec(strnum) & " .", vbOKOnly, "转换结果"
End If
End Sub

这个没有必要想太多啊，直接把小时的数字mod 12就好，再加个除12以后取整，判断一下是上午还是下午，连这都想不到解决办法，你们老师的水平令人着急

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息