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

كيفية استخدام معالج ترقية Visual Basic

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

اضغط هنا لرابط المقالة باللغة الانجليزية317885
الموجز
توضح هذه المقالة خطوة بخطوة حول كيفية إنشاء بسيط تطبيق Visual Basic 6.0، وترقية ثم التطبيق إلى Visual Basic .NET أو 2005 Visual Basic باستخدام معالج ترقية Visual Basic في Visual Studio.net أو في Visual Studio 2005.

ملاحظة يتم تضمين معالج ترقية Visual Basic.net في Visual استوديو.net الفنية.

ملاحظة لقد تم تحسين Visual Basic 2005 معالج الترقية من الإصدارات السابقة من Visual Basic. back to the top

متطلبات

وصف للعناصر التالية الأجهزة الموصى بها برامج، البنية التحتية للشبكة، والمهارات والمعرفة وحزم الخدمة ستحتاج:
  • Microsoft Windows 2000 Professional (أو ملقم)، أو Microsoft Windows XP Professional (أو ملقم) مع.net Framework تثبيت
  • Microsoft Visual Basic 6.0
  • Microsoft SQL Server 7.0 أو الأحدث مع Northwind قاعدة البيانات، الأذونات المناسبة وقيم معرف المستخدم وكلمة المرور
المعرفة المسبقة المطلوبة:
  • معرفة كيفية إنشاء تطبيقات باستخدام عام ل visual Basic 6.0
back to the top

استخدم Visual Basic معالج ترقية

تظهر الخطوات التالية كيفية إنشاء مشروع Visual Basic بسيطة تطبيق 6.0، وترقية ثم التطبيق إلى.net Visual Basic أو Visual Basic 2005 باستخدام معالج ترقية Visual Basic في Visual Studio.net أو في Visual Studio 2005:
  1. في القائمة ابدأ ، أشر إلى البرامج، وأشر إلى Microsoft Visual Studio 6.0، وثم انقر فوق Microsoft Visual Basic 6.0.
  2. في مربع الحوار مشروع جديد ، انقر فوق EXE قياسي، ومن ثم انقر فوق فتح.
  3. يستخدم النموذج الأول في هذا التطبيق ADO لاسترداد مجموعة السجلات، ثم يعرض مجموعة السجلات في FlexGrid الهرمي Microsoft عنصر التحكم. في حقل الاسم في مربع الحوار خصائص ل Form1، اكتبفرمادو.
  4. في حالة عدم فتح صندوق الأدوات، من القائمة عرض ، انقر فوق مربع الأدوات.
  5. من مربع الأدوات، وضع MSHFlexGrid في النموذج حيث تملأ معظم النموذج. ترك مسافة في الجزء السفلي من النموذج لوضع زر.

    ملاحظة: إذا لم تشاهد رمز MSHFlexGrid في صندوق الأدوات، إضافتها إلى مربع الأدوات. انقر بالزر الأيمن مربع الأدوات، ثم انقر فوق المكونات. في مربع الحوار المكونات ، انقر لتحديد Microsoft الهرمي FlexGrid التحكم 6.0 (OLEDB) من قائمة المكونات المتوفرة، ومن ثم انقر فوق موافق.
  6. من مربع الأدوات، وضع CommandButton على النموذج التالي MSHFlexGrid. في الحقل تسمية توضيحية لمربع الحوار خصائص ، اكتب موافق.
  7. انقر بالزر الأيمن mADOومن ثم انقر فوق عرض التعليمات البرمجية. إضافة التعليمة البرمجية التالية، الذي يقوم بإنشاء اتصال قاعدة بيانات و إرجاع سجلات التي تحتوي على كافة البيانات من جدول " المنتجات " قاعدة بيانات Northwind.

    ملاحظة: في نموذج التعليمات البرمجية التالية، يجب تغيير معرف المستخدم =<username></username> و كلمة المرور =<strong password=""></strong> القيم الصحيحة. تأكد من أن معرف المستخدم لديه الأذونات المناسبة لإنجاز هذه العملية على قاعدة البيانات.
    Private Sub Command1_Click()    Unload MeEnd SubPrivate Sub Form_Load()    Dim cn As Connection    Set cn = New Connection    cn.ConnectionString = "Provider=sqloledb;Data Source=localhost;database=northwind;user id=<username>;password=<strong password>"    cn.Open        Dim rs As Recordset    Set rs = New Recordset    rs.CursorLocation = adUseClient    rs.Open "select * from products", cn        Set MSHFlexGrid1.DataSource = rsEnd Sub					
  8. اضغط CTRL + S لحفظ النموذج. من القائمة ملف ، انقر فوق حفظ باسم. في مربع الحوار حفظ باسم ، انقر فوق حفظ.
  9. في "مستكشف المشاريع"، زر الماوس الأيمن فوق مشروع 1وانقر فوق إضافة، وثم انقر فوق النموذج. انقر فوق فتح.
  10. في حقل الاسم مربع الحوار خصائص ، اكتب فرمكليببوارد.
  11. من مربع الأدوات، ضع مربع النص على النموذج. في حقل النص ، اكتب قفز الثعلب البنى السريع فوق البطيئة كلب.
  12. وضع CommandButton أسفل مربع النص. في الحقل تسمية توضيحية لمربع الحوار خصائص ، اكتب نسخة.
  13. ضع ثاني CommandButton على النموذج. في الحقل تسمية توضيحية لمربع الحوار خصائص ، اكتب لصق.
  14. انقر بالزر الأيمن فرمكليببواردومن ثم انقر فوق عرض التعليمات البرمجية. لصق التعليمة البرمجية التالية ل CommandButton انقر فوق أحداث. يستخدم هذا الرمز حافظة الكائن إلى الحصول على النص ولصقه:
    Private Sub Command1_Click()    Clipboard.SetText Text1.SelTextEnd SubPrivate Sub Command2_Click()    Text1.SelText = Clipboard.GetTextEnd Sub					
  15. اضغط CTRL + S لحفظ النموذج.
  16. النموذج الأخير تحتاج هو الشكل الرئيسي للتطبيق. في "مستكشف المشاريع"، زر الماوس الأيمن فوق مشروع 1وانقر فوق إضافة، انقر فوق النموذج، وثم انقر فوق فتح.
  17. في حقل الاسم مربع الحوار خصائص ، اكتب frmMain.
  18. من مربع الأدوات، وضع CommandButton على النموذج frmMain. في الحقل تسمية توضيحية لمربع الحوار خصائص ، اكتب ADO.
  19. ضع ثاني CommandButton على النموذج. في الحقل تسمية توضيحية لمربع الحوار خصائص ، اكتب الحافظة.
  20. انقر بالزر الأيمن frmMainومن ثم انقر فوق عرض التعليمات البرمجية. الأحداث، انقر فوق لصق التعليمات البرمجية التالية ل CommandButton إلى إظهار نموذجين الأخرى:
    Private Sub Command1_Click()    frmADO.ShowEnd SubPrivate Sub Command2_Click()    frmClipboard.ShowEnd Sub					
  21. اضغط CTRL + S لحفظ النموذج.
  22. في "مستكشف الحلول"، زر الماوس الأيمن فوق مشروع 1، ومن ثم انقر فوق خصائص مشروع 1. في الحقل " كائن بدء التشغيل "، انقر فوق frmMainومن ثم انقر فوق موافق.
  23. لإضافة مرجع إلى المكون ADO، ضمن القائمة مشروع ، انقر " مراجع". في قائمة المراجع المتوفرة، انقر لتحديد مكتبة كائنات بيانات Microsoft ActiveX (سوف تفعل أي إصدار 2.0 أو إصدار لاحق). انقر فوق موافق.
  24. لترجمة المشروع، من القائمة ملف ، انقر فوق جعله Project1.exe. انقر فوق موافق في مربع الحوار إنشاء مشروع (قبول اسم الملف الافتراضي).
  25. اضغط F5 لتشغيل التطبيق في وضع التصحيح.

    ملاحظة: لا تحتاج للتحقق من أن Visual Basic القديمة يتم تشغيل التطبيق دون أية مشاكل قبل الترقية.
  26. قم بإغلاق بيئة تطوير Visual Basic. في المطالبة بحفظ التغييرات على المشروع، انقر فوق نعم. استخدام الاسم الافتراضي وقم بحفظ المشروع.
  27. في القائمة ابدأ ، أشر إلى البرامج، وأشر إلى Microsoft Visual Studio.net، وثم انقر فوق Microsoft Visual Studio.net.
  28. في صفحة "ابدأ"، انقر فوق فتح المشروع. حدد موقع المجلد الذي يحتوي على مشروع Visual Basic 6.0 الملف الذي أنشأته للتو (عادة ": ملفات البرنامج مايكروسوفت البصرية" Studio\VB98). انقر فوق Project1.vdpومن ثم انقر فوق فتح.
  29. يكشف visual Studio.net أنه Visual القديمة المشروع الأساسية ويبدأ تشغيل معالج ترقية Visual Basic. يعرض المعالج وصف لكل خطوة كما كنت انتقل من خلال الخطوات بما يلي التسلسل:
    • إنشاء مشروع جديد فيه القائمة الخاصة بك المشروع تتم ترقية.
    • انسخ ملفات النموذج وملفات فئة جديدة المشروع.
    • تقديم تقرير ترقية الذي يسرد مكونات المشروع الذي نجحت عملية ترقية والمكونات التي لم الترقية بنجاح.

  30. انقر فوق التالي من خلال كل خطوة من الخطوات حتى تبدأ عملية الترقية. علامة تستغرق حوالي 30-60 ثانية لإكمال عملية الترقية.
  31. في "مستكشف الحلول"، انقر نقراً مزدوجاً فوق _UpgradeReport.htm. يعرض هذا التقرير نتائج الترقية. لاحظ أن كافة النماذج ما عدا فرمكليببوارد الترقية بدون أية مشاكل.
  32. قم بتوسيع frmClipboard.vb لعرض المشاكل. لم لا الترقية Clipboard.SetText و GetText بشكل صحيح. انقر فوق الارتباطات الموجودة في وصف لعرض كيفية تصحيح المشكلات.
  33. في "مستكشف الحلول"، لاحظ إبقاء كافة النماذج يتم تغيير أسمائها الأصلية، ولكن ملحق الملف من. frm إلى -vb.
  34. قم بتوسيع المراجع. علما بأن مراجع إلى كافة المكونات المطلوبة لاستخدام المكونات Visual Basic و ADO القديمة تمت إضافتها تلقائياً.
  35. زر الماوس الأيمن فوق أي شكل من الأشكال ومن ثم انقر فوق عرض التعليمات البرمجية. قم بتوسيع المنطقة دعم الترقية . يعرض هذا الجزء كيفية تكوين Visual Studio.net أو Visual Studio 2005 مختلف الخصائص والمتغيرات لاعتماد التعليمة البرمجية الذي تم ترقيته.
  36. في "مستكشف الحلول"، انقر بالزر الأيمن frmClipboard.vb، ومن ثم انقر فوق عرض التعليمات البرمجية. علما بأن هناك تعليقات توضع قبل الأسطر التي عدم الترقية.
  37. تغيير الأحداث Command1_Click و Command2_Click لما يلي:
    Private Sub Command1_Click(ByVal eventSender As System.Object, _    ByVal eventArgs As System.EventArgs) Handles Command1.Click        Clipboard.SetDataObject(Text1.Text)    End Sub    Private Sub Command2_Click(ByVal eventSender As System.Object, _    ByVal eventArgs As System.EventArgs) Handles Command2.Click        Text1.SelectedText = _            Clipboard.GetDataObject().GetData(GetType(System.String))    End Sub					
back to the top

أكمل رمز إدخالات القوائم

إتمام سرد التعليمات البرمجية (frmADO.frm)

Private Sub Command1_Click()    Unload MeEnd SubPrivate Sub Form_Load()    Dim cn As Connection    Set cn = New Connection    cn.ConnectionString = "Provider=sqloledb;Data Source=localhost;database=northwind;user id=<username>;password=<strong password>"    cn.Open        Dim rs As Recordset    Set rs = New Recordset    rs.CursorLocation = adUseClient    rs.Open "select * from products", cn        Set MSHFlexGrid1.DataSource = rsEnd Sub				
back to the top

إتمام سرد التعليمات البرمجية (frmClipboard.frm)

Private Sub Command1_Click()    Clipboard.SetText Text1.SelTextEnd SubPrivate Sub Command2_Click()    Text1.SelText = Clipboard.GetTextEnd SubComplete Code Listing (frmMain.frm)Private Sub Command1_Click()    frmADO.ShowEnd SubPrivate Sub Command2_Click()    frmClipboard.ShowEnd Sub				
back to the top

تحقق من أن يعمل التطبيق

  1. اضغط F5 لتشغيل التطبيق.
  2. عند مطالبتك بحفظ المشروع، انقر فوق موافق.
  3. في Form1، انقر فوق ADO. يظهر نموذج يحتوي على البيانات في شبكة. قم بإغلاق هذا النموذج.
  4. في Form1، انقر فوق الحافظة.
  5. انقر فوق نسخ.
  6. ضع نقطة الإدراج في مربع النص في بداية للنص، ثم انقر فوق لصق. يجب أن تشاهد النص الملصق.
back to the top

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

.NET Visual Basic تحول كبير من الإصدارات السابقة من ل visual Basic. للعديد من المشاريع، بعض العمل إعداد واسعة من المستحسن قبل الترقية. الرجوع إلى الوثيقة التالية للحصول على معلومات قد تساعدك على ترقية أكثر سهولة:
back to the top

مراجع

لمزيد من المعلومات، ارجع إلى Microsoft Developer التالية مقالات الشبكة (MSDN): back to the top

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

خصائص

رقم الموضوع: 317885 - آخر مراجعة: 07/02/2012 05:25:00 - المراجعة: 1.0

Microsoft Visual Basic 2005, Microsoft Visual Basic .NET 2003 Standard Edition, Microsoft Visual Basic .NET 2002 Standard Edition, Microsoft Visual Basic 6.0 Professional Edition, Microsoft .NET Framework 1.1

  • kbvs2005swept kbvs2005applies kbmigration kbhowtomaster kbmt KB317885 KbMtar
تعليقات
ck by $index" class="col-sm-6 col-xs-24 ng-scope"> Venezuela - Español
id=1&t=">>050&did=1&t=">mp;t=">