تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] سؤال خاص
#1
اريد انشاءform متكون من عدتframe وcommand واحيدة وعند الضغط علىcommand مرة تضهر frame1 وعند الضغط مرة ثانية تضهرframe2وعند الضغط للمرة الثالث تضهر frame3 الى اخر frame يعني انشاءcommand التالي او command السابق
الرد
تم الشكر بواسطة:
#2
.....

إذا كانت الـ Frame بالأسماء أجعل الأول Visible=True والباقية Visible=False
كود :
Private Sub Command1_Click()

    If Frame1.Visible Then
        Frame1.Visible = False
        Frame2.Visible = True
        
    ElseIf Frame2.Visible Then
        Frame2.Visible = False
        Frame3.Visible = True
        
    ElseIf Frame3.Visible Then
        Frame3.Visible = False
        Frame1.Visible = True
        
    End If
    
End Sub

إذا كانت الـ Frame مصفوفة أجعل الأول Visible=True والباقية Visible=False
كود :
Private Sub Command1_Click()

    If Frame1(0).Visible Then
        Frame1(0).Visible = False
        Frame1(1).Visible = True
        
    ElseIf Frame1(1).Visible Then
        Frame1(1).Visible = False
        Frame1(2).Visible = True
        
    ElseIf Frame1(2).Visible Then
        Frame1(2).Visible = False
        Frame1(0).Visible = True
        
    End If
    
End Sub

.....
الرد
تم الشكر بواسطة:
#3
مرفق التطبيق لمشاركة الاخ VBnet

الف شكر لك اخى ...


الملفات المرفقة
.rar   VBnet.rar (الحجم : 8.69 ك ب / التحميلات : 51)
الرد
تم الشكر بواسطة:
#4
سؤال جميل
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  سؤال في شاشة عرض البرنامج tighrmte 3 89 20-02-19, 07:13 PM
آخر رد: tighrmte
  سؤال في تحزيم البرنامج tighrmte 6 131 11-02-19, 09:57 PM
آخر رد: tighrmte
  سؤال في اداة msflixgrid tighrmte 2 75 04-02-19, 11:37 PM
آخر رد: tighrmte
  سؤال حول البحث في combobox tighrmte 3 175 27-01-19, 11:08 PM
آخر رد: عبدالله الصافي
  سؤال بخصوص النقط والفواصل العشرية وغيرها في قاعدة البيانات hannileo 3 133 24-01-19, 01:58 PM
آخر رد: عبدالله الصافي
  [سؤال] سؤال عن اداءة ActiveReport الخاصة بالتقرير في vb6 محمد حمد محمد 4 162 16-01-19, 01:26 PM
آخر رد: محمد حمد محمد
  سؤال في اداة msflixgrid tighrmte 2 108 16-01-19, 01:22 AM
آخر رد: tighrmte
  [vb6.0] سؤال بخصوص كريستال ريبورت vbahmed_net 0 102 02-01-19, 03:31 AM
آخر رد: vbahmed_net
  سؤال - كيف يتم تحويل المصفوفه الثنائيه الى احاديه اسامه الجبوري 5 214 01-01-19, 04:44 PM
آخر رد: عبدالله الصافي
  سؤال عن ارسال او استقبال صورة في vb6 محمد حمد محمد 1 139 22-12-18, 01:52 AM
آخر رد: elgokr

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


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم