Sorry! ok, i have a login form and you can also register a new username and password,
now if you forgot the your password you can retrieve, reset or change it from the other form
i'm using .urs file saving my username and password.

thank you

this is my code in register a new user using module

Public Sub TryLogin()
On Error GoTo A
Dim user, pass, RUser, Rpass As String
user = Form1.Text1.Text
pass = Form1.Text2.Text
Open App.Path & "/Users/" & user & ".urs" For Input As #1
Input #1, RUser
Input #1, Rpass
Close #1
If user = RUser Then
If pass = Rpass Then
GoTo Login
Else
End If
End If
MsgBox "Invalid Password", vbCritical, "Invalid Info"
Exit Sub
Login:
Form3.Show
Form1.Hide
Exit Sub
A:
MsgBox "Invalid Username", vbCritical, "Invalid Info"
End Sub