Ввод логина и пароля для доступа к другой форме и сохранение учетной записи в файл - VB

Формулировка задачи:

Ребят пожалуйста помогите буду очень благодарен есть 3 формы Первая для входа логин/пароль,если лог и пар верни открывает вторую, а третия длыа регистрации нового логпароля (записать в файл)

Код к задаче: «Ввод логина и пароля для доступа к другой форме и сохранение учетной записи в файл - VB»

textual
Private Sub cmdOK_Click ()
' запись из текстбокс1 и текстбокс2 идет
Open App.Path + "log.dat" For Output As #1
Print #1, Text1.Text
Close #1
Open App.Path + "pas.dat" For Output As #1
Print #1, Text2.Text
Close #1
' проверим, не пустые ли текстбоксы
If Text1.Text = "" Or Text2.Text = "" Then
MsgBox "Введите новый логин и пароль!", vbCritical
End If
End Sub

14   голосов, оценка 3.929 из 5


СОХРАНИТЬ ССЫЛКУ