Contact: aviboots(AT)netvision.net.il
24,887 questions
32,502 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 '