Private Function diretel.frm_input.Form_Load.3.txt
txt_ruta.Text = App.Path & "\\Diretel.mdb" FormVar1 = 0 End Sub