SHOW:
|
|
- or go back to the newest paste.
| 1 | - | If text1.text =! " " then |
| 1 | + | If text1.text <> "" then |
| 2 | If letra1 = "E" Then | |
| 3 | label1.Caption = letra1 | |
| 4 | Text1.Text = "" | |
| 5 | Else | |
| 6 | MsgBox "Letra Incorrecta" | |
| 7 | List1.AddItem (letra1) | |
| 8 | Text1.Text = "" | |
| 9 | End If | |
| 10 | end if | |
| 11 | - | If text2 =! " " then |
| 11 | + | If text2 <> "" then |
| 12 | If letra2 = "S" Then | |
| 13 | label2.Caption = letra2 | |
| 14 | Text1.Text = "" | |
| 15 | Else | |
| 16 | MsgBox "Letra Incorrecta" | |
| 17 | List1.AddItem (letra2) | |
| 18 | Text1.Text = "" | |
| 19 | End If | |
| 20 | end if |