declarar nombre

Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As
System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress

If KeyAscii = 13 Then

TextBox1.Text = UCase(TextBox1.Text)

TextBox2.Focus()

End If

Aqui cuando le doy a generar en visual basic.net de Visual studio.net me
pide
declarar el nombre KeyAscii, es sobre un programa que genera una boleta de
pago, el ejercicio es de un manual de visual basic 6, ya consulte en el foro
y me dicen que pregunte por aqui.


Aqui por ejemplo me pide declarar todos estos nombres:

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button1.Click

'asignando variables
he = Val(TextBox3.Text)
bas = Val(TextBox2.Text)
ni = Val(TextBox4.Text)

'calculos de los ingresos
phe = 10 * he
boni = 5 * bas / 100
ti = bas + phe + boni

'descuentos
ipss = 3 * bas / 100
snp = 2 * bas / 100
fonavi = 3 * bas / 100
dina = ni * 20
te = ipss + snp + fonavi + dina
sn = ti - te

'mostrar los resultados
TextBox5 = bas
TextBox6 = phe
TextBox7 = boni
TextBox8 = ipss
TextBox9 = fonavi
TextBox10 = snp
TextBox11 = dina
TextBox12 = ti
TextBox13 = te
TextBox14 = sn
Button1.Enabled = False
Button2.Enabled = True
End Sub

me puden ayudar por favor.