请大家帮我看看这个程序有什么问题，谢谢哦！

在Private Sub IntizTextBox() '通用过程：初始化文本框和提示标签

GoodsNumber.Value = ""

GoodsName.Value = ""

PurchaseQuantity.Value = ""

PurchasePrice.Value = 0

PurchaseDate.Value = 0

Tip.Caption = ""

GoodsNumber.SetFocus '进货日期默认为当前日期

End Sub

编译的时候老实说什么“方法和数据成员未找到”请问是什么原因呢？在数据访问页中能对数据表进行一些操作，比如添加信息。谢谢各位了！我才开始自学数据库，有点不懂，不要笑话我了，哈哈！

Private Sub IntizTextBox() '通用过程：初始化文本框和提示标签

GoodsNumber.Value = ""

GoodsName.Value = ""

PurchaseQuantity.Value = ""

PurchasePrice.Value = 0

PurchaseDate.Value = 0

Tip.Caption = ""

GoodsNumber.SetFocus '进货日期默认为当前日期

End Sub

可以通过的