.NET自由天空
Would you like to react to this message? Create an account in a few clicks or log in to continue.

随机数......

向下

随机数...... Empty 随机数......

帖子  张文强07网04 周二 三月 18, 2008 8:29 pm

Module Module1

Sub Main()
Dim a, b, c As Integer
a = 1
b = 2
c = 3

If a = Console.ReadLine Then

Console.WriteLine("你太有才了")
Else
Console.WriteLine("错了")

End

End If
If b = Console.ReadLine Then
Console.WriteLine("你太有才了")
Else
Console.WriteLine("错了")
End
End If
If c = Console.ReadLine Then
Console.WriteLine("你太有才了")

Else
Console.WriteLine("错了")


End If



End Sub

End Module

张文强07网04

帖子数 : 3
注册日期 : 08-03-18

返回页首 向下

返回页首


 
您在这个论坛的权限:
不能在这个论坛回复主题