Hirdetés
- Elektromos rásegítésű kerékpárok
- Luck Dragon: Asszociációs játék. :)
- GoodSpeed: 3I/Atlas: Üstökös vagy idegen civilizáció űrhajója?
- V.Milán: Lapdiffúzor nyomáseloszlása: gondoltad volna?
- Meggyi001: Több tucat Eiffel torony??? Igen, gyere, mutatom, hogy hol...
- gban: Ingyen kellene, de tegnapra
- eBay-es kütyük kis pénzért
- bambano: Bambanő háza tája
- Sub-ZeRo: Euro Truck Simulator 2 & American Truck Simulator 1 (esetleg 2 majd, ha lesz) :)
- Gurulunk, WAZE?!
Új hozzászólás Aktív témák
-
martonx
veterán
válasz
Zsargon89
#1481
üzenetére
VB.Net tud alapból mindenféle Serial Portot kezelni.
Az USB pedig nem más mint Universal Serial Bus, azaz egy serial port.
Még nagy guglizás sem kell hozzá, msdn-en egész jó példák vannak.
A kódod esetében már múltkor is pedzegettem, hogy nincs szükség benne a winapi hivatkozásokra.http://msdn.microsoft.com/en-us/library/system.io.ports.serialport.aspx#Y0
-
#90999040
törölt tag
válasz
Zsargon89
#1444
üzenetére
Elindítod a Vs 2008-at.
File -> New -> Project...
A megjelenő ablakban létrehozol egy Forms projektet.
Project -> Add Module...
A létrehozott modulba bemásolod a kódodat, majd megcsinálod vele, amiket előzőleg írtam.
A modulba ezután beleteszed ezt:Sub Main()
TEST()
End SubHa ez megvan, akkor Solution Explorer ablakban*** dupla katt a "My project"-re.
Itt az Application fülön az "Enable Application Framework" elől a pipát kiveszed.
Ugyanezen a fülön "Startup Object"-nél a "Sub Main"-t választod ki.
Ha mindent jól csináltál, akkor F5-re indulnia is kellene a programnak.***: ha nem látszik ez az ablak, akkor View -> Solution Explorer
-
martonx
veterán
válasz
Zsargon89
#1444
üzenetére
Az LPT-t nyomtatáshoz használod vagy valamilyen egyéb eszközt vezérelsz vele?
Ha nyomtatáshoz használod, akkor mégis csak a vbscript-es ötletemnél kellene maradni. Ha egyéb eszközt irányítasz vele, akkor tényleg érdemes .Net-esíteni. Ebben tudunk segíteni.
Visual Studio-ban is gondolom elég lesz egy Console application projekt.
-
#90999040
törölt tag
válasz
Zsargon89
#1424
üzenetére
Visual Basic 2008-ra javaslom a következőket:
A Long-okat cseréld le Integer-re.
Az inputboxokat pedig módosítsd így:
v = Integer.Parse(InputBox("Válasszon az alábbi lehetősékeg közüll" & Chr(13) & Chr(10) & "1- 6 számjegyű számláló" & Chr(13) & Chr(10) & "2- 7 számjegyű számláló"))Az Integer.Parse() (vagy más konverziós függvény) azért kell, mert Vb.net-ben az inputbox stringet ad vissza.
-
martonx
veterán
válasz
Zsargon89
#1424
üzenetére
Szia!
Javaslom neked a vbscriptet. Az 95%-ban kompatibils az office makróval.
Azaz a kódodat másold át notepad-be, majd mentsd le .vbs néven.
Ezt command line-ból cscript valami.vbs néven fogod tudni futtatni.Debugolni pedig cscript //X //D valami.vbs-ként fogod tudni, ha mégsem menne egy az egyben vbs-ként.
Új hozzászólás Aktív témák
- Kerékpárosok, bringások ide!
- Vezeték nélküli fejhallgatók
- Kormányok / autós szimulátorok topikja
- Fortnite - Battle Royale & Save the World (PC, XO, PS4, Switch, Mobil)
- VR topik (Oculus Rift, stb.)
- Hisense LCD és LED TV-k
- Apple MacBook
- Vivo X300 Pro – messzebbre lát, mint ameddig bírja
- Milyen széket vegyek?
- Akciókamerák
- További aktív témák...
- Dell Latitude 5420 14" FHD IPS i7-1185G7 16GB 512GB NVMe gar
- LOQ 15ARP9 15.6" FHD IPS Ryzen 7 7435HS RTX 4050 16GB 512GB NVMe magyar vbill gar
- Apple MacBook Air 13.6" M2, 16GB/256GB (MC7X4MG/A ) Éjfekete - 100% akku - Garancia
- Gigabyte GeForce 760 4 GB -os VGA kártya ! aKCIóó!
- Apple iPhone 13 Pro / 128GB / Kártyafüggetlen / 12Hó garancia / Akku : 100%
- Bomba ár! Dell Latitude E6220 - i7-2GEN I 8GB I 128SSD I 12,5" HD I HDMI I Cam I W10 I Garancia!
- AKCÓ! HTC VIVE Pro 2 virtuális valóság szemüveg garanciával hibátlan működéssel
- GYÖNYÖRŰ iPhone 13 Pro 256GB Sierra Blue -1 ÉV GARANCIA - Kártyafüggetlen, MS3361, 100% Akksi
- Gamer PC-Számíógép! Csere-Beszámítás! I7 13700F / RTX 4070Ti Super 16GB OC / 32GB DDR5 / 1TB SSD
- QNAP TS-870U-RP 8 lemezes Rack NAS
Állásajánlatok
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest
Cég: Laptopműhely Bt.
Város: Budapest

