Hi all, I have 4 panels each with 5 rbos.
For each rbo in a panel I have set the same event name.
The first panel works fine, the rest don't fire..any suggestions please.
i.e. Historic works, Aesthetic and the rest don't, must be something dumb I :sign0104: am not doing correctly, but I can't trap the error.
(Other than this ..its great, been trying the designer UI Cloud which is fast and a great tool.)
Sub Historic_CheckedChange(Checked As Boolean)
If Checked=True Then
rbo=Sender
edtHistoric.text=rbo.Tag
His=edtHistoric.Text
'update cultvalue total
lblCultValue.text=Utils.GetCval
End If
End Sub
Sub Aesthetic_CheckChanged(Checked As Boolean)
If Checked=True Then
rbo=Sender
edtAesthetic.text=rbo.Tag
Aes=edtAesthetic.text
lblCultValue.text=Utils.GetCval
End If
End Sub
Sub Scientific_CheckChanged(Checked As Boolean)
If Checked=True Then
rbo=Sender
edtScientific.text=rbo.Tag
Sci=edtAesthetic.text
lblCultValue.text=Utils.GetCval
End If
End Sub
etc TIA
For each rbo in a panel I have set the same event name.
The first panel works fine, the rest don't fire..any suggestions please.
i.e. Historic works, Aesthetic and the rest don't, must be something dumb I :sign0104: am not doing correctly, but I can't trap the error.
(Other than this ..its great, been trying the designer UI Cloud which is fast and a great tool.)
Sub Historic_CheckedChange(Checked As Boolean)
If Checked=True Then
rbo=Sender
edtHistoric.text=rbo.Tag
His=edtHistoric.Text
'update cultvalue total
lblCultValue.text=Utils.GetCval
End If
End Sub
Sub Aesthetic_CheckChanged(Checked As Boolean)
If Checked=True Then
rbo=Sender
edtAesthetic.text=rbo.Tag
Aes=edtAesthetic.text
lblCultValue.text=Utils.GetCval
End If
End Sub
Sub Scientific_CheckChanged(Checked As Boolean)
If Checked=True Then
rbo=Sender
edtScientific.text=rbo.Tag
Sci=edtAesthetic.text
lblCultValue.text=Utils.GetCval
End If
End Sub
etc TIA