Keresés: - Visual Basic - PROHARDVER! Hozzászólások

Hirdetés

Legfrissebb anyagok

PROHARDVER! témák

Mobilarena témák

IT café témák

GAMEPOD témák

LOGOUT témák

Keresés

Új hozzászólás Aktív témák

#1066 VIC20 őstag Boolash #1065

Új Válasz 2008-11-26 08:30:14 #1066
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

VIC20

őstag

válasz Boolash #1065 üzenetére

Huh, most mindenféle utánanézés előtt megkérdem: szoktad használni a Word makrórögzítőjét? Nagyon hasznos tud lenni: megcsinálja ezeknek a szövegszerkesztős műveleteknek a kódját.
#1064 VIC20 őstag ArchElf #1063

Új Válasz 2008-11-21 19:27:18 #1064
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

VIC20

őstag

válasz ArchElf #1063 üzenetére

Köszönöm szépen a segítséget!
Kommentár a "Comment1"-hez: De mégis, milyen jó, hogy meg lehet kérdezni ilyesmit a hozzáértőktől egy ilyen fórumon, mint ez is, amely tulajdonképpen ezért van.
#1062 VIC20 őstag Jester01 #1058

Új Válasz 2008-11-18 20:06:37 #1062
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

VIC20

őstag

válasz Jester01 #1058 üzenetére

Elmondom, hogy is van ez nálam.
Van ugye a formon egy ListView vezérlő, ami eléggé el nem ítélhető módon a ListView1 nevet viseli.
Az inicializáló részben a következők történnek:
ListView1.ColumnHeaders.Add 1, , "Címke", 900
ListView1.ColumnHeaders.Add 2, , "Leírás", 8000
ListView1.ColumnHeaders.Add 3, , "Típus", 5000
ListView1.ColumnHeaders.Add 4, , "Dátum", 1500
Vagyis kap négy oszlopot. (Az első név félrevezető: a címke valójában a sorszámot jelenti.)
Ezeket a következőképpen töltöm fel.
'A listview vezérlő feltöltése
If Tombmeret > 0 Then
For i = 1 To Tombmeret
If AdatBazis(i).hasznalt = True Then
a$ = "A" & Str(i) 'Sajnos számot még füzér alakban sem fogad el a hülye listview vezérlő, ezért egy betű kell elé. De ez komoly, még str(i)-t sem enged magába tölteni.
FoAblak.ListView1.ListItems.Add , a$, Str(i)
FoAblak.ListView1.ListItems(a$).SubItems(1) = Trim(AdatBazis(i).leiras)
FoAblak.ListView1.ListItems(a$).SubItems(2) = Tipus_szoveggel(AdatBazis(i).tipus)
FoAblak.ListView1.ListItems(a$).SubItems(3) = AdatBazis(i).datum
End If
Next i
End If
A rendező rész a következő:
Private Sub ListView1_ColumnClick(ByVal ColumnHeader As ColumnHeader)
Dim a As Integer
a = ColumnHeader.Index - 1
ListView1.SortKey = ColumnHeader.Index - 1
If ListView1.SortKey = a Then
If ListView1.SortOrder = lvwAscending Then
ListView1.SortOrder = lvwDescending
ElseIf ListView1.SortOrder = lvwDescending Then
ListView1.SortOrder = lvwAscending
End If
End If
ListView1.Sorted = True
End Sub
Ezzel vidáman rendez pl. dátum szerint is oda-vissza, de az első oszlop (ami a sorszám lenne) a szokásos hibát produkálja: a 10 nem a 9 után jön, hanem az 1 után (ABC szerinti rendezés).
Mit lehet tenni?
#1057 VIC20 őstag Jester01 #1056

Új Válasz 2008-11-18 11:03:35 #1057
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

VIC20

őstag

válasz Jester01 #1056 üzenetére

Köszi a választ!
Hogyan gondoltad az oszlop típusát számmá alakítani?
A súgó azt mondja, a SortKey tulajdonságra, hogy:
Setting:
0 Sort using the ListItem object's Text property.
> 1 Sort using the subitem whose collection Index is specified here.
Nálam a rekordszámnál 0-ra jön ki a setting, mivel az van az első oszlopban, tehát szöveg alapján fog rendezni. A többi esetre nem mondja ki, de nem lehet, hogy ott is a text tulajdonság alapján rendez?
Akkor mit tehetek? Nekem kell megírni a rendező algoritmust, az majd törli a vezérlő teljes tartalmát, majd feltölti "kézzel" az elemeket?
#1054 VIC20 őstag

Új Válasz 2008-11-18 00:23:48 #1054
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

VIC20

őstag

Egy rövid kérdés: ha a ListView vezérlőben az első oszlop egy adatbázis rekordjainak a sorszámát tartalmazza, és én e szerint szeretném rendeztetni az elemeket, hogyan tudom elérni, hogy az 1 után a 2 következzen, ne a 11, 12... stb. ?
#1052 VIC20 őstag

Új Válasz 2008-11-12 14:16:07 #1052
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

VIC20

őstag

Tényleg, röviden össze tudja valaki foglalni, miért érdemes VB.NET-re váltani?
#1048 VIC20 őstag Goose-T #1044

Új Válasz 2008-11-10 13:22:33 #1048
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

VIC20

őstag

válasz Goose-T #1044 üzenetére

Hát, nem tudom, van-e olyasmi, ami miatt feltétlenül szükséges .NET-re váltanom. Arról annyit hallottam, hogy bonyolultabb és lassabb, több erőforrást zabál.
#1043 VIC20 őstag ArchElf #1042

Új Válasz 2008-11-05 11:14:11 #1043
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

VIC20

őstag

válasz ArchElf #1042 üzenetére

Köszi a tippeket!
Egyébként most miben programozol? Fejlettebb VB-ben, vagy úgy általában abbahagytad a VB-t? Csak azért kérdeztem, mert én most ezen gondolkodom. Megpróbáltam egy projektet átvinni VB2005 alá, de nem sikerült. Annyival eltérnek az újabb verziók? Annyira, hogy gyakorlatilag újra kell tanulni a programozásukat? Megéri?
#1041 VIC20 őstag

Új Válasz 2008-11-05 08:48:42 #1041
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

VIC20

őstag

Nem valami App.Path ?
#1040 VIC20 őstag ArchElf #1039

Új Válasz 2008-11-05 08:44:00 #1040
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

VIC20

őstag

válasz ArchElf #1039 üzenetére

Igen, ebbe a statikus-dinamikus dologba én is beleszaladtam, még az elején, így egyelőre statikus maradt. Az vigasztal, hogy a végén elég egyszerűnek ígérkezik lecserélni relatívra.
Lehet, hogy lamerség, de azért megkérdem, hol találom konkrétan a futó folyamat indítási könyvtárát? Köszi!
#1038 VIC20 őstag ArchElf #1037

Új Válasz 2008-11-04 12:09:31 #1038
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

VIC20

őstag

válasz ArchElf #1037 üzenetére

Az érdekelne, hogy hol van a kapcsolódási pont az installer és az installált program között.Vagyis honnan veszi át a program azokat az adatokat, hogy hova is telepítették, milyen beállításokkal?
#1036 VIC20 őstag ArchElf #1035

Új Válasz 2008-11-03 13:56:05 #1036
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

VIC20

őstag

válasz ArchElf #1035 üzenetére

Hát, igen, az első megoldás az lenne, hogy összecsomagolom, és használati utasításként mellé írom, hogy a c:\xyz könyvtárba KELL kitömöríteni, és csak oda, mert máshol nem működik. (Bár ez nem igazi megoldás.)
Valami szabvány telepítőre gondoltam; gondoltam, azzal nem lesz sok gond. Tartalmaznak az ilyenek valami módszert a registry írásra vagy más effélére?
#1034 VIC20 őstag

Új Válasz 2008-11-03 11:08:26 #1034
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

VIC20

őstag

Tapasztal VB programozók, tudtok segíteni?
Ha készítek egy programot, amit aztán föltelepít valaki, honnan fogja tudni az a program, hogy hova telepítették, milyen elérési úton keresse a konfigurációs fájlt, meg az adatfájlokat, amikkel majd dolgozni fog? Hogyan kell ezt beírni a kódba?
#1032 VIC20 őstag

Új Válasz 2008-10-22 10:20:25 #1032
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

VIC20

őstag

Sziasztok! Van valakinek ötlete az alábbi problémához?
Szeretnék külső programot meghívni egy VB programban, konkrétan egy RAR-os tömörítést szeretnék csinálni (biztonsági mentés). Van ugye ez a Shell() függvény, de az, ha jól tudom, nem várja meg, amíg a külső program lefut, és a visszatérési értéket sem adja vissza (errorlevel vagy ilyesmi).
Van valakinek megoldása? Köszi előre is!
#934 VIC20 őstag sonar #933

Új Válasz 2007-10-31 14:21:12 #934
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

VIC20

őstag

válasz sonar #933 üzenetére

Hát, igazából nem annyira VBA-specifikus a probléma. Most eszembe jutott valami, ha sikerül végiggondolnom, leírom az ötletet.
#932 VIC20 őstag sonar #931

Új Válasz 2007-10-26 10:39:17 #932
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

VIC20

őstag

válasz sonar #931 üzenetére

Elmondom részletesebben.
Word-ben szeretnék alkotni valamit, ami képes összerakni egy dokumentumot anélkül, hogy "előre ismerné" annak tartalmát. Ezt tartalmazná a szövegfájl. Tehát a VBA program csak bekérné a változókat, kiválasztaná a megfelelő txt fájlt, aztán ráengedné az értelmezőjét.
Leegyszerűsítve valahogy így:
HunyóNeve$, " a hunyó!"
És akkor a program szépen a HunyóNeve változóból tenné be, hogy "Józsika" vagy "Pistike".
Tehát az eredmény ilyesmi lenne:
Pistike a hunyó!
Igazából persze bonyolultabb a dolog. Papíron egy egyszerűbb HA... AKKOR... szerkezetet lefirkantottam már, de a változókra való hivatkozás jelenti a fő gondot.
Arra gondoltam, hogy valamiféle előzetes "rögzítés" azért kellene: vagyis a változóneveket azért fixálni kellene, tehát ugyanazokat a változókat kellene használni a programnak, mint amelyek a leíró fájlban szerepelnek. Aztán a programba meg írni kéne valami kezelőt, mondjuk egy függvényt, ami visszaadja az adott változó értékét. Ehhez gondolom minden változót egyenként fel kellene vinni, "meg kell tanítani" neki. Sok változónál ez baromira nagy munkának tűnik. Főleg, hogy új típusokat is bevezetnék (Pascal-os rekord-szerűségekre gondolok), ez még bonyolítaná is.
Esetleg van valami huszárvágás-szerű megoldás? (Hivatkozni a változóra egy füzérrel? Kis túlzással adatból kódot csinálni?)
#930 VIC20 őstag

Új Válasz 2007-10-24 22:35:42 #930
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

VIC20

őstag

Sziasztok! Lenne egy érdekes kérdésem:
Elég különleges módon szeretnék hivatkozni egy változóra. Nem a felhasználó beavatkozásán múlna a dolog, hanem egy állományból olvasnám be a nevét. Szerintetek van erre valamilyen módszer vagy valamilyen értelezőt kell írni hozzá?
#340 VIC20 őstag

Új Válasz 2006-02-17 11:14:42 #340
Új hozzászólás
Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
Privát üzenet küldése

VIC20

őstag

Nem tudom, találkozott-e már valaki ezzel: Win98-as géppel dolgozom, Office XP van rajta. Megpróbálom futtani kedvenc kis VBA-projektemet, erre csak egy hibaüzenet küld: Compile error in hidden module: bla-bla-bla. Megnyitom a DOT-fájlt, ekkor már értelmesebben reagál: Can't find project or library, és egy egyerű Date függvénynél akadt meg. Úgy tűnik, mintha alapvető VBA-s függvényeket nem tudna értelmezni.

Teljesen újratelepítettem az Office-t, eredmény semmi. Lehet, hogy a Windows-al van a hiba? Hiányzik valami DLL? Hol tárolhatja a VBA-értelmezőt a Windows?

Kösz a segítséget!