Q-basic

Is er hier iemand die een Q-basic program kan omzetten naar een visual basic program? (het program is niet echt groot).
Als er iemand dat kan zal ik het bestand hier achterlaten.

zover ik weet bestaat zoiets niet...

misschien zou ik het wel kunnen "vertalen" naar VB

OP zich is dat niet moeilijk, probleem is alleen de windows interface is compleet nieuw en dus niet te vergelijken met QBasic. Dus omzetten is opzich best wel mogelijk.

Heb je echter commando's in je programma als IN, OUT, PEEK en POKE, dan vergeet het maar dat dat zomaar gaat, dan heb je daar eerst weer een DLL, OCX o.i.d. nodig, gezien VB die termen niet kent, en NT, 2k, XP dat ook nog eens extra proberen tegen te houden.

De 1e versie van VB had daar geloof ik een progje voor.
Als ik ff zoek met google op: 'qbasic to vb converter'
krijg ik al een 450 hits naar diverse progjes.

Maar wat heeft dit met electronica te maken?

Op 20 maart 2003 22:56:04 schreef Hugo Welther:
Maar wat heeft dit met electronica te maken?

Het is voor mijn elektronicaschakeling aan te sturen via de computer

Weet wel dat als je elektronica aanstuurt over andere poorten dan de serieele COM poorten en/of LPT printerpoorten dit in Visual Basic niet 'zomaar' meer is te doen, hiervoor heb je drivers nodig.
In VB bestaat bijv. INP en OUT niet meer.
Je kunt dus niet meer rechtstreeks een willekeurige poort aanspreken met bijv. OUT 785,x.

Hier is de qbasic versie:

REM Demonstratieprogramma voor aansturing van het puntmatrix-
REM display met LED's in een 5x7 matrix
REM De tekst wordt van rechts naar links geschoven tot
REM het display helemaal leeg is
REM Dan volgt een pauze van 1 s en het geheel wordt herhaald
REM tot er een toets wordt ingedrukt
REM -------------------------------------------------------
REM Openen COM-poort en initialisatie
REM -------------------------------------------------------
OPEN "COM2: 9600,N,8,1,CS,DS" FOR OUTPUT AS #1
PRINT #1, CHR$(12);
REM -------------------------------------------------------
CLS
LOCATE 10, 10
PRINT "Demoprogramma voor looplicht"
LOCATE 12, 10
PRINT "Druk op een toets om te stoppen"
Z$ = "Door Andreas Koehler voor ELEKTUUR ontworpen."
REM -------------------------------------------------------
REM Output-lus
REM -------------------------------------------------------
M2: V = 0
M3: FOR ZA = V + 1 TO V + 12
PRINT #1, MID$(Z$, ZA, 1);
NEXT ZA
V = V + 1
FOR ZT = 1 TO 50000
NEXT ZT
PRINT #1, CHR$(12);
IF V < LEN(Z$) THEN GOTO M3
SLEEP (1)
A$ = INKEY$
IF A$ = "" GOTO M2
END

wie zou deze voor mij willen omzetten in VB(6)

je hebt voor de seriele poort een contol genaamd mscomm control.