Eh cambiado la variable a "directorio", pero me sigue dando el mismo error
mi codigo es:
Private Sub Form_Load()
Dim X As Variant
Dim Directorio As String
Directorio = Command
If Directorio <> "" Then
RichTextBox1.LoadFile (Directorio)
X = MydsEncrypt.Encrypt(RichTextBox1.Text)
RichTextBox1.Text = X
Form2.Caption = Command & " ..:: [ Vizor De archivos Jez ] ::.."
End If
End Sub