-1

3 つのパネルを持つ UserControl を作成します。この UserControl をメイン フォームに追加しますが、メイン フォームに表示するパネルを選択できないという問題があります。正確には、Panel1を表示するために以下のコードがあります

Public Function Pan1()

    Panel3_Paint.Visible = False
    Panel2_Paint.Visible = False
    Panel1_Paint.Visible = True




    Return 0
End Function

したがって、stripMenu をクリックした後、この関数を含む最初のパネルをフォームに表示しようとしましたが、最終的にメイン フォームに 3 番目のパネルが表示されます。

私はこのように私の機能を使用します

    Private Sub ClassAToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles ClassAToolStripMenuItem.Click

              UserControl11.Visible = True
              Call Pan1()
    End Sub`

メニューの特定のボタンをクリックして適切なパネルを表示しようとすると、この機能を使用して実行しようとしますが、フォームに 3 番目のパネルしか表示されないという問題があります。

私の UserControl コード

Public Class UserControl1
Public Sub Panel3_Paint(sender As Object, e As PaintEventArgs) Handles Panel3.Paint

End Sub

Public Sub Panel2_Paint(sender As Object, e As PaintEventArgs) Handles Panel2.Paint

End Sub

Public Sub Panel1_Paint(sender As Object, e As PaintEventArgs) Handles Panel1.Paint

End Sub

クラス終了

この方法で Form.vb に UserControl と Panels も定義します

Public UserControl1 As New UserControl
Public Panel1_Paint As New Panel
Public Panel2_Paint As New Panel
Public Panel3_Paint As New Panel
4

2 に答える 2

0

コードを詳しく見ることなく、関数の呼び出しに問題がある可能性があると思います。

関数がイベントで呼び出されることを確認します。たとえば、フォームに CommandButton を追加する場合、ボタンをクリックした場合に実行する次のコードを追加できます。

Private Sub CommandButton1_Click()

Call Pan1

End Sub

これが役立つことを願っています。

于 2015-08-01T19:59:17.627 に答える