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

猜数字,猜数字

向下

猜数字,猜数字 Empty 猜数字,猜数字

帖子  董昊-网4 周二 三月 18, 2008 8:26 pm

Const a = 9, b = 9, c = 9
Dim e, f, g As String
Console.WriteLine("猜第一位")
e = Console.ReadLine()
If e = a Then
Console.WriteLine("猜第二位")
f = Console.ReadLine()
End If

If f = b Then
Console.WriteLine("猜第三位")
g = Console.ReadLine
End If

If g = c Then
Console.WriteLine("恭喜!密码被你破译")

End If
Console.WriteLine("继续努力")

董昊-网4

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

返回页首 向下

返回页首


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