VB перевод чисел из одной систеы исчислени

[levakan]

написать программу умножения чисел в 8-чной и 4-ной системе исчисления
заранее спасибо!

[Sazary]

В VB для 8-ричной системы можно так:

Private Sub run_Click()
Dim a As Integer
Dim b As Integer
Dim res As Integer
a = Oct(Val(Text1.Text))
b = Oct(Val(Text2.Text))
res = a * b
Text3.Text = Str(Oct(res))

End Sub

Text1 - TextBox для 1-го числа
Text2 - Для второго
Text3 - для результата
ну и кнопка "run"