Handling a RadioButton's click event

Perfect!
Thanks for the help.

--- On Tue, 12/9/08, bw2868bond <bwalker@...> wrote:

From: bw2868bond <bwalker@...>
Subject: [Vantage] Re: Handling a RadioButton's click event
To: vantage@yahoogroups.com
Date: Tuesday, December 9, 2008, 1:07 PM






How nice to know the click event doesn't fire....

Try using the CheckChanged event with an If statement to determine
the state...

Private Sub rdbEpiCustom1_ CheckedChanged( ByVal Sender As Object,
ByVal Args As System.EventArgs) Handles rdbEpiCustom1. CheckedChanged
'// ** Place Event Handling Code Here **
If (rdbEpiCustom1. Checked)
MessageBox.Show( "1 Checked")
End If
End Sub

--- In vantage@yahoogroups .com, Ahmet Erispaha <ahmeterispaha@ ...>
wrote:
>
> I want to show/hide a GroupBox by clicking one of two Radio
Buttons, but the Radio Button's Click event doesn't seem to fire.Â
What do I have to do?  Â
> Â
> I used the Event Wizard to create click event handlers for the two
Radio Buttons. Here's the code:
> Â
> '//********* ********* ********* ********* ********* *****
> '// Custom VB.NET code for UD05Form
> '// Created: 12/8/2008 2:58:13 PM
> '//********* ********* ********* ********* ********* *****
> Imports System
> Imports System.Data
> Imports System.Diagnostics
> Imports System.Windows. Forms
> Imports System.ComponentMod el
> Imports Microsoft.VisualBas ic
> Imports Epicor.Mfg.UI
> Imports Epicor.Mfg.UI. FrameWork
> Imports Epicor.Mfg.UI. ExtendedProps
> Imports Epicor.Mfg.UI. FormFunctions
> Imports Epicor.Mfg.UI. Customization
> Imports Epicor.Mfg.UI. Adapters
> Imports Epicor.Mfg.UI. Searches
> Imports Epicor.Mfg.BO
>
> Module Script
>
> Â '// ** Wizard Insert Location - Do Not Remove 'Begin/End Wizard
Added Module Level Variables' Comments! **
> Â '// Begin Wizard Added Module Level Variables **
> Â '// End Wizard Added Module Level Variables **
>
> Â '// Add Custom Module Level Variables Here **
> Â
> Â Sub InitializeCustomCod e()
>
> Â Â '// ** Wizard Insert Location - Do not delete 'Begin/End Wizard
Added Variable Intialization' lines **
> Â Â '// Begin Wizard Added Variable Intialization
> Â Â '// End Wizard Added Variable Intialization
> Â Â '// Begin Custom Method Calls
> Â Â '// End Custom Method Calls
> Â End Sub
> Â
> Â Sub DestroyCustomCode( )
>
> Â Â '// ** Wizard Insert Location - Do not delete 'Begin/End Wizard
Added Object Disposal' lines **
> Â Â '// Begin Wizard Added Object Disposal
> Â Â '// End Wizard Added Object Disposal
> Â Â '// Begin Custom Code Disposal
> Â Â '// End Custom Code Disposal
> Â End Sub
> Â
> Â Private Sub rdbEpiCustom1_ Click(ByVal Sender As Object, ByVal Args
As System.EventArgs) Handles rdbEpiCustom1. Click
> Â Â '// ** Place Event Handling Code Here **
> Â Â Â Â Â Â Â messagebox.show( "rdbEpiCustom1_ Click")
> Â Â Â Â grpEpiCustom1. Visible=True
> Â End Sub
>
> Â Private Sub rdbEpiCustom2_ Click(ByVal Sender As Object, ByVal Args
As System.EventArgs) Handles rdbEpiCustom2. Click
> Â Â '// ** Place Event Handling Code Here **
> Â Â Â Â Â Â Â grpEpiCustom1. Visible=False
> Â Â Â Â Â Â Â messagebox.show( "rdbEpiCustom2_ Click")
> Â End Sub
>
> End Module
> Â
> Thanks,
> Â
> Ahmet Erispaha
>
>
>
>
> [Non-text portions of this message have been removed]
>


















[Non-text portions of this message have been removed]
I want to show/hide a GroupBox by clicking one of two Radio Buttons, but the Radio Button's Click event doesn't seem to fire. What do I have to do?  Â
Â
I used the Event Wizard to create click event handlers for the two Radio Buttons. Here's the code:
Â
'//**************************************************
'// Custom VB.NET code for UD05Form
'// Created: 12/8/2008 2:58:13 PM
'//**************************************************
Imports System
Imports System.Data
Imports System.Diagnostics
Imports System.Windows.Forms
Imports System.ComponentModel
Imports Microsoft.VisualBasic
Imports Epicor.Mfg.UI
Imports Epicor.Mfg.UI.FrameWork
Imports Epicor.Mfg.UI.ExtendedProps
Imports Epicor.Mfg.UI.FormFunctions
Imports Epicor.Mfg.UI.Customization
Imports Epicor.Mfg.UI.Adapters
Imports Epicor.Mfg.UI.Searches
Imports Epicor.Mfg.BO

Module Script

 '// ** Wizard Insert Location - Do Not Remove 'Begin/End Wizard Added Module Level Variables' Comments! **
 '// Begin Wizard Added Module Level Variables **
 '// End Wizard Added Module Level Variables **

 '// Add Custom Module Level Variables Here **
Â
 Sub InitializeCustomCode()

  '// ** Wizard Insert Location - Do not delete 'Begin/End Wizard Added Variable Intialization' lines **
  '// Begin Wizard Added Variable Intialization
  '// End Wizard Added Variable Intialization
  '// Begin Custom Method Calls
  '// End Custom Method Calls
 End Sub
Â
 Sub DestroyCustomCode()

  '// ** Wizard Insert Location - Do not delete 'Begin/End Wizard Added Object Disposal' lines **
  '// Begin Wizard Added Object Disposal
  '// End Wizard Added Object Disposal
  '// Begin Custom Code Disposal
  '// End Custom Code Disposal
 End Sub
Â
 Private Sub rdbEpiCustom1_Click(ByVal Sender As Object, ByVal Args As System.EventArgs) Handles rdbEpiCustom1.Click
  '// ** Place Event Handling Code Here **
       messagebox.show("rdbEpiCustom1_Click")
    grpEpiCustom1.Visible=True
 End Sub

 Private Sub rdbEpiCustom2_Click(ByVal Sender As Object, ByVal Args As System.EventArgs) Handles rdbEpiCustom2.Click
  '// ** Place Event Handling Code Here **
       grpEpiCustom1.Visible=False
       messagebox.show("rdbEpiCustom2_Click")
 End Sub

End Module
Â
Thanks,
Â
Ahmet Erispaha




[Non-text portions of this message have been removed]
How nice to know the click event doesn't fire....

Try using the CheckChanged event with an If statement to determine
the state...

Private Sub rdbEpiCustom1_CheckedChanged(ByVal Sender As Object,
ByVal Args As System.EventArgs) Handles rdbEpiCustom1.CheckedChanged
'// ** Place Event Handling Code Here **
If (rdbEpiCustom1.Checked)
MessageBox.Show("1 Checked")
End If
End Sub

--- In vantage@yahoogroups.com, Ahmet Erispaha <ahmeterispaha@...>
wrote:
>
> I want to show/hide a GroupBox by clicking one of two Radio
Buttons, but the Radio Button's Click event doesn't seem to fire.Â
What do I have to do?  Â
> Â
> I used the Event Wizard to create click event handlers for the two
Radio Buttons. Here's the code:
> Â
> '//**************************************************
> '// Custom VB.NET code for UD05Form
> '// Created: 12/8/2008 2:58:13 PM
> '//**************************************************
> Imports System
> Imports System.Data
> Imports System.Diagnostics
> Imports System.Windows.Forms
> Imports System.ComponentModel
> Imports Microsoft.VisualBasic
> Imports Epicor.Mfg.UI
> Imports Epicor.Mfg.UI.FrameWork
> Imports Epicor.Mfg.UI.ExtendedProps
> Imports Epicor.Mfg.UI.FormFunctions
> Imports Epicor.Mfg.UI.Customization
> Imports Epicor.Mfg.UI.Adapters
> Imports Epicor.Mfg.UI.Searches
> Imports Epicor.Mfg.BO
>
> Module Script
>
> Â '// ** Wizard Insert Location - Do Not Remove 'Begin/End Wizard
Added Module Level Variables' Comments! **
> Â '// Begin Wizard Added Module Level Variables **
> Â '// End Wizard Added Module Level Variables **
>
> Â '// Add Custom Module Level Variables Here **
> Â
> Â Sub InitializeCustomCode()
>
> Â Â '// ** Wizard Insert Location - Do not delete 'Begin/End Wizard
Added Variable Intialization' lines **
> Â Â '// Begin Wizard Added Variable Intialization
> Â Â '// End Wizard Added Variable Intialization
> Â Â '// Begin Custom Method Calls
> Â Â '// End Custom Method Calls
> Â End Sub
> Â
> Â Sub DestroyCustomCode()
>
> Â Â '// ** Wizard Insert Location - Do not delete 'Begin/End Wizard
Added Object Disposal' lines **
> Â Â '// Begin Wizard Added Object Disposal
> Â Â '// End Wizard Added Object Disposal
> Â Â '// Begin Custom Code Disposal
> Â Â '// End Custom Code Disposal
> Â End Sub
> Â
> Â Private Sub rdbEpiCustom1_Click(ByVal Sender As Object, ByVal Args
As System.EventArgs) Handles rdbEpiCustom1.Click
> Â Â '// ** Place Event Handling Code Here **
> Â Â Â Â Â Â Â messagebox.show("rdbEpiCustom1_Click")
> Â Â Â Â grpEpiCustom1.Visible=True
> Â End Sub
>
> Â Private Sub rdbEpiCustom2_Click(ByVal Sender As Object, ByVal Args
As System.EventArgs) Handles rdbEpiCustom2.Click
> Â Â '// ** Place Event Handling Code Here **
> Â Â Â Â Â Â Â grpEpiCustom1.Visible=False
> Â Â Â Â Â Â Â messagebox.show("rdbEpiCustom2_Click")
> Â End Sub
>
> End Module
> Â
> Thanks,
> Â
> Ahmet Erispaha
>
>
>
>
> [Non-text portions of this message have been removed]
>