注册 登录
编程论坛 新人交流区

菜鸟请教vb代码编写问题

freelxg 发布于 2007-10-05 16:44, 1031 次点击
我是刚刚接触vb编程,之前也没学过编程,真正的从0学起。我想编个进制转换的程序,可我不会代码,知识把界面弄好了。希望高手指点下接下来怎么做??静侯佳音..........
只有本站会员才能查看附件,请 登录

18 回复
#2
雨帆2007-10-05 17:04
你的应该是输入十进制吧?
你懂各个进制怎么转化的方法,懂VB的语法就会觉得不难了。建设先学好VB的语法,不然你看代码有一点点困难的。

下面代码供你参考:
1.将十进制转化为二进制

Public Function DEC_to_BIN(Dec As Long) As String
DEC_to_BIN = ""
Do While Dec > 0
DEC_to_BIN = Dec Mod 2 & DEC_to_BIN
Dec = Dec \ 2
Loop
End Function

2.将十进制转化为八进制

Public Function DEC_to_OCT(Dec As Long) As String
DEC_to_OCT = ""
Do While Dec > 0
DEC_to_OCT = Dec Mod 8 & DEC_to_OCT
Dec = Dec \ 8
Loop
End Function

3.将十进制转化为十六进制

Public Function DEC_to_HEX(Dec As Long) As String
Dim a As String
DEC_to_HEX = ""
Do While Dec > 0
a = CStr(Dec Mod 16)
Select Case a
Case "10": a = "A"
Case "11": a = "B"
Case "12": a = "C"
Case "13": a = "D"
Case "14": a = "E"
Case "15": a = "F"
End Select
DEC_to_HEX = a & DEC_to_HEX
Dec = Dec \ 16
Loop
End Function

要是有代码还不知道用的话,那就好好学好VB语法吧~~~~
#3
freelxg2007-10-05 17:15

谢谢斑竹,呵呵,还真有写困难。漫漫消化.........
再次感谢

#4
雨帆2007-10-05 17:19
开始学就把基础学好,慢慢来,不要一学就想编个什么大程序出来,而且还得有程序算法的头脑,逻辑思维还得要的!
呵呵,我可不是VB 的斑竹!~~~~以后你去那个里面去问高手吧!~~
#5
freelxg2007-10-05 17:19
哦,对了。text不用编辑么??
#6
雨帆2007-10-05 17:21
以下是引用freelxg在2007-10-5 17:19:22的发言:
哦,对了。text不用编辑么??


你还是学一点东西再来问吧!~~~
这个问题你看了书绝对知道的~~~

#7
freelxg2007-10-05 17:26
呵呵,我刚刚接触。真的不懂嘛
漫漫来吧
谢谢兄弟啦
能加Q么?
我的476118058
#8
XMeLoDy2007-10-05 17:45
反过去这么写?有转换函数吗?8转10 。。。。
#9
freelxg2007-10-06 14:07

还是不懂啊把代码写在那里??1.将十进制转化为二进制的代码旧写在二进制的控件吗???世道的兄弟说下。。。。。。。。。。。谢谢..........

#10
雨帆2007-10-06 14:55

叫你看一点书再说啊!
代码肯定是在按钮单击事件触发的。你双击对应的按钮位置,进入代码编辑里面,然后应该加到哪个地方,哪个地方应该改,你自己看着办吧!
#11
freelxg2007-10-06 15:03
貌似我把雨帆兄给气急了
我看了啊,不过没看懂
#12
cherywq2007-10-06 15:09

语言从基础学起

#13
freelxg2007-10-06 15:11
恩恩.............我现在正在看基础教程呢,不过还没看到雨帆兄给的代码
#14
雨帆2007-10-06 15:11
我电脑上面没有装VB,以前自学过,只知道这些不难!
你懂VB语法,里面每个变量代表什么,算法是怎么来的就行了,就会用了。
要是这些都不懂,还真的不好跟你解释了!你今天应该可以去VB版去了吧,去那里问吧,呵呵!我等下还得回我的版去。!
#15
freelxg2007-10-06 15:16
恩,好的。。。。。谢谢雨帆,你貌似是我地第一个老师
#16
xjctan2007-10-07 11:05
先看书还是比较重要的
#17
sdz2007-10-08 20:28
学习了
#18
nhm8882007-10-10 19:08
晕,
#19
a3454034352007-10-11 11:53

谢谢 ....我也不怎么会..

1