Programozás VB6 -ban: Tippek és trükkök: 3 lépés

2024 Szerző: John Day | [email protected]. Utoljára módosítva: 2024-01-30 09:44

Szabadidőmben programozok, és elég jártas programozó vagyok a VB6 használatával. Könnyű, és még nem találok semmit, amire szükségem van ahhoz, hogy ezt megtehessem, bár néha bonyolult lehet a feladat végrehajtásához. Útközben sok bosszantó dolgot találtam, főleg úgy, ahogy bizonyos dolgokat számol. Tehát itt van egy összeállítás néhány dologról, amelyeket útközben tanultam. Arra kérem Önöket, ha bármilyen problémája van, tegyen megjegyzést, és megpróbálok további lépésekben segíteni.

1. lépés: Karakterláncok

A VB hogyan kezeli a karakterláncokat, néha zavaros. nulla kezdő karakterlánc az 1textb = közepén (texta, 2, 2) kezdődik, 5) ez teszi a textb = "defg" változót. Így van, ha a kiválasztani kívánt szöveg hosszabb, mint a rendelkezésre álló szöveg, amely az utolsó karakternél végződik, a programtól függően, akkor csapdákat kell elhelyezni a hibák elkerülése érdekében. ilyen csapda: textb = közepes (texta, 4, 5), ha len (textb) <5, akkor 'Len () visszaadja a karakterlánc hosszát, a <kevesebb kevesebbet akkormsgbox "szöveg túl rövid"' Üzenetdobozt mutat a stringexit sub 'Ez kilép az aloldalból, amiben vagy. befejezve a kódot. ha egy függvényben vagy, akkor az exit függvényt helyezed el, amely meghatározza a karakter helyét egy stringben az instr (Start, Stri ng1, karakterlánc2) texta = "abcdefg" textb = instr (1, texta, "c") 'ez megtalálja a c betűt a textatextb karakterláncban, amely most egyenlő 3MEGJEGYZÉS: Az Instr 0 (nulla) értéket ad vissza, ha nem találja meg a karaktert idegesítő, ha azt szeretné, hogy az "abcdefg" legyen "defgabc" texta = "abcdefg" textb = közepes (texta, 4, 4) és közepes (texta, 1, 3) Ez nem volt rossz, de most adjuk hozzá az instr. () függvények azt mondják, hogy egy karakterláncot egy függöny karakterre kívánja rendezni, de ez nem ugyanaz a pont minden alkalommal.) - instr (1, texta, "c") + 1) & mid (texta, 1, instr (1, texta, "c") - 1) jegyezze meg a len (texta) részt - instr (1, texta, " c ") + 1, mert az instr megszámolja a keresett karaktert, így visszalépsz egy karakterrel, így a mid () a keresett karaktert elsőként veszi fel a stringtextc -ben, így egyenlő a" cdefgab "textd = mid (textb, instr (1, textb, "c"), len (textb) - instr (1, textb, "c") + 1) & mid (textb, 1, instr (1, textb, "c") - 1) textd most egyenlő Az "cgfabde" segítségével megpróbálhat olyan karaktert találni, amely nem szerepel a stringtexta = "abcdefg" textc = mid (texta, instr (1, texta, "h"), len (texta) - instr (1, texta, "h")) + 1) & mid (texta, 1, instr (1, texta, "h") - 1) hibaüzenetet kap, mert a Mid () kezdő része nem lehet = 0, mivel a karakterláncok 1 -től kezdődnek, így el kell kerülni a futási időt hiba. ez az egyik módja annak, hogy ezt tegyük meg, "h") + 1) & mid (texta, 1, instr (1, texta, "h") - 1) else 'csak egy másik utasítás per helyzet a stringend ifEz nagyjából mindent összefoglal, amit a húrokról tudni kell

2. lépés: Karakterek konvertálása

HEX: Az egyik, amit a hét elején találtam, a Hex (szám) függvényhez kapcsolódik, a szám hossza nem számít. Hatszögű karakterláncot ad vissza (11111111) "A98AC7" értéket ad vissza, amikor egy ascii karaktert hexadecimálisra konvertál, akkor a dotexta = "a" hex (asc (texta)) "61" texta = "k" hex (asc (texta)) "6B" értéket ad vissza, a karakterlánc 2 karakter lesz a legtöbb ASCI karakterhez, kivéve, ha a érték 16 akkor csak 1 karaktert ad vissza, ha azt szeretné, hogy mindegyikük 2 karakterből álljon, a következőképpen járjon el: textb = hex (asc (texta)), ha len (textb) = 1 thentextb = "0", és textb ', amely nulla, nem a tőke oend, ha

3. lépés: Fájlszerkesztés

egy fájl megnyitásához egy freefile -re van szüksége, és egy filenamegfile = FreeFile 'gfile most a következő elérhető freefilec = "c: / test.txt", akkor a fájl megnyitásának 4 módja van Input - Csak olvasni lehet. Kimenet - Csak írhat, és törli a fájlt, ha létezik. kocsi visszatérés és sorbevitel utolsó karaktereiFüggelék - Csak írni lehet. hozzáadódik a meglévő fájlhoz. kocsi visszatérés és sorbevitel utolsó karaktereiBináris - Olvasás és írás. nagyon precíz. az egyetlen, amit most használok. a file.dim stro mint string 'erre szükség van, vagy hiba lép fel 'A bináris fájl megnyitásakor meg kell mondania, hogy mekkora szöveg hosszúságú lof (gfile) visszaadja a gfile hosszúságát, és a szóköz $ () egy sor szóközt ad vissza a beírt szám hosszúságával, #gfile, 1, stro 'a fájl számából, kezdő bájtból, változóból menteni. és csak a Closed #gfilestro változó hossza töltődik be most a test.txt fájlba. információkat helyezhet fájlba byffile = FreeFilestro = "New line" & VbCrLf & stro 'hozzáadja az "New line" és a carraige return and linefeed ezt követi az eredeti textopen c bináris fájlként, mint #ffilekill cput #file, 1, stro 'put felülírja a korábbi információkat, ha a fájl egyre kisebb lesz, először meg kell ölnie a fájlt, ami törli zárja be A put függvénnyel azt találtam, hogy hibákat tartalmaz, ha megpróbál egy karaktert beírni, mint például #fájl, 133, chr (1) 'ez helyettesíti a 133 -as bájtban lévő karaktert 1 vagy hexa 0x01 karakterrel. tette hozzá valójában hexa 0x08000100000001, ami furcsa. Ezt úgy oldottam meg, hogy betöltöttem a fájlt egy változóba, és végrehajtottam a karakterláncot modsi = 133stro = mid (stro, 1, i - 1) & chr (1) & mid (stro, i + 1, len (stro) - i), majd #file, 1, a stroth tökéletesen működött