Ú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
Hirdetés
- AMD Ryzen 9 / 7 / 5 9***(X) "Zen 5" (AM5)
- Honor 200 Pro - mobilportré
- Autós topik
- Luck Dragon: Asszociációs játék. :)
- Ilyen lesz a Fairphone 6
- One mobilszolgáltatások
- általános iskolai rendszergazda
- Tudományos Pandémia Klub
- Steam topic
- A fociról könnyedén, egy baráti társaságban
- További aktív témák...
- MacBook Pro 14" M1 MAX - 32GB / 1TB (2021) - Cseh billentyűzet - 224 ciklus / 88% - 1 év garancia
- Új - Macbook Pro 13" M1 - 2020, 16GB RAM, 1 TERA, touchbar - Apple garancia (106)
- Macbook Pro 13" M1 - 2021 gyártás, 16/512GB, touchbar - garancia (56)
- Macbook Pro 13" M1 - 2021 gyártás, 512GB, touchbar - garancia (63)
- BenQ LW650 3D Lézer WIFI DLP Projektor -4000 ANSI Lumen - 20E óra élettartam - USB-C - WXGA 1280x800
- 0% THM 3 havi részlet! Beszámítás, 27% áfa, Sapphire Nitro+ RX 9070XT 16GB készletről
- BESZÁMÍTÁS! Gigabyte H610M i5 13400F 16GB DDR4 512GB SSD RX 6700XT 12GB DeepCool MATREXX 40 650W
- BESZÁMÍTÁS! ASUS A520M R5 5600X 16GB DDR4 512GB SSD RTX 3060Ti 8GB Rampage SHIVA Enermax 650W
- DELL Thunderbolt Dock - WD19TB modul 02HV8N (ELKELT)
- AKCIÓ! VALVE INDEX virtuális valóság szemüveg garanciával hibátlan működéssel
Állásajánlatok
Cég: PC Trade Systems Kft.
Város: Szeged
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest