???为什么错误??
运行后出现:对象不支持该属性的方法?这是什么道理?请高手指点
Private Sub Command1_Click()
Dim ct1 As Control
For Each ct1 In Controls
If TypeOf ct1 Is TextBox Or TypeOf ct1 Is _
OptionButton Or TypeOf ct1 Is MaskEdBox Then
ct1.enable = False '错误
End If
Next ct1
dcbocou.Enabled = False
cbofac.Enabled = False
End Sub