这段代码什么意思啊？？

[bike_j2ee]

Private Sub cmdRegAdd_Click() '''添加
nModeSys = 2 ''添加操作
Dim IDmax As String
Dim i As Integer
For i = 1 To Val(Txt(0).Text)
Txt(i).Text = ""
Next i
cmdRegSave.Enabled = True
End Sub
Private Sub cmdRegLook_Click() '' 浏览
strLook = Trim(Combo1.Text)
If strLook <> "" Then
frmLook.Show 1
End If
End Sub

[bike_j2ee]

小弟对vb一窍不通，求大虾介绍上面代码功能

[booksoon]

某个工程的一部分

什么意思应该我们问你才对~~~~

[hpygzhx520]

点添加的时候，将文本框清空。点浏览的时候显示frmLook窗体，还能怎样？

[gooore]

拷贝到VB里面调试一下就很清楚了不是

总归要开始的吧？这样问对自己没啥好处