Translation from QBasic to Visual Basic 6.0

[djklocek]

Hello.
I have the code below and I have to translate it to VB 6.0. I'm in despair so could anybody help me with that? Thank you in advance and best regards

CLS
LOCATE 1, 1
DIM cmd$(100), resp$(1000)
’ Set up serial port for 9600 baud, even parity, 7 bits;
’ Ignore Request to Send and Carrier Detect; Send line feed,
’ enable parity check, reserve 1000 bytes for input buffer
’
OPEN "com1:9600,e,7,2,rs,cd,lf,pe" FOR RANDOM AS #1 LEN = 1000
’
’ Put the multimeter into the remote operation mode
PRINT #1, ":SYST:REM"
’
’ Query the multimeter’s id string
’
PRINT #1, "*IDN?"
LINE INPUT #1, resp$
PRINT "*IDN? returned: ", resp$
’
’ Ask what revision of SCPI the multimeter conforms to
PRINT #1, ":SYST:VERS?"
LINE INPUT #1, resp$
PRINT ":SYST:VERS? returned: ", resp$
’
’ Send a message to the multimeter’s display, and generate a beep
PRINT #1, ":SYST:BEEP;:DISP:TEXT ’34401A’"
’
’ Configure the multimeter for dc voltage readings,
’ 10 V range, 0.1 V resolution, 4 readings
PRINT #1, ":CONF:VOLT:DC 10,0.1;:SAMP:COUN 4"
’ Trigger the readings, and fetch the results
PRINT #1, ":READ?"
LINE INPUT #1, resp$
PRINT ":READ? returned: ", resp$
END

[si_the_geek]

Apart from the first two lines (which aren't needed) I think it should all work in a VB form as it is.

It would be better to use more conventional methods to communicate with the com port if you can (the MsComm control I think), but I'm afraid I dont have any examples for you - there are many on the forums tho, so a search should find something useful.