qq9347421
春芽
共回答了16个问题采纳率:81.3% 举报
把你的控件都名称不变(VB2008)
记得把textbox1 和 label1放在panel1 里
把textbox2 和 label2放在panel2 里
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object,ByVal e As System.EventArgs) Handles Button1.Click
If Panel1.Visible = False Then
Panel1.Visible = True
Panel2.Visible = False
Else
Panel2.Visible = True
Panel1.Visible = False
End If
If TextBox1.Text = "end" Then Me.Close()
End Sub
Private Sub Form1_Load(ByVal sender As Object,ByVal e As System.EventArgs) Handles Me.Load
Panel1.Visible = False
End Sub
End Class
记得给分
1年前
9