Visual Basic Programozás, segítsetek nekem
-
#108
az egér jobb klikk és paste, még mindig enged karaktereket. Lehet, hogy jobban járnék, ha csak egyszerűen a szövegdoboz tartalmát ellenőrizném a művelet elött
a text.change esemény alkalmas rá, ott szintén as isNumeric() függvénnyel letilthatod a szöveg beírását. Viszont jobban javaslom a már említett Clipboard objektum ellenőrzését mégpedig a keypress eseményben. Tehát akár egy felh függvényben is jól néz ki a dolog:
function vagolapSzamE() as boolean
dim var
var = clipboard.gettext
if isnumeric(var) then
vagolapSzamE = true
end if
end function
így csak meg kell hívni a keypress eseményben: If vagolapSzamE = True then és már illeszthető is be a szövegmezőbe