أنت غير متصل حاليًا، وفي انتظار الإنترنت الخاص بك ليقوم بإعادة الاتصال

كيفية إنشاء مؤشرات الترابط في Visual Basic .NET أو Visual Basic 2005

هام: تمت ترجمة هذا المقال باستخدام برنامج ترجمة آلية لشركة مايكروسوفت بدلاً من الاستعانة بمترجم بشري. تقدم شركة مايكروسوفت كلاً من المقالات المترجمة بواسطة المترجمين البشر والمقالات المترجمة آليًا وبالتالي ستتمكن من الوصول إلى كل المقالات الموجودة في قاعدة المعرفة الخاصة بنا وباللغة الخاصة بك. بالرغم من ذلك، فإن المقالة المترجمة آليًا لا تكون دقيقة دائمًا وقد تحتوي على أخطاء إملائية أو لغوية أو نحوية، مثل تلك الأخطاء الصادرة عن متحدث أجنبي عندما يتحدث بلغتك. لا تتحمل شركة مايكروسوفت مسئولية عدم الدقة أو الأخطاء أو الضرر الناتج عن أية أخطاء في ترجمة المحتوى أو استخدامه من قبل عملائنا. تعمل شركة مايكروسوفت باستمرار على ترقية برنامج الترجمة الآلية

اضغط هنا لرابط المقالة باللغة الانجليزية315577
الموجز
توضح هذه المقالة كيفية إنشاء مؤشرات الترابط في تطبيق Microsoft Visual Basic .NET أو Microsoft Windows 2005 Visual Basic. يوفر مساحة الاسم System.Threading الفئات التي يجب أن يكون لديك للعمل مع مؤشرات الترابط.

متطلبات

توضح القائمة التالية الأجهزة الموصى بها برامج البنية الأساسية للشبكة و حزم الخدمات التي تحتاجها:
  • Microsoft Windows 2000 أو Microsoft Windows XP
  • Microsoft Visual Basic .NET أو Microsoft Visual Basic 2005
تفترض هذه المقالة كنت معتاداً على المواضيع التالية:
  • برمجة Visual Basic .NET أو برمجة Visual Basic 2005
  • Visual Studio .NET أو بيئة التطوير المتكاملة Visual Studio 2005 (IDE)
  • بأزرار العامة مع المفوضين "و" مؤشر الترابط
  • بأزرار العامة مع Visual Basic .NET أو Visual Basic 2005

إنشاء تطبيق Visual Basic .NET أو 2005 Visual Basic مع مؤشرات الترابط

  1. بدء تشغيل Microsoft Visual Studio .NET أو Microsoft Visual Studio 2005.
  2. إنشاء مشروع Visual Basic تطبيق Windows جديد يسمى ThreadWinApp.
  3. إضافة عنصر تحكم زر إلى النموذج. تسمية الزر Button1 بشكل افتراضي.
  4. إضافة مكون ProgressBar إلى النموذج. تسمية شريط التقدم ProgressBar1 بشكل افتراضي.
  5. انقر بزر الماوس الأيمن فوق النموذج ثم انقر فوق عرض التعليمات البرمجية.
  6. إضافة العبارة التالية إلى بداية الملف:
    Imports System.Threading					
  7. إضافة معالج الحدث التالي انقر من أجل Button1:
    Private Sub Button1_Click( _    ByVal sender As System.Object, ByVal e As System.EventArgs) _    Handles Button1.Click    MessageBox.Show("This is the main thread")End Sub					
  8. إضافة المتغير التالي إلى فئة Form1:
    Private trd As Thread					
  9. أضف الأسلوب التالي إلى فئة Form1:
    Private Sub ThreadTask()    Dim stp As Integer    Dim newval As Integer    Dim rnd As New Random()    Do        stp = ProgressBar1.Step * rnd.Next(-1, 2)        newval = ProgressBar1.Value + stp        If newval > ProgressBar1.Maximum Then            newval = ProgressBar1.Maximum        ElseIf newval < ProgressBar1.Minimum Then            newval = ProgressBar1.Minimum        End If        ProgressBar1.Value = newval        Thread.Sleep(100)    LoopEnd Sub						
    ملاحظة: هذا هو رمز underlies مؤشر الترابط. هذا الرمز هو infinite حلقة ذلك زيادات عشوائيًا أو decrements القيمة في ProgressBar1 والانتظار ثم 100 مللي ثانية قبل أن يستمر.
  10. إضافة معالج الحدث Load التالية من أجل Form1. هذه التعليمة البرمجية إنشاء مؤشر ترابط جديد يجعل مؤشر الترابط مؤشر ترابط خلفية و ثم بدء تشغيل مؤشر الترابط.
    Private Sub Form1_Load( _    ByVal sender As System.Object, ByVal e As System.EventArgs) _    Handles MyBase.Load    trd = New Thread(AddressOf ThreadTask)    trd.IsBackground = True    trd.Start()End Sub					

تحقق من أنه يعمل

  1. لإنشاء التطبيق وتشغيله. لاحظ تغير القيمة في شريط التقدم بشكل عشوائي. هذا هو مؤشر ترابط جديد في العملية.
  2. توضح أن مؤشر الترابط الرئيسي مستقلة عن مؤشر الترابط يقوم بتغيير قيمة ProgressBar ، انقر فوق الزر في النموذج. مربع رسالة يعرض الرسالة التالية:
    This is the main thread							
    انتظر حتى الإدخال. لاحظ أن القيمة الموجودة في شريط التقدم يستمر في تغيير.

استكشاف الأخطاء وإصلاحها

في تطبيقات أكثر تعقيداً تأكد من مزامنة مؤشرات ترابط متعددة عند الوصول إلى متغيرات المشتركة. لمزيد من المعلومات، راجع بيان SyncLock والمواضيع ذات الصلة في وثائق "تعليمات Visual Basic على إنترنت".
متعددة مؤشرات الترابط

تحذير: تمت ترجمة هذه المقالة تلقائيًا

خصائص

رقم الموضوع: 315577 - آخر مراجعة: 12/06/2006 23:18:59 - المراجعة: 4.3

Microsoft Visual Basic 2005, Microsoft Visual Basic .NET 2003 Standard Edition, Microsoft Visual Basic .NET 2002 Standard Edition

  • kbmt kbvs2005swept kbvs2005applies kbhowtomaster KB315577 KbMtar
تعليقات
>did=1&t=">/html>�اط
  • العلامات التجارية
  • © 2016 Microsoft
  • /c1.microsoft.com/c.gif?DI=4050&did=1&t=">id=1&t=">