VBA文本框禁用

Question

我目前有一个用户窗体，该窗体由一个组合框和多个文本框组成。如何禁用每个文本框并使其变灰，以防止任何用户输入，除非已填充上方的文本框？香港专业教育学院尝试了这两种技术，但没有成功

Me.CSockett.Enabled = Not IsNull(Me.CSocketl)


'If CSocketl.Value = "" Then
'    Me.CSockett.Enabled = False
'    Else
'    Me.CSockett.Enabled = True
'End If

[如果有人有任何建议，那就太好了。

欢呼声

Answer 1

我创建了一个包含3个文本框的UserForm，仅启用了第一个文本框。满足要求的一种方法是响应Change事件：

Private Sub TextBox1_Change()
   TextBox2.Enabled = (Trim(TextBox1.Text) <> "")
End Sub

Private Sub TextBox2_Change()
   TextBox3.Enabled = (Trim(TextBox2.Text) <> "")
End Sub