30-09-12, 12:49 AM
(آخر تعديل لهذه المشاركة : 30-09-12, 12:53 AM {2} بواسطة هنودي الجميلي.)
كود :
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