Contact: aviboots(AT)netvision.net.il
28,263 questions
36,905 answers
573 users
Imports System Public Class Program Public Shared Sub Main() Dim str As String = "100111" Dim num As Integer = Convert.ToInt32(str, 2) Dim oct As String = Convert.ToString(num, 8) Console.WriteLine(oct) End Sub End Class ' run: ' ' 47 '