主题：控件可用不可用的问题

控件的TextChanged事件，代码。

If e.sender.text = "调拨" Then
    e.form.controls("Table1").Visible = True
    e.form.controls("TextBox2").Enabled = False
    e.form.controls("TextBox3").Enabled = False
Else If e.Sender.Text = "购置" Then
    e.form.controls("Table1").Visible = False
    e.form.controls("TextBox2").Enabled = True
    e.form.controls("TextBox3").Enabled = True
Else
    e.form.controls("Table1").Visible = True
    e.form.controls("TextBox2").Enabled = True
    e.form.controls("TextBox3").Enabled = True
End If