تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
( تم الحل ) ممكن تعديل هذا الكود
#1
كود :
Module Module1
    Sub Main()
        Console.WriteLine("  Hello ")
        Dim path = Application.StartupPath + "\s.txt"
        If (System.IO.File.Exists(path)) Then
            Process.Start(path)
        Else
            Console.WriteLine("File Not Found ")
End If
if Process."\s.txt open then
me.hide
form1.show
end if
}}}
تم الشكر بواسطة:
#2
اخي محمد
ماهي وظيفة هذا الكود ؟؟؟
ماهو طلبك من هذا الكود ؟؟
ربما نستطيع التوصل الى حل افضل اذا وضحت اكثر
}}}
تم الشكر بواسطة:
#3
تفضل اخي الكريم

كود :
Console.WriteLine("  Hello ")
        Dim path = Application.StartupPath + "\s.txt"
        If (System.IO.File.Exists(path)) Then
            Process.Start(path)
        Else
            Console.WriteLine("File Not Found ")
        End If
        For Each c As Process In Process.GetProcesses
            If c.MainWindowTitle = "s.txt - Notepad" Then
                Me.Hide()
                Form1.Show()
            End If
        Next
}}}
تم الشكر بواسطة:
#4
:: تم ايجاد الحل ::
}}}
تم الشكر بواسطة:



التنقل السريع :


يقوم بقرائة الموضوع: