Imports System

Module Module1

​

Sub Main()

​

    Dim A As String

    Console.Write("データを入力してください")

​

    A = Console.ReadLine()

​

    Console.WriteLine(A)

​

    Console.ReadKey()

​

End Sub

​

End Module