ok.....ma quesot: Command$
come lo uso?
ho fatto così:
codice:Private Sub Form_Load() Filename = Command$ If Filename <> "" Then F = FreeFile Open Filename For Input As F ' Open the file selected in the File Open About dialog box. frmEditor!txtEdit.Text = Input(LOF(F), F) Close F ' Close the file. ' frmEditor.mnuFileItem(3).Enabled = True ' Enable the Close command on the File menu. UpdateMenu frmEditor.Caption = "CodeWorld Editor - 1.0 : " + Filename Unload Me End If End Sub
ma mi dice bad file name

Rispondi quotando