Hirdetés
- A legújabb iPhone kiegészítő egy zokni, amit magunkra akaszthatunk
- Samsung Galaxy Z Fold7 - ezt vártuk, de…
- Külföldi prepaid SIM-ek itthon
- Szívós, szép és kitartó az új OnePlus óra
- Bemutatkozott a Poco X7 és X7 Pro
- Miért fárad gyorsabban az iPhone akku, mint az androidos?
- Realme GT 2 - aláírjuk
- Amazfit Helio Strap – képernyőmentesen
- Apple iPhone 16 - ígéretek földje
- Samsung Galaxy S25 Ultra - titán keret, acélos teljesítmény
Új hozzászólás Aktív témák
-
#90999040
törölt tag
válasz
dani850430
#1364
üzenetére
Ha csak 1-szerű sorbarendezést szeretnél:
Private Sub Command2_Click()
Dim rendezendoe As Boolean
Dim szamlalo As Integer
Dim temp As String
Do
rendezendoe = False
For szamlalo = 0 To List1.ListCount - 2
If (List1.List(szamlalo) > List1.List(szamlalo + 1)) Then
rendezendoe = True
temp = List1.List(szamlalo)
List1.List(szamlalo) = List1.List(szamlalo + 1)
List1.List(szamlalo + 1) = temp
End If
Next
Loop Until rendezendoe = False
End Sub -
martonx
veterán
válasz
dani850430
#1332
üzenetére
Az biztos, hogy működik a dolog visszafelé is, INSERT sql paranccsal tudsz az adatbázisodba adatokat írni.
Léptetést rs.next-el tudsz csinálni, ha jól sejtem, vagy valami ilyesmivel, sose használtam VB6-ot.
-
shev7
veterán
válasz
dani850430
#1238
üzenetére
tenyleg nem.
-
martonx
veterán
válasz
dani850430
#1232
üzenetére
Oké, nincs is vele baj. Én a mai napig is rendszeresen VBscriptben programozok.
.Net-et csak komolyabb alkalmazások esetén veszem elő.
Viszont rendszeresen elcsodálkozok a VB6 életén. Így 2010-ben. -
martonx
veterán
válasz
dani850430
#1230
üzenetére
Jól látom, hogy VB6-tal próbálkozol?
-
martonx
veterán
válasz
dani850430
#1228
üzenetére
Szia!
Ha jól értelek, a list1 indexét kell lekérned (mondjuk selection changed eseménynél), és list2 indexét egyenlővé tenned. Esetleg valami kódot mellékelnél, hogy ne csak a levegőbe beszéljek?
-
martonx
veterán
válasz
dani850430
#1210
üzenetére
Röviden: erre nincs lehetőség.
Hosszabban: Kerekíteni tudsz 4 tizedes pontosságra, és úgy kiíratni.
Új hozzászólás Aktív témák
- ZIDOO médialejátszók
- VR topik (Oculus Rift, stb.)
- Hét új család perli az OpenAI-t öngyilkosság miatt
- Gigantikus fordulatot vett a GeForce RTX 50 Super sorozat törlése
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- Magga: PLEX: multimédia az egész lakásban
- Sony MILC fényképezőgépcsalád
- Xbox Series X|S
- Milyen billentyűzetet vegyek?
- A legújabb iPhone kiegészítő egy zokni, amit magunkra akaszthatunk
- További aktív témák...
- Dell Inspiron 14 5401 / i5-1035G1 / 8gb ddr4 / 500gb nvme ssd / jó akku/ magyar bill. / töltő
- HP ZBook Fury 15 G8 -i7 11850H/32GB/1TB SSD/RTX A3000
- MSI Cyborg 15 A13VF-862 RTX 4060 8GB / i7-13620H / 16GB DDR5 / 512GB SSD / Garancia
- LG OLED 65 C21 4k kitűnő állapotban
- Apple iPhone 13 Pro 128 GB Graphite 1 év Garancia Beszámítás Házhozszállítás
- GYÖNYÖRŰ iPhone 13 Pro 256GB Sierra Blue -1 ÉV GARANCIA - Kártyafüggetlen, MS3359
- Thinkpad L13 Yoga i5-10210U 16GB 512GB 13.3", Touch gyári magyar világítós bill 360 Gar.: 1év
- BESZÁMÍTÁS! 4TB Western Digital Red Pro SATA HDD meghajtó garanciával hibátlan működéssel
- Esztétikai hibás Apple iMac 19.2 i5-8500 Radeon Pro 560X 4GB 16GB 256GB SSD 21.5" 4K Retina
- BESZÁMÍTÁS! Intel Core i9 9900K 8 mag 16 szál processzor garanciával hibátlan működéssel
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest


