[touati]

اريد انشاءform متكون من عدتframe وcommand واحيدة وعند الضغط علىcommand مرة تضهر frame1 وعند الضغط مرة ثانية تضهرframe2وعند الضغط للمرة الثالث تضهر frame3 الى اخر frame يعني انشاءcommand التالي او command السابق

[vbnet]

.....

إذا كانت الـ 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

.....

[king2512010]

مرفق التطبيق لمشاركة الاخ VBnet

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

[kum2002]

سؤال جميل