Hejsan!

Tänkte höra om någon kan hjälpa mig med hur jag ska göra. I mitt program finns ett textfält där man ska ange sitt namn. Hur skriver man om man vill stoppa användaren från att kunna ange numeriska värden i det fältet? Alltså, det ska bara gå att ange bokstäver och anger man istället en siffra så ska inte textfältet ta emot den plus att det kommer upp en info-ruta om att man inte kan ange siffror i namnet. Kontrollen ska reagera på en gång då man använder siffertangenterna och inte behöva stega sig igenom strängen i efterhand tänkte jag.

Väldigt tacksam för hjälp!

Mvh
Sivan

<code>
Private Sub Text1_KeyPress(KeyAscii As Integer)
Select Case KeyAscii
Case 48 To 57
KeyAscii = 0
End Select
End Sub
</code>

Aha!! Tack så hemskt mycket för hjälpen. En baggis för er =)

Nu måste jag testa den koden och se.

Tack igen!

Sivan

Skippa inforutan den bara irreterar,med denna kod lär dom sig "the hard way".

Sen kommer din följdfråga: Hur gör jag så att dom bara kan skriva siffror
med tillhörande operatorer?. Då gör man så här ;-)
<code>
Private Sub Text1_KeyPress(KeyAscii As Integer)
'Normal bör du tillåta dessa tillsammans med siffror
'BackSpace,Tab,Enter,Komma,Punkt,Minus och 0 - 9
Select Case KeyAscii
Case 8, 9, 13, 44, 45, 46, 48 To 57
' Tillåt
Case Else
KeyAscii = 0
End Select
End Sub
</code>