覆蓋面板與另一個

Private Sub frmitem_Load(sender As Object, e As EventArgs) Handles MyBase.Load 
    pnldeposit.Visible = False 
    pnlwithdraw.Visible = False 
End Sub 

Private Sub cmdideposit_Click(sender As Object, e As EventArgs) Handles cmdideposit.Click 
    pnldeposit.Visible = True 
    pnlwithdraw.Visible = False 
End Sub 

Private Sub cmdiwithdraw_Click(sender As Object, e As EventArgs) Handles cmdiwithdraw.Click 
    pnlwithdraw.Visible = True 
    pnldeposit.Visible = False 
End Sub

//我對此表單有問題。我想顯示第一個面板是成功的，但問題是顯示第二個面板。它不工作，即時通訊按鈕順便說一句。幫我。預先感謝您：D覆蓋面板與另一個

來源

2017-07-28 Arjim Jimenez

您是否嘗試過使用'BringToFront'方法？ – OneFineDay

我試過了，但沒有成功。 –

Private Sub cmdideposit_Click(sender As Object, e As EventArgs) Handles cmdideposit.Click 
    pnldeposit.Visible = True 
    pnlwithdraw.Visible = False 
    pnlreport.Visible = False 
End Sub 

Private Sub cmddcancel_Click(sender As Object, e As EventArgs) 
    pnldeposit.Hide() 
End Sub 

Private Sub cmdiwithdraw_Click(sender As Object, e As EventArgs) Handles cmdiwithdraw.Click 

    pnlwithdraw.Visible = True 
    pnlreport.Visible = False 
End Sub 

Private Sub cmdwclear_Click(sender As Object, e As EventArgs) Handles cmdwclear.Click 
    pnlwithdraw.Visible = False 
End Sub 

Private Sub cmdireport_Click(sender As Object, e As EventArgs) Handles cmdireport.Click 
    pnlreport.Visible = True 
End Sub

//謝謝分享你的想法！我發現它是如何工作的。謝謝！：D

來源

2017-07-28 04:00:26

這是一個使用BringToFront的快速示例。兩個面板具有相同的位置和相同的尺寸。

Public Class Form1 
    Private switchPanels As Boolean 
    Private Sub btn_Click(sender As Object, e As EventArgs) Handles btn.Click 
    switchPanels = Not switchPanels 
    If switchPanels Then 
     Panel1.BringToFront() 
    Else 
     Panel2.BringToFront() 
    End If 
    End Sub 
End Class

來源

2017-07-28 03:35:47 OneFineDay

謝謝你分享你的想法：D我找到了另一種方式：D謝謝！ –

覆蓋面板與另一個

回答

相關問題