01.
Protected
Sub
rdoButton1_CheckedChanged(sender
As
Object
, e
As
EventArgs)
Handles
rdoButton1.CheckedChanged
02.
If
rdordoButton1.Checked =
True
Then
03.
txtDateFrom1.Enabled =
True
04.
txtDateTo1.Enabled =
True
05.
btnCallReport1.Enabled =
True
06.
txtDateFrom2.Enabled =
False
07.
txtDateTo2.Enabled =
False
08.
btnCallReport2.Enabled =
False
09.
Else
10.
txtDateFrom1.Enabled =
False
11.
txtDateTo1.Enabled =
False
12.
btnCallReport1.Enabled =
False
13.
txtDateFrom2.Enabled =
True
14.
txtDateTo2.Enabled =
True
15.
btnCallReport2.Enabled =
True
16.
17.
End
If
18.
End
Sub
19.
Protected
Sub
rdoButton2_CheckedChanged(sender
As
Object
, e
As
EventArgs)
Handles
rdordoButton2.CheckedChanged
20.
rdordoButton1_CheckedChanged(sender, e)
21.
End
Sub