Question

vb.net处理多个textbox时，为空则message提示textbox(几)不能为空？

For Each x As Control In GroupBox1.Controls
If TypeOf (x) Is TextBox AndAlso Trim(st.Text) = "" Then
'当检测到的TextBox内容不为空时执行
MessageBox.Show("????????", "提示", MessageBoxButtons.OK）
end if
找到第一个空缺提示框提示”确定“后立即返回窗体？

Answer 1

Private Sub Text1_Change()
If Text1 <> "" Then
Command1.Enabled = True
Else
Command1.Enabled = False
End If
End Sub