Excel Forum - Porady, Pomoc, Excel Help, Excel FAQ - 42. Maska dla kontrolki TextBox

master_mix · Excel Expert Posty: 1615

(EDIT 19-11-2011 g 13.40)
Kontynuacja wątku
http://www.excelforum.pl/...box-vt25689.htm
Często stosujemy pola textowe w formularzach w których wpisujemy dane typu NIP, IP, Data, Godzina itp, gdzie jest określony szablon, schemat wprowadzanych danych.

Aby ułatwić użytkownikowi wprowadzanie tego typu danych kontrolkę TextBox można odpowiednio oprogramować.

Żeby ułatwić stosowanie masek w nowych projektach proponuję użyć jednego modułu klasy, który będzie zarządzał różnymi kontrolkami z różnymi szablonami danych.

Aby w nowym projekcie używać "szablonowych" TextBoxów wystarczy zaimportować moduł klasy, a w zdarzeniu Initialize formy wstawić minimum kodu.

W zalącznikach osobno sam moguł klasy i moduł klasy wykorzystany w projekcie.
Dodatkowo oprócz maski można też ustawić maxymalne cyfry wpisywane do kontrolki, np

Powiedzmy że ograniczenie chcemy wprowadzić dla szablonu "__:__:__"
Ograniczenia maja postać:
pierwsza cyfra max 24, druga cyfra max 59, trzecia 59 w takiej sytuacji piszemy

Kod:

clsMask.LadujSzablonFormat "__:__:__:", "23,59,59"

A gdyby było bez ograniczeń to wystarczy

Kod:

clsMask.LadujSzablonFormat "__:__:__:"

p.s.
Aby klawisz Delete kasował tylko najbliższy znak po prawej należy opisaną część kodu odkomentować a odpowiednią zakomentować.

Pozdrawiam

Wykorzystanie Maski TextBox.zip

Pobierz Plik ściągnięto 98 raz(y) 23.87 KB

KlasaMaski.zip

Pobierz Plik ściągnięto 62 raz(y) 3.42 KB