Ú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
- sziku69: Fűzzük össze a szavakat :)
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- Kiszivárgott a Pixel 10a specifikációja
- Privát Samsung funkciót tehet az Apple publikussá
- Pendrive irás-olvasás sebesség
- TCL LCD és LED TV-k
- A fociról könnyedén, egy baráti társaságban
- Milyen routert?
- CPU léghűtés kibeszélő
- gban: Ingyen kellene, de tegnapra
- További aktív témák...
- 179 - 180 - 189 - Lenovo LOQ (15IRX9) - Intel Core i7-13650HX, RTX 4060
- BESZÁMÍTÁS! GIGABYTE A520M R5 4500 8GB DDR4 250GB SSD GTX 1650 4GB Rampage SHIVA DeepCool 400W
- GYÖNYÖRŰ iPhone 15 Pro Max 256GB Fekete Titán - 12 hónap JÓTÁLLÁS - Kártyafüggetlen, 100% Aksi
- Új autó elsősegély doboz 2030 augusztusig jó
- Dell Latitude 7210 2-in-1 12" FHD touch, i7 10610U, 16GB RAM, 512GB SSD, jó akku, számla, 6 hó gar
Állásajánlatok
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest
Cég: Laptopműhely Bt.
Város: Budapest


