SandahlOlsen skrev:
> -Fordi du anvende Asc-funktionen i stedet for at teste på KeyAscii-værdien
> (44), som allerede har i hånden. Du laver altså performenceoverhead.
....og så?
Hvis man ikke er glad for performance overheads, bruger man OVERHOVEDET ikke
Visual Basic
Det er vigtigere at lave læselige programmer, end at undgå at introducere et
ekstremt minimalt performance overhead, som formentlig vil være næsten
umåleligt.
Men okay - her er en version specielt til dig:
Private Const ANSI_NUL As Byte = 0 ' NUL
Private Const ANSI_KOMMA As Byte = 44 ' ,
Private Sub Text1_KeyPress(KeyAscii As Integer)
If InStr(Text1.Text, ",") And KeyAscii = ANSI_KOMMA Then KeyAscii =
ANSI_NUL
End Sub
....og det er faktisk også sådan, at det bør gøres (altså bruge konstanter,
hvor funktioner kan undgås).
-------
Tomas