Hirdetés
- Luck Dragon: Asszociációs játék. :)
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- NASsoljunk: ZyXEL NSA-310 és az FFP
- Lalikiraly: Kaáli Autó-Motor Múzeum
- sziku69: Fűzzük össze a szavakat :)
- sziku69: Szólánc.
- V.Milán: A síntrabant, a falunap és Jézus esete
- eBay-es kütyük kis pénzért
- Sub-ZeRo: Euro Truck Simulator 2 & American Truck Simulator 1 (esetleg 2 majd, ha lesz) :)
- Lalikiraly: Astra kalandok @ Negyedik rész
Ú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
- Motoros topic
- Fotók, videók mobillal
- Kompakt vízhűtés
- Kínai és egyéb olcsó órák topikja
- Luck Dragon: Asszociációs játék. :)
- Xbox Series X|S
- Intel Core Ultra 3, Core Ultra 5, Ultra 7, Ultra 9 "Arrow Lake" LGA 1851
- Milyen asztali (teljes vagy fél-) gépet vegyek?
- Call of Duty: Black Ops 7
- Kedvenc zene a mai napra
- További aktív témák...
- HP Thunderbolt-dokkoló, 120W G4 (4J0A2AA)
- GYÖNYÖRŰ iPhone 14 128GB Midnight -1 ÉV GARANCIA - Kártyafüggetlen, MS3972, 100% Akkumulátor
- HIBÁTLAN iPhone 13 Pro 128GB Graphite -1 ÉV GARANCIA - Kártyafüggetlen, MS3747, 100% Akkumulátor
- ÁRGARANCIA!Épített KomPhone Ryzen 7 9800X3D 64GB RAM RTX 5090 32GB GAMER PC termékbeszámítással
- iKing.Hu - Honor 400 Pro Black Stílusos csúcsteló, nagy tárhely 12/512 GB,3 hónap gari!
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest

