FreeDlg Example for Visual Basic

Private Sub Form_Unload(Cancel As Integer)
    RasterKrnDlg.FreeDlg
End Sub