用VB编写一个程序，实现随机数

Question

用VB编写一个程序，实现以下功能：随机产生一个[50，150]之间的十进制数，并转换成八进制和十六进制数，显示这三个数值。随机函数为Rnd( )，使用转换函数进行转换。求具体代码，文字不懂，十万火急

Answer 1

Private Sub Command1_Click()
Randomize
Dim n As Integer
n = Int(Rnd * (150 - 50 + 1)) + 50
Cls
Print n
Print Hex(n) '十六
Print Oct(n) '八
End Sub追问

写完不对啊，我是新手，第一次用VB，在form里建了一个button和三个label就不知干嘛了

追答

是vb6还是Vb.net?
vb6就下面代码：
Private Sub Command1_Click()
Randomize
Dim n As Integer
n = Int(Rnd * (150 - 50 + 1)) + 50
Label1.Caption= n
Label2.Caption= Hex(n) '十六
Label3.Caption= Oct(n) '八
End Sub