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

VB Code:
  1. CLS

  2. LOCATE 1, 1

  3. DIM cmd$(100), resp$(1000)

  4. ’ Set up serial port for 9600 baud, even parity, 7 bits;

  5. ’ Ignore Request to Send and Carrier Detect; Send line feed,

  6. ’ enable parity check, reserve 1000 bytes for input buffer

  7. ’

  8. OPEN "com1:9600,e,7,2,rs,cd,lf,pe" FOR RANDOM AS #1 LEN = 1000

  9. ’

  10. ’ Put the multimeter into the remote operation mode

  11. PRINT #1, ":SYST:REM"

  12. ’

  13. ’ Query the multimeter’s id string

  14. ’

  15. PRINT #1, "*IDN?"

  16. LINE INPUT #1, resp$

  17. PRINT "*IDN? returned: ", resp$

  18. ’

  19. ’ Ask what revision of SCPI the multimeter conforms to

  20. PRINT #1, ":SYST:VERS?"

  21. LINE INPUT #1, resp$

  22. PRINT ":SYST:VERS? returned: ", resp$

  23. ’

  24. ’ Send a message to the multimeter’s display, and generate a beep

  25. PRINT #1, ":SYST:BEEP;:DISP:TEXT ’34401A’"

  26. ’

  27. ’ Configure the multimeter for dc voltage readings,

  28. ’ 10 V range, 0.1 V resolution, 4 readings

  29. PRINT #1, ":CONF:VOLT:DC 10,0.1;:SAMP:COUN 4"

  30. ’ Trigger the readings, and fetch the results

  31. PRINT #1, ":READ?"

  32. LINE INPUT #1, resp$

  33. PRINT ":READ? returned: ", resp$

  34. END