Hirdetés
Köszönjük a sok biztatást, támogatást! Egy rövid ideig még féláron tudsz hirdetni, előfizetni!
Új hozzászólás Aktív témák
-
bepken
veterán
azt hiszem, a telefonszám "konvertálást" is sikerült megoldani, bár a gyakorlatban még csak pár példával próbálkoztam:
Private Sub btnFind_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnFind.Click
txtFind.Paste()
txtFind.Text = Replace(txtFind.Text, " ", "")
txtFind.Text = Replace(txtFind.Text, "/", "")
txtFind.Text = Replace(txtFind.Text, "(", "")
txtFind.Text = Replace(txtFind.Text, ")", "")
txtFind.Text = Replace(txtFind.Text, "-", "")
txtFind.Text = Replace(txtFind.Text, "+", "")
If txtFind.TextLength > 7 Then
If txtFind.Text.StartsWith("06") Then
txtFind.Text = txtFind.Text.Substring(2)
End If
If txtFind.Text.StartsWith("36") Then
txtFind.Text = txtFind.Text.Substring(2)
End If
End If
TelBindingSource.Filter = "[tel] = '" & Me.txtFind.Text & " ' "
End Subígy elviekben a vágólapra vett (legtöbbször keszekusza formátumú) számokat szépen "letisztítja" és ezután keres az adatbázisban
mennyire elegáns ez így szerintetek?
illetve arra nem jöttem még rá, hogyan lehetne megoldani, hogy a TextBox-ban található értéket minden alkalommal alapból felülírja.
nem hozott megoldást az sem, ha beállítottam, hogy 7 karakter hosszú legyen a TextBox, mert ekkor alapból az első 7 karaktert kezdte vizsgálni, ami meg ugye esetemben nem igazán előnyös... -
Az Enter esemény az nem az, amikor entert nyomsz.
Azt így tudod megccsinálni, ahogy írtad. Esetleg még Validate-tel - de ott ha be van állítva, hogy validate on focus lost (vagy valami hasonló), akkor akkor is lefut a validate, ha kikantitasz a mezőből (vagy Tab-bal tovább mész).
Új hozzászólás Aktív témák
- gban: Ingyen kellene, de tegnapra
- Kingston FURY Renegade G5: Adatok villámgyorsan
- MIUI / HyperOS topik
- Víz- gáz- és fűtésszerelés
- sziku69: Fűzzük össze a szavakat :)
- Kerékpárosok, bringások ide!
- One mobilszolgáltatások
- Milyen légkondit a lakásba?
- Garmin Venu X1 - vékony, virtuóz, váltságíjas
- Építő/felújító topik
- További aktív témák...
- Gamer PC-Számítógép! Csere-Beszámítás! Ryzen 5 5500 / RX 6600XT / 32GB DDR4 / 512GB SSD
- Apple iPhone 14 Pro 256GB,2026.03.14-ig ALZA Garancia,Újszerű Állapotban,Kártyafüggetlen.
- Dell RTX A4000 16GB
- Gigabyte Aero 15XC (RTX 3070, Intel Core i7 10870H, 32GB RAM,1+TB SSD) Beszámítás! JÓTÁLLÁSSAL!
- Lenovo Thinkpad X280, 12,5" FHD IPS Érintős, I5-8350U CPU, 8GB DDR4, 256GB SSD, W11, Számla, 1 év ga
- BESZÁMÍTÁS! Asus TUF A620M R7 7700 64GB DDR5 500GB SSD RX 6800 XT 16GB ZALMAN I3 NEO Seasonic 750W
- Eredeti Lenovo 230W töltők - 4X20Z83995
- Telefon felvásárlás!! Honor Magic6 Lite, Honor Magic6 Pro, Honor Magic7 Lite, Honor Magic7 Pro
- Telefon felvásárlás!! iPhone 16/iPhone 16 Plus/iPhone 16 Pro/iPhone 16 Pro Max
- ASUS X540SA-XX004D Notebook - 4 napot használt
Állásajánlatok
Cég: FOTC
Város: Budapest