,可以通过以下步骤实现:
以下是一个示例代码:
在父窗口中:
Public Class ParentForm
Private Sub OpenChildForm()
Dim childForm As New ChildForm()
AddHandler childForm.ClearData, AddressOf ClearData
childForm.Show()
End Sub
Private Sub ClearData()
TextBox1.Text = ""
ComboBox1.SelectedIndex = -1
CheckBox1.Checked = False
RadioButton1.Checked = False
ListBox1.Items.Clear()
DataGridView1.DataSource = Nothing
' 清空其他自定义控件的数据
End Sub
End Class
在子窗口中:
Public Class ChildForm
Public Event ClearData()
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
RaiseEvent ClearData()
End Sub
End Class
这样,当子窗口中的按钮被点击时,会触发父窗口中的清除数据方法,从而清除相应的数据。
领取专属 10元无门槛券
手把手带您无忧上云