Hei Mikkel
Det nemmeste og brukervennligste er å påse at der ikke kan tastes annet enn
tall i textboxen. Prøv dette i form-modulen:
Private Sub text1_keydown(KeyCode As Integer, Shift As Integer)
If KeyCode = vbKeyBack Or KeyCode = vbKeyDelete Then Text1.Text = ""
End Sub
Private Sub text1_KeyPress(KeyAscii As Integer)
Select Case KeyAscii
Case 44 'komma OK
Case 48 To 57 'decimaler ok
Case Else 'tegn eller bokstaver;
KeyAscii = 0 'forkast
End Select
End Sub
Tenk ALDRI på å bruke modale dialogbokser i situasjoner der brukeren utfører
keyboars-arbeid. Det medfører bortkastede tastetrykk og irritasjon.
Du skal heller ikke bruke text i matematik. En tekstbox returnerer tekst, i
beregninger bruker du
Val(Text1.text)*Val(Text2.text)
.... og før dette skal du erstatte komma med punktum.
HTH. Beste hilsen Harald
Colberg <Colberg@tk.k-net.dk> skrev i news:9odihm$kpr$1@eising.k-net.dk...
> I mit lille simple program skal brugeren indtaste nogle tal, som jeg så
> bruger i nogle beregninger.
> Indtaster brugeren bogstaver kommer der bare en "runtime error"-besked.
> Denne vil jeg gerne have skiftet ud med en lidt mere brugervenlig
> dialogbox.....men hvordan gør jeg...? Jeg kan simpelthen ikke få
> hovedprogrammet til at finde den har "fejl"-dialog-form.....
>
> Som Subjectet antyder er jeg spritny i det her, så ikke alt for
"langhårede"
> svar......helst.
>
> På forhånd tak
>
> Mikkel
>
>