Jag har en textbox, hur ska jag göra så att det bara blir siffror som man kan fylla i? Hej hej igen nu fattar jag inte riktigt vad du menar... IgenDela upp...
och sedan så vill jag ta varannat tal gånger 2, samt att jag vill att om man tar 2*8 så vill jag spara 1 och 6 enskilt...
skulle vara tacksam för svarSv: Dela upp...
Första delen bara siffror kan du göra så här.
Private Sub Text1_KeyPress(KeyAscii As Integer)
Select Case KeyAscii
Case 3, 8, 22, 13,42,43 44,45, 46,47, 48 To 57
'Om du vill göra Tab med Enter
' If KeyAscii = 13 Then
' KeyAscii = 0
' SendKeys "{TAB}",True
' End if
Case Else
KeyAscii = 0
End Select
End Sub
Förklaring 3 o 22 gör att du kan klistra in, då får du själv se till
att det bara blir siffror.
8 bör alltid vara med tillåter BackSpace
13 är Enter om du vill Tab :vidare med funktion
44,45,46 är komma,minus och punkt 48 - 57 är siffrorna
42 multipl 43 plus 47 div
Ta bort tecken efter ditt behov
mvh
SvenSv: Dela upp...
Skriv ett exempel på en sträng, eller fler så
det blir klart hur du menar.
Förmodar att du tänker skriva en hel algoritm i textboxen
DSSv: Dela upp...
jag ska ha 9 siffror, och varannan ska man ta gånger 2.
och om man har tex 8 och tar det gånger 2 då blir svaret, 16.
sen vill jag dela upp 16 i 1 och 6Sv: Dela upp...
Aha du skall uppfinna personnummerhjulet igen
Kolla mitt uppskick
http://www.pellesoft.nu/login/upload/t_view4.asp?tid=59
mvh
Sven