09-07-20, 02:37 AM
(آخر تعديل لهذه المشاركة : 09-07-20, 02:51 AM {2} بواسطة Mohamad Anan.)
مرحبا أخي الكريم
لتفادي الخطأ في حال تم فتح البرنامج مباشرة
كود :
Private Sub Form1_Load()
TextBox1.Text = System.IO.Path.GetDirectoryName(My.Application.CommandLineArgs(0).ToString())
End Subلتفادي الخطأ في حال تم فتح البرنامج مباشرة
كود :
Private Sub Form1_Load()
If My.Application.CommandLineArgs.Count > 0 Then
TextBox1.Text = System.IO.Path.GetDirectoryName(My.Application.CommandLineArgs(0).ToString())
End If
End Sub
