Public Class TransLineEdit Inherits ESRI.ArcGIS.Desktop.AddIns.Button Dim pForm As New frmEdit Protected Overrides Sub OnClick() Try pForm.Show() Catch ex As Exception System.Windows.Forms.MessageBox.Show(ex.ToString, "OnClick") End Try End Sub End Class