VB提示编译错误，属性使用无效，高手帮我看看啊

Private Sub cmdcancle_click()
unload Me
End Sub
Private Sub frmaddpoem_load()
cleartextbox
initTC
initlb
End Sub

Sub cleartextbox()
Dim i As Integer
For i = 0 To 3
txtpoem(i).Text = ""
Next i
End Sub

initTC
initlb
在哪里定义的
txtpoem是控件数组么
代码都不全。错误发生在哪一行，自己调试下。