ok well i got a serial key and i know how to check it online so here is an example of what i want

Buttons & Box Added
Code:
Textbox1.text = "FE4M-I4D3-TD63-37S2; May 30,2010 " &VbNewline "BF2O-YW18-V3Q2-N3T5; May 36,2010" &VbNewline "5OEN-I7N2-MIR2-NU2U; May 33,2010


Button1.text = "Check"
Textbox2.text = "Enter Serial"
CODE:
Code:
private sub butn clk blah
      if textbox2.text = before ";" then
              msgbox("yup")
              'do stuff / make it only work on your comp
     end if
end sub