- erkxt: A Roidmi becsődölt – és senki nem szól egy szót sem?
- Viber: ingyen telefonálás a mobilodon
- Gurulunk, WAZE?!
- sziku69: Fűzzük össze a szavakat :)
- Luck Dragon: Asszociációs játék. :)
- Hieronymus: Három júniusi képem
- Android másképp: Lineage OS és társai
- VoidXs: Tényleg minden játék optimalizálatlan?
- Magga: PLEX: multimédia az egész lakásban
- gban: Ingyen kellene, de tegnapra
Új hozzászólás Aktív témák
-
blemidon
tag
Ez nem csak arra jó. Ha jobban megnézed, ez 1 eljárás, ami a listboxod bármelyik elemének értékét adja vissza számként. Ha törölsz 1 elemet, akkor tudod hogy melyik volt az (az éppen kijelölt elemet a List1.Text függvénnyel kérdezheted le. Amit már írtam régebben hogy a kijelölt elem indexe, ugyanott lekérdezhető az értéke is ezzel) Mivel az éppen kijelöltet fogod törölni, ezt az értéket átadod ennek a függvénynek, és visszakapod a számértékét integerben.
Private Sub List1_Click()
MsgBox List1.ListIndex
MsgBox ListItemFromText(List1.Text)
End Sub
Itt simán q-ból kivonod a ListItemFromText(List1.Text)-et, és kész. Az épp az az elem ami ki van jelölve, tehát az aktuális törlendő.
Új hozzászólás Aktív témák
- AMD Ryzen 9 / 7 / 5 9***(X) "Zen 5" (AM5)
- Milyen légkondit a lakásba?
- One otthoni szolgáltatások (TV, internet, telefon)
- NTFS, exFAT, FAT32 – Melyiket válaszd és miért?
- Hálózati / IP kamera
- Filmvilág
- Xiaomi Mi 11 Lite - 4G-vel vagy 5G-vel kéred?
- Internet Rádió építése (hardver), és programozása
- Apple asztali gépek
- Milyen TV-t vegyek?
- További aktív témák...
- Apple iPhone 8 64GB Kártyafüggetlen 1Év Garanciával
- Lenovo ThinkPad T570, T580, P51s, P52s eredeti Lenovo, külső akkumulátor eladó
- Latitude 5450 27% 14" FHD IPS Ultra 5 135U 16GB 512GB NVMe magyar vibill gar
- Új Steelseries Arctis Nova 4 Wireless gamer fejhallgató 1 év garanciával
- Urmet Dialog PA3120 180 wattos digitális erősítő 1 év garanciával
- ÁRGARANCIA!Épített KomPhone Ryzen 5 4500 16/32/64GB RAM RTX 3050 6GB GAMER PC termékbeszámítással
- Azonnali készpénzes Microsoft XBOX Series S és Series X felvásárlás személyesen/csomagküldéssel
- Prémium! Felsőkategória! Asus Rog Strix Maximus Z790 Hero Wi-fi Alaplap!
- Huawei Nova Y70 128GB, Kártyafüggetlen, 1 Év Garanciával
- Azonnali készpénzes nVidia RTX 3000 sorozat videokártya felvásárlás személyesen / csomagküldéssel
Állásajánlatok
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest
Cég: Promenade Publishing House Kft.
Város: Budapest