Sub chkExpPU_CheckedChange(Checked As Boolean)
Dim chkPU As CheckBox=Sender
Log(chkPU.Tag)
For Each v As View In pnlPU.GetAllViewsRecursive
' Dim edt As EditText 'if I uncomment this I get "variable 'edt' was not initialized"
' edt.Initialize(edt) 'so I added this & get "variable converted to string" error
If v Is EditText And v.Tag=chkPU.Tag Then
If chkPU.Checked Then
v.Enabled=True
' edt.Enabled=True 'so I commented this out
Else
' edt.Text="" 'so I commented this out
' edt.Enabled=False 'so I commented this out
v.Enabled=False
End If
End If
Next
End Sub