＋设为首页 ＋添加到收藏夹
在读控件内容时,总是提示错误说控件没有获得焦点,出错.
然后我每读一个,就要在前面加一个 XXX.SetFocus, 真是罗嗦!
像这样一句话:
sSQL="Select * From Students Where StuNo=" & txtStuNo.Text & " And Subject=" & txtSubject.Text & ""
我就得拆成这么几句:
dim sStuNum$, sSubject$
txtStuNo.SetFocus
sStuNo=txtStuNo.Text
txtSubject.SetFocus
sSubject=txtSubject.Text
sSQL="Select * From Students Where StuNo=" & sStuNo & " And Subject=" & sSubject & ""
真是麻烦死了!请问有什么方法可以解决这个问题?
sSQL="Select * From Students Where StuNo=" & trim(txtStuNo.Text) & " And Subject=" & trim(txtSubject.Text) & ""
呵呵，Access就是这样的。
不过你作为一个programmer,写个函数总会的吧
Public Function GetText(ByVal txt As TextBox) As String
txt.SetFocus
GetText = txt.Text
End Function
第一，照你要求不应该使用text，用value比较好
第二，如果你必须使用text，那只有一个个setfocus了
