private sub Form_Load( )

---

General information

Full name	frmLogin.Form_Load
Access	private
Overload of
Purpose	Initializes the fields of the dialog box with the default values
Comment	This dialog box allows the user to log on to the database. If the user is allowed to access to this application, Visual Guard loads the user rights.
Prototype	private sub Form_Load( )
History	NOVALYS - 2001/10/20 - Creation

Local variables

lSize	Long
sBuffer	String

Source code

Private  Sub Form_Load() '************************************************************************ ' Purpose : Initializes the fields of the dialog box with the default values ' Description : This dialog box allows the user to log on to the database. ' If the user is allowed to access to this application, Visual Guard loads the user rights. ' Subject : GUI ' History : NOVALYS - 2001/10/20 - Creation '************************************************************************      Dim sBuffer As  String      Dim lSize As  Long     txtUserName.Text =  "Admin" End  Sub

Referenced classes

Full name

txtUserName