Imports System

Public Module Module1

    Public Sub Main()

        Dim Init_read As String = "100"

        Dim Old_sec As Integer = CType(Init_read, Integer)

        Console.WriteLine(Old_sec.ToString())

    End Sub

End Module