初学vb，代码修改问题，真心不会！！！！

本来很陈旧发布于 2013-04-22 14:02， 587 次点击

Private Sub cmdUpdate_Click()
   On Error GoTo UpdateErr
   If Trim(txtFields(0).Text) = "" Then
       MsgBox "名称不能为空", vbExclamation + vbOKOnly, "警告"
       txtFields(0).SetFocus
       Exit Sub
End If
显示txtFields子程序或函数未定义，该怎么修改

向我这样的初学者编程应看那些书籍能提升的快一点！求建议

4 回复

me44058012013-04-22 15:08

txtFields(0).Text是个文本框控件数组，你没有创建名为txtFields的控件数组

本来很陈旧2013-04-22 15:39

我知道是没有定义文本框数组，但我不知道怎么定义，定义了半天还是不对

Artless2013-04-23 11:22

属性index=0

本来很陈旧2013-04-23 11:55

我知道怎么回事了，昨天终于整出来了，唉！其实很简单的一个错误我都不好意思说了