Legfrissebb anyagok
IT café témák
PROHARDVER! témák
Mobilarena témák
Új hozzászólás Aktív témák
-
blemidon
tag
A listboxban 5*6 stb formátumban vannak az elemek.
A következő függvény egy ilyen stringet alakít vissza az eredménnyé:
Private Function ListItemFromText(s As String) As Integer
Dim x As Integer
Dim s1 As String, s2 As String
s1 = Left(s, InStr(s, ''*'') - 1)
s2 = Right(s, InStr(s, ''*'') - 1)
ListItemFromText = Val(s1) * Val(s2)
End Function
Meghyvod az épp törölni kívánt listelemmel, és visszaadja hogy mennyi annak a számértéke, ezt már ki tdod vonni a q-ból.
Új hozzászólás Aktív témák
Aktív témák
- Külpolitika
- eBay-es kütyük kis pénzért
- Apple iPhone 15 - a bevált módszer
- Kerékpárosok, bringások ide!
- Macska topik
- Samsung Galaxy S23 és S23+ - ami belül van, az számít igazán
- sziku69: Fűzzük össze a szavakat :)
- iPhone topik
- ASUS ROG Ally
- Íme az Assassin's Creed Shadows első előzetese
- További aktív témák...
Új prémium hirdetések
- Üzletből, garanciával, Macbook Air Retina 13" 2020, 8GBRAM 256GB SSD magyar bill
- Lenovo ThinkStation P330 Workstation: 3D tervezésre (CAD), videó vágásra, animációk készítésére(DCC)
- ASUS ROG STRIX RTX 3070 8GB
- Eladó ASUS ROG STRIX SCAR II GL704G kishibás gamer notebook
- ÚJ! // ÁR ALATT! // Edifier S3000 MK II // Muziker garancia
Új ingyenes hirdetések
Állásajánlatok
Cég: Alpha Laptopszerviz Kft.
Város: Pécs
Cég: Ozeki Kft.
Város: Debrecen