我想编写一个猜数字的游戏，可是

Private Sub cmdsure_Click()
a = 0
b = 0
’判断几个位置对存于a，几个数字对位置不对，存于b
If i1.Text = r1.Text Then
a = a + 1
End If
If i2.Text = r2.Text Then
a = a + 1
End If
If i3.Text = r3.Text Then
a = a + 1
End If
If i4.Text = r4.Text Then
a = a + 1
End If
If (i1.Text = r2.Text Or i1.Text = r3.Text Or i1.Text = r4.Text) Then
b = b + 1
End If
If (i2.Text = r1.Text Or i2.Text = r3.Text Or i2.Text = r4.Text) Then
b = b + 1
End If
If (i3.Text = r1.Text Or i3.Text = r2.Text Or i3.Text = r4.Text) Then
b = b + 1
End If
If (i4.Text = r1.Text Or i4.Text = r2.Text Or i4.Text = r3.Text) Then
b = b + 1
End If
If a = 4 Then
Form1.Hide
Form2.Show
End If
If (c = 9 And a < 4) Then
Form1.Hide
Form3.Show
End If
Select Case c
‘每次猜完结果存于textN，分析结果位置对a和数字对但位置不对b存于t1和t11，并使之不可更改
Case 1
Text1.Text = i1.Text + i2.Text + i3.Text

用VB语言编写一个猜数字的游戏 用c++编写猜数字的游戏 大家帮我用c编写一个猜数字游戏 用C++编写一个猜数字的小游戏 用c++编写猜数字游戏 一个猜数字的游戏 谁会用C++6.0编写猜数字游戏要带解释的。 javascript编写一段猜数字的程序？ basic编写猜数字的解 C语言编写的猜数字问题