WebBrowser1.document.GetElementById("Website textbox ID here").SetAttribute("value", TextBox1.Text) '
WebBrowser1.document.GetElementById("Website textbox ID here").SetAttribute("value", TextBox2.Text) '
WebBrowser1.document.GetElementById("Website textbox ID here").SetAttribute("value", TextBox3.Text) '


Dim Example as string = "code1 code2 code3" Dim codes() as string = Split(Example," ") for i = 0 to codes.length - 1 msgbox(codes(i)) next
for i = 0 to codes.length - 3 step 3 msgbox(codes(i)) msgbox(codes(i+1)) msgbox(codes(i+2)) next
Dim Example as string = "code1 code2 code3 code4 code5 code6" Dim c() as string = Split(Example,vbnewline) for i = 0 to c.length - 1 dim codes() as string = Split(c(i)," ") msgbox(codes(0)) msgbox(codes(1)) msgbox(codes(2)) next