要使用基本的输入输出,我们得在源代码开头加上
Imports System
导入System命名空间。
控制台下的输入输出由System.Console类来管理。基本的输入是Console.ReadLine,输出是Console.WriteLine。下面是一个示例:
imports System
public module MainModule
public sub Main
dim str as String
str = Console.ReadLine '读入用户输入的一行
Console.WriteLine(str) '将读入的内容输出
Console.ReadLine
end sub
end Module
下面是一个稍微复杂的例子(以后的例子中仅写出main函数):
public sub Main
dim str as String
Console.WriteLine("What is your name?")
str = Console.ReadLine
Console.WriteLine("Hello, " & str & "!")
Console.Read
end sub
下面这个例子从用户那里得到两个数,相加之后输出结果:
public sub Main()
dim i, j as integer
Console.WriteLine("第一个数:")
i = cint(Console.ReadLine) 'Console.ReadLine接受的是字符串,我们用cint函数
Console.WriteLine("第二个数:") '将字符串转换成整数
j = cint(Console.ReadLine)
Console.WriteLine("结果是:" & i + j)
Console.Read
end sub
作为控制台程序,我们应该接受运行程序时的参数。像Java一样,这个参数在代码中是Main函数的参数。下面是一个简单的例子。
public sub Main(Byval Args() as String)
dim str as String
Console.WriteLine("Length of Args is " & Args.Length)
Console.Read
end sub
下面是一个稍微复杂的例子,将用户输入的参数列出来:
public sub Main(Byval Args() as String)
dim str as String()
dim i as integer
Console.WriteLine("Length of Args is " & Args.Length)
for i = 0 to Args.Length - 1
Console.WriteLine("Args(" & i & "):" & Args(i))
next
Console.Read
end sub
输入输出还有一种格式化的方式。例如那个做加法的例子,我们可以写成:
public sub Main()
dim i, j as integer
Console.WriteLine("第一个数:")
i = cint(Console.ReadLine)
Console.WriteLine("第二个数:")
j = cint(Console.ReadLine)
Console.WriteLine("{0}:{1}", "结果是", i + j) '这里使用了格式化的方式来输出结果。花括号括起来
Console.Read '的数字表示第几个参数,后面按顺序列出值。这就相
end sub '当于C中的printf("%s:%i", "结果是", i+j);