[ابو محمد محمد محمد]

السلام عليكم ورحمة الله


الفكرة تمرير معاملات من موجه الاوامر دوس واقتناصها في الفيجوال ستوديو

في نموذج التحميل نكتب

كود :

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
       Dim args As String() = Environment.GetCommandLineArgs()
       'PictureBox1.Image = New Bitmap("img7.jpg")
       If args.Length > 1 Then
           PictureBox1.Image = New Bitmap(args(1))
           Label2.Text = args(1)

       End If
   End Sub

ثم نفتح موجه الاوامر ونكتب

كود :

C:\Users\viv\source\repos\ReavenDb\ReavenDb\bin\Debug\ReavenDb.exe img7.jpg

واذا كنا بداخل مجلد البرنامج فعلا نكتب

كود :

C:\ReavenDb.exe img7.jpg

   

فيتم استقبال المعامل المرسل ويتم جلب الصورة واظهار اسمها في الليبيل

وارجوا ان يفيدكم هذا

[Taha Okla]

وعليكم السلام ورحمة الله وبركاته

يعطيك العافية ..

للافادة : هذا الكود من أجل تشغيل الملفات من خلال السحب والافلات على البرامج المغلقة ..
يعني   : فيك تسحب الصورة وتضعها فوق الملف التنفيذي 
فـ بيفتح البرنامج ويعرض الصورة فيه..