Question

VB程序。将一个十进制数分别转换成二，八，十六进制数。

要用循环结构的编程。。。

Answer 1

1.运行“MicrosoftVisualStudio2010”。

2.当弹出“vs”窗口时，找到菜单栏，用鼠标左键点击“文件(f)”选项。知道

3.在弹出的列表中，左键单击标题为“新项目(p)”的项目。

4.在弹出式标题“新建项目”中，用鼠标左键选择标题为“VisualBasic”的项目，再选择标题为“WIndows”的项目。在右边的列表中选择标题“Windows窗体返回应用程序”。

5.在背景为“白色”、标题为“ForM1”的窗口中，双击鼠标左键。

6、在新切换到“代码”页。

7.然后在“PrivateSubForm1_Load(ByValsender作为系统”下编写代码。对象，ByVale作为system.eventargs)处理mybase.load”。就是这样。

Answer 2

'VB程序。将一个十进制数分别转换成二，八，十六进制数。
Private Sub Text1_Change()
    'tonkeys QQ 58507961
    '十进制  to 二进制
    a% = Val(Text1.Text)
    tmp = ""
    Do
        tmp = (a Mod 2) & tmp
        If a < 2 Then Exit Do
        a = a \ 2
           
    Loop
    Text2.Text = tmp
       
    '十进制  to 八进制
    a% = Val(Text1.Text)
    tmp = ""
    Do
        tmp = (a Mod 8) & tmp
        If a < 8 Then Exit Do
        a = a \ 8
    Loop
    Text3.Text = tmp
       
    '十进制  to 十六进制
    a% = Val(Text1.Text)
    Text4.Text = Hex(a)
End Sub