• Home
 · 
• Custom Controls/Forms/Menus
 · 
• Count Times Form Opened the Easy Way, for initial Help, Password designation, etc.

Count Times Form Opened the Easy Way, for initial Help, Password designation, etc.

Count Times Form Opened the Easy Way, for initial Help, Password designation, etc.

Rate Count Times Form Opened the Easy Way, for initial Help, Password designation, etc.

• 1
• 2
• 3
• 4
• 5

(2(2 Vote))

'temp.txt with the number 1  
'in it. This will work with .dat, .ini, etc.  

Open "C:\\temp.txt" For Input As #1
Input #1, sFile
Text1.Text = sFile
Close #1
If Text1.Text = "1" Then
frmSplash.Show
frmThisFormName.Hide
'replace with this forms real name
Else
Exit Sub
End If
'on this form set the Text1.Text to " ", Visibility to False

'On the One-Time Form Place in the Form Load Sub

    Close #1
    Open "C:\\temp.txt" For Output As #1
    Print #1, Text1.Text
    
    Close #1

'On this form set the Text1.Text to "2", visibility to False
'This will change the number in the text file to 2 and will cause this One-'Time form not to open again.