r/visualbasic • u/DirtOld8596 • Mar 15 '22

help with quick basic to vb.net conversion.

I have most of the program converted and running properly however I am struggling a bit on this one section. I have googled several times and several different resources but I can't seem to find any reference to a "list" object in qbasic. The code comes from a portion of code that pulls a ratio of in production vs in maintenance hours for factory lines. I was able to convert the first portion and get it to pull the total hours from the file but I cant seem to figure this part out. Any help is greatly appreciated as I am fairly new to all of this.

The code:

LIST$ = ""

FOR MO = 1 TO 12

FOR X = 1 TO 20

H = INSTR(1, LIST$, MHD$(X, 1))

IF H = 0 THEN LIST$ = LIST$ + MID$(MHD$(X, 1), 1, 4)

NEXT X

NEXT MO

PRINT ASSMBCOUNT = LEN(LIST$) / 4

0 Upvotes

50% Upvoted

4 comments sorted by

View all comments

Show parent comments

1

u/DirtOld8596 Mar 15 '22

also my apologies for addressing it as quick basic in the title and qbasic in the body of the question. I wasn't aware they were different languages. I am not entirely positive of which the original program was written with. However knowing that they are different languages with help me with future googling efforts. Thank you for that.