Új hozzászólás Aktív témák
-
bepken
veterán
sziasztok!
a sokadik kezdő kérdésem lesz, szóval bocsi azoktól, akik korábban már nem egyet megválaszoltak más topic-ban

egy egyszerű programot szeretnék, ami tartalmaz:
- egy access adatbázist
- egy "azonFind" TextBox-ot, ahová beillesztve egy azonosító számot
- egy "btnFind" gombot, mely segítségével a TextBox-ba beírt azonosítószámot tudom kikeresni
- egy "btnSave" gombot, mellyel hozzá lehet adni az adott azonosítószámot, hogyha még nincs benne az adatbázisbanPublic Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.Munka1TableAdapter.Fill(Me.AzonositoDataSet.Munka1)
End Sub
Private Sub btnFind_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnFind.Click
Me.Munka1BindingSource.Filter = "[Azonosítószám] = '" & Me.azonFind.Text & " ' "
End Sub
Private Sub btnSave_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSave.Click
Me.Validate()
Me.Munka1BindingSource.EndEdit()
Me.TableAdapterManager.UpdateAll(Me.AzonositoDataSet)
End Sub
End Classeddig meg is vagyok - bár valamiért az adatbázist nem mindig akarja módosítani.....

na de ezekhez az azonosítószámokhoz az adatbázisban tartozik egy checkbox is!
szeretném, ha a program ezek értékeinek megfelelően (true/false) meghatározott szöveget adna vissza.egyébként az ilyesmit Label segítségével szokás kiíratni? (tehát amikor nem MsgBox féle ablakot szeretnénk, hanem csak egy szöveg változót valahova)
remélem nem kérdeztem sok hülyeséget...

köszi erőre is a segítséget!
Új hozzászólás Aktív témák
- Meta Quest 2 128GB Full Extra csomag (Elite Strap akkuval és tok, Kiwi grip, Fit Pack)
- EliteBook 840 G11 14" FHD+ IPS Ultra 5 125U 16GB 256GB NVMe magyar vbill gar
- Noctua NH-U9S chromax.black (teljes gyári szett)
- Zbook Studio G8 15.6" 4K OLED érintő i7-11800H RTX 3070 16GB 512GB NVMe magyar vbill gar
- Garanciális Gamer PC Ryzen 5 5600GT Rtx 3060ti 8GB 16GB RAM 512GB SSD
- Bontott 0perces TÜZES EZÜST/STARLIGHT MacBook Air 15" M4 10C/1G 16GB 256GB Gar.: 1 év APPLE gar
- Huawei P30 128GB, Kártyafüggetlen, 1 Év Garanciával
- Új autó elsősegély doboz 2030 augusztusig jó
- 229 - Lenovo LOQ (15IRX10) - Intel Core i7-13700HX, RTX 5060 (ELKELT)
- iPad A16 128GB Wi-Fi Silver 100% (1év Garancia) Mindössze 4 ciklussal!
Állásajánlatok
Cég: Central PC számítógép és laptop szerviz - Pécs
Város: Pécs
Cég: Laptopműhely Bt.
Város: Budapest



