Membuat Password sederhana dg VB 6.0

===============================================
private sub login_click()
username = "princeiva"
password = "princeiva"

if user = username then
  if pass = password then
     form2.show
  else
     msgbox("Password Anda Salah")
  end if
else
  msgbox("Username ANda Salah")
end if

end sub()


private sub ulang_click()
username = ""
password = ""
end sub()

private sub keluar_click()
end
end sub()
==============================================