Public Class FrmRepEstadistico Private Sub BntSalie_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BntSalie.Click Me.Close() End Sub Private Sub btnConsulta_Click(sender As System.Object, e As System.EventArgs) Handles btnConsulta.Click End Sub End Class