城市_亂數
Randomize()
Dim random As Integer = CInt(Int((6 * Rnd()) + 1))
TextBox1.Text = Str(random)
Dim guess As Integer = Val(TextBox2.Text)
If (guess = target) Then
TextBox3.Text = "猜中了"
ElseIf (guess > target) Then
TextBox3.Text = "小點好嗎"
ElseIf (guess < target) Then
TextBox3.Text = "大點別那麼小氣嘛"
Today's Visitors: 0 Total Visitors: 7

Sealed (Apr 19)