[Resolved]Error On Exe Compile?!

[squakMix]

I have a program that runs perfectly in the vb6 Launcher, But when Compiled into an Exe, There Is an error when I Run my Options form. It must be In form load, But I cant Find anything. I get "Runtime error 13". Anybody know What This MIGHT refer to? Thanks!

[Bruce Fox]

Can you post the code that 'runs' the Option Form, and the Option Form Load code.

[squakMix]

Code that Runs It:

Private Sub Command1_Click()
Form3.Show
End Sub

Things that Happen On load:

Private Sub Form_Load()
Check2.Value = Form1.Label8.Caption 
'Form1.Label8.caption will
'have something Like "1" or "0"
Check1.Value = Form1.Label7.Caption
'Form1.Label7.caption will
'have something Like "1" or "0"
Form3INI = True 'boolean
Form3.Label1.Caption = Base.Caption 
 
Check1.Value = GetSetting(App.EXEName, "OPT1", "OPT12", "")
'has something like "1" or "0"
Check2.Value = GetSetting(App.EXEName, "OPT2", "OPT22", "")
'has something like "1" or "0"
 
If Check1 = Checked Then
 
Check1Checked = True 'boolean
 
Else
 
Check1Checked = False 'boolean
 
End If
 
If Check2 = Checked  Then 
 
Check2Checked = True 'boolean
 
Else
 
Check2Checked = False 'boolean
 
End If
 
End Sub

Thanks for the help. Im thinking that Maybe the setting, or the form1.label7 or label8.caption has something like "" and Is causing it to error.

[squakMix]

Yea, I did this:

Private Sub Form_Load()
MsgBox ("Form1.Label8.caption:" + Form1.Label8.Caption)
MsgBox ("Form1.Label7.caption:" + Form1.Label7.Caption)
MsgBox ("Setting OPT1, OPT12:" + GetSetting(App.EXEName, "OPT1", "OPT12", ""))
MsgBox ("Setting OPT2, OPT22:" + GetSetting(App.EXEName, "OPT2", "OPT22", ""))
 
 
Check2.Value = Form1.Label8.Caption
Check1.Value = Form1.Label7.Caption
Form3INI = True
Form3.Label1.Caption = Base.Caption
 
Check1.Value = GetSetting(App.EXEName, "OPT1", "OPT12", "")
Check2.Value = GetSetting(App.EXEName, "OPT2", "OPT22", "")
 
 
If Check1 = Checked Then
 
Check1Checked = True
 
Else
 
Check1Checked = False
 
End If
 
If Check2 = Checked Then
 
Check2Checked = True
 
Else
 
Check2Checked = False
 
End If
 
 
 
 
End Sub

and When i compiled the Exe, There was no value. Thanks for your help though.