1首先解释下这段用户控件代码?
说明:该用户控件由text1(0~9)组成。
Event IDdblClcikc(ByVal id As String)
Public Property Get txtItem(ByVal Index As Integer) As String
txtItem = Text1(Index).Text
End Property
Public Property Let txtItem(ByVal Index As Integer, ByVal vNewValue As String)
Text1(Index).Text = vNewValue
End Property
第二,在Form上输出10个控件,并解释代码?
For i = 1 To 9 '//输出控件
Load mItm(i)
With mItm(i - 1)
mItm(i).Move .Left, .Top + .Height, .Width, .Height
mItm(i).Visible = True
End With
Next i
第三,如何使用数据库连接并输出在该用户控件上?具体步骤?