Ah no lei bien q decia Contraseña Aceptada perdon, mala mia, pero la idea ya la entendiste creo, quedaria asi:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If TextBox1.Text = "kikon" And TextBox2.Text = "premio" Then
Form2.Show()
Form2.Label1.Text = "CONTRASEÑA ACEPTADA"
else
Form2.Label1.Text = "CONTRASEÑA INCORRECTA"
end if
End Sub
Pero acuerdate que tu error era porque hiciste un if "corto" de una linea, si lo haces "estructurado" no tendras problemas nunca