とにかく関数またはプライベートサブ自体を別のものに影響を与えずに参照することはありますか? メインウィンドウを参照するため、「Me」演算子を使用しても機能しません
Private Function comboclean() As Boolean
???.items.clear()
return nothing
End function
Private Sub nAdult_SelectedIndexChanged(sender As Object, e As EventArgs) Handles nAdult.SelectedIndexChanged
comboclean()
End Sub
Private Sub nJunior_SelectedIndexChanged(sender As Object, e As EventArgs) Handles nJunior.SelectedIndexChanged
comboclean()
End Sub