It should be pretty easy.
Code:
<font size="2"><font color="#0000ff">Sub </font></font><font size="2">Globals</font>
<font size="2"><font color="#0000ff">End Sub</font></font>
<font size="2"><font color="#0000ff">Sub </font></font><font size="2">App_Start</font>
<font size="2">Form1.Show</font>
<font size="2"><font color="#0000ff">If</font></font><font size="2"><font color="#0000ff">FileExist</font></font><font size="2">("myapp.ini") = true then </font>
<font size="2"><font color="#0000ff"> FileOpen</font></font><font size="2">(c1,"myapp.ini",cRead)</font>
<font size="2"> parameter1 = </font><font size="2"><font color="#0000ff">FileRead</font></font><font size="2">(c1)</font>
<font size="2"> parameter2 = </font><font size="2"><font color="#0000ff">FileRead</font></font><font size="2">(c2)</font>
<font size="2"><font color="#008000"> '...</font></font>
<font size="2"><font color="#0000ff"> FileClose</font></font><font size="2">(c1)</font>
<font size="2"><font color="#0000ff">End</font></font><font size="2"><font color="#0000ff">if</font></font>
<font size="2"><font color="#0000ff">End Sub</font></font>
<font size="2"><font color="#0000ff">Sub</font></font><font size="2"> Form1_Close</font>
<font size="2"><font color="#0000ff">FileOpen</font></font><font size="2">(c1,"myapp.ini",cWrite)</font>
<font size="2"><font color="#0000ff">FileWrite</font></font><font size="2">(c1,parameter1)</font>
<font size="2"><font color="#0000ff">FileWrite</font></font><font size="2">(c1,parameter2)</font>
<font size="2"><font color="#008000">'...</font></font>
<font size="2"><font color="#0000ff">FileClose</font></font><font size="2">(c1)</font>
<font size="2"><font color="#0000ff">End</font></font><font size="2"><font color="#0000ff">Sub</font></font>