[2005] Do "x" only at first runtime

[fredde_jason]

Hello,

I'm making a program and I want to x code to be executed only at the first runtime. How could i make this? I have no idea what code it could be, but you could se how I mean with this code:

Private Sub TestIfFirstRun
If App.FirstRun Then         ' App.x is from vb6 but its just an example

         MsgBox("First Run")

Else

         GoTo start

End If

start:

MsgBox("Start")
End Sub

If anybody knows if it's any API or function for this please reply!