Visual Basic 6 Login And Calc Tut Part2

Dim user As String Dim pass As String user = Text1.Text pass = Text1.Text If user = "admin" And pass = "admin" Then MsgBox ... Private Sub Command1_Click() If (LCase(Text1.Text)) = "admin" And (LCase(Text2.Text)) = "admin" Then MsgBox "Logged in ... module 1 Public Sub Creatuser() On Error GoTo A Dim user, pass As String user = Form1.Text3.Text pass = Form1.Text4.

Important details found

• Dim user As String Dim pass As String user = Text1.Text pass = Text1.Text If user = "admin" And pass = "admin" Then MsgBox ...
• Private Sub Command1_Click() If (LCase(Text1.Text)) = "admin" And (LCase(Text2.Text)) = "admin" Then MsgBox "Logged in ...
• module 1 Public Sub Creatuser() On Error GoTo A Dim user, pass As String user = Form1.Text3.Text pass = Form1.Text4.
• Reading the comments I thought to write out the logic for this program.

Why this topic is useful

A structured page helps reduce disconnected snippets by grouping the main subject with context, examples, and nearby entries.

Is the information always complete?

Not always. Some topics may need verification from official or primary sources.

How should readers use this information?

Use it as a starting point, then open related pages for more specific details.

What should readers check next?

Readers should check related pages, official references, or updated sources when details matter.