منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[VB.NET] Start / Pause / Stop - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [VB.NET] Start / Pause / Stop (/showthread.php?tid=3412)

Start / Pause / Stop - ابراهيم مراد - 07-07-14

السلام عليكم كيف عمل Start / Pause / Stop
فى الفورم

انا مستخدم كود التاكد من الاتصال بالانترنت هالكود
PHP كود :
If My.Computer.Network.IsAvailable Then
 
    frmMain.Show() 'shows my application's main form
    Me.Hide()
Else
    'if no connection then
 
    Dim result = MsgBox("Failed to establish connection!") ' show an error message
    If result = DialogResult.OK Then 'if button okay is pressed
        Application.Exit() 'exit the application!
    End If
End If 
اريد لو النت قطع يعمل توقف بدل خروج ولو النت اشغل يرجع يكمل

RE: Start / Pause / Stop - kslawy - 07-07-14

الأوامر Start / Pause / Stop

ما هي علاقتها بالكود اللي فوق ؟

RE: Start / Pause / Stop - ابراهيم مراد - 08-07-14

(07-07-14, 04:34 PM)kslawy كتب : الأوامر Start / Pause / Stop

ما هي علاقتها بالكود اللي فوق ؟
االكود متبرمج دداخل اكواد كتير متصله باللنت وتقوم بعمل اشياء مهمه وعند قطع النتت كل دا بيبوظ انا اريد نعمل تايمر دايم للكود وعند قطع النت يتووقف لحين رجوع النت

RE: Start / Pause / Stop - silverlight - 08-07-14

عليك ان تستخدم متغير من النوع Boolean لكي تتأكد أولا من أن الإتصال موجود أم لا
او علي سبيل المثال تبني دالة تسترجع منها تلك القيمة ثم بناء علي قيمة هذا المتغير يمكن أن تقوم بعمل ما تريد...غالبا لو أنك متصل مع الإنترنت هذا المتغير سوف يسترجع القيمة True

الكود يكون بالشكل التالي

كود :
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        If IsConnected() Then
            ' for example
            Me.Text = "Connected"
        Else
            ' do something Else
        End If
    End Sub

    Private Function IsConnected() As Boolean
        Return System.Net.NetworkInformation.NetworkInterface.GetIsNetworkAvailable()
    End Function


RE: Start / Pause / Stop - ابراهيم مراد - 08-07-14

(08-07-14, 05:02 AM)silverlight كتب : عليك ان تستخدم متغير من النوع Boolean لكي تتأكد أولا من أن الإتصال موجود أم لا
او علي سبيل المثال تبني دالة تسترجع منها تلك القيمة ثم بناء علي قيمة هذا المتغير يمكن أن تقوم بعمل ما تريد...غالبا لو أنك متصل مع الإنترنت هذا المتغير سوف يسترجع القيمة True

الكود يكون بالشكل التالي

كود :
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        If IsConnected() Then
            ' for example
            Me.Text = "Connected"
        Else
            ' do something Else
        End If
    End Sub

    Private Function IsConnected() As Boolean
        Return System.Net.NetworkInformation.NetworkInterface.GetIsNetworkAvailable()
    End Function
طيب ماهو ااناا مشكلتى اان عاوز اعمل لو النت فصل اكواد التنفيذ تتوقف لحد ما النت يرجع ثم يكمل

RE: Start / Pause / Stop - silverlight - 08-07-14

ربما تجد طلبك ف اللينك التالي

اللينك