怎么用vb实现二进制与十进制的转化程序啊

进制转换并不是那么难的，有仿困很多相关的资料。

提供一个二进制转化为十进制的函数

Private Sub command1_click()

  燃绝  MsgBox BIN_to_DEC("11")

End Sub

Private 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

1、运行“Microsoft Visual Studio 2010”。

2、”vs“的窗口d出后，找到菜单栏，鼠标左键单击标题为”文件（f）“的选项。

3、在d出的列表中鼠标左键单击标题为”新建项目（p）“的项。

4、在d出的标题为”橡敏新建项目“，鼠标左键选择标题为”Visual Basic“项，在选择标题为”WIndows“的项。再在右边的列表中选择标题为”Windows 窗体应用罩数程序“。

5、在一个背景为”白色"的窗口，且标题为“ForM1”的窗口中的空白处鼠标左键双击。

6、在新切换到的“代码编辑页面”。梁闷枝

7、再在 “Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load”下写代码。就可以了。

---