|
| |
Visual-Basic Einsteiger| MsgBox erscheint, ohne dass die If-Bedingung erfüllt ist | |  | | Autor: bmcompufreak | | Datum: 20.12.05 15:24 |
| Hallo zusammen,
ich bin gerade ein kleines Progrämmchen am programmieren, dass auch eine Passwortabfrage enthält. Da ich aber erst vor ca. 2 Wochen mit VB angefangen habe (Grund dafür war Visual Studio 2005 Express) verstehe ich nicht so ganz, wo in meinem Code der Fehler ist.
PROBLEM:
Folgendes tritt nämlich auf:
In dieser Passwortabfrage kann man das Passwort ändern. Das bestehende Passwort ist bereits in der Registry abgelegt und soll jetzt verändert werden.
Falls aber das alte Passwort nicht mit dem String aus der Registry übereinstimmt, soll eine MsgBox mit dem Inhalt "Altes Passwort ungültig!" erscheinen.
Wenn ich aber jetzt das exakte alte Passwort, das neue Passwort und die Passwortwiederholung eintippe (die zweite Bedingung ist, dass das neue Passwort und die Wiederholung übereinstimmen) und auf OK klicke, kommt trotzdem die MsgBox "Altes Passwort ungültig".
Beim zweiten Versuch funktioniert aber alles.
ERKLÄRUNGEN:
ReadValue = Auslesen eines Registry Strings mittels einer vorher definierten Funktion
SaveValue = Schreiben eines Registry Strings mittels einer vorher definierten Funktion
Private Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) _
Handles Button1.Click
If TextBox1.Text <> nPass Then MsgBox("Das alte Passwort ist" & _
"ungültig!", MsgBoxStyle.Exclamation, "Passwort ungültig")
If TextBox2.Text <> TextBox3.Text Then MsgBox("Das neue Passwort und" & _
"die Wiederholung stimmen nicht überein!", MsgBoxStyle.Exclamation, _
"Passwort ungültig")
If TextBox1.Text = nPass And TextBox2.Text = TextBox3.Text Then _
SaveValue("Software\xxx\xxx", "pass", TextBox2.Text)
nPass = ReadValue("Software\xxx\xxx", "pass")
End SubIch hoffe ihr könnt mir helfen.
Vielen Dank im Voraus
bmcompufreak | |
 | Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.
 Einloggen | Neu registrieren |
 |
|
Neu! sevEingabe 3.0 
Einfach stark!
Ein einziges Eingabe-Control für alle benötigten Eingabetypen und -formate, inkl. Kalender-, Taschenrechner und Floskelfunktion, mehrspaltige ComboBox mit DB-Anbindung, ImageComboBox u.v.m. Weitere InfosTipp des Monats TOP Entwickler-Paket 
TOP-Preis!!
Mit der Developer CD erhalten Sie insgesamt 24 Entwickler- komponenten und Windows-DLLs. Die Einzelkomponenten haben einen Gesamtwert von 1866.50 EUR...
Jetzt nur 979,00 EURWeitere Infos
|
| |
|
Copyright ©2000-2025 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.
Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel
|
|
Sie sind aktuell nicht angemeldet.
