شبیه سازی برنامه نویسی html در vb6

[masaioki.ono]

سلام دوستان
من یک دکمه و دو فرم دارم میخوام که اگر کاربر این کد رو داخل تکست باکس مالتی لاین وارد کرد



در فرم دوم اونها رو نمایش بده نمایش بده .

عکس فرم یک و دو کنار هم

129402
تمامی چیزایی که توی فرم دوم هستن هاید شدن
این هم کدهای فرم یک .
Private Sub Command1_Click()
If Text1.Text = "<input id=Textbox type=text />" Then
Form2.Textuser.Visible = True
Form1.Hide
Form2.Show

If Text1.Text = "<input id=Password type=password />" Then
Form2.Textpassword.Visible = True
Form1.Hide
Form2.Show


If Text1.Text = "<input id=Submit type=submit value=submit />" Then
Form2.Textpassword.Visible = True
Form1.Hide
Form2.Show

End If
End If
End If

End Sub

Private Sub Command2_Click()
Form2.Show

End Sub



خوب حالا مشکل من اینکه اگر کاربر فقط این کدها رو نوشت اونها رو نمایش بده اما فقط تکست اولی رو نمایش میده

و میخوام که توی تکست باکس چون مالتی لاینه اگر در خطهای جداگانه نوشنه شدن اجرا بشه نه توی یک خظ مثلا

تکست یوزر
تکست پسورد
دکمه لاگین


اما موندم چیکار کنم میشه یکی این کدها رو کامل کنه لطفا

همش اررور میگیره کسی میدونه چطور میشه کاری کرد که اشکال نگیره . چون نمیخوام چیز دیگه ای رو جایگزین این کد کنم .