VB.net入门(3):输入输出？

要使用基本的输入输出，我们得在源代码开头加上
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);

本文地址：http://com.8s8s.com/it/it43093.htm