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
- Akvarisztika
- AMD Ryzen 9 / 7 / 5 7***(X) "Zen 4" (AM5)
- It Takes Two - Már több mint 16 millió példányt adtak el a játékból
- Vigneau interaktív lokálblogja
- Azonnali informatikai kérdések órája
- Politika
- Futás, futópályák
- Autós topik látogatók beszélgetős, offolós topikja
- Crypto Trade
- Skoda, VW, Audi, Seat topik
- További aktív témák...
Új prémium hirdetések