帮帮解释一下程序

Private Sub booklistGrid_Click()
Dim i As Integer
'首先获得选定的行号
i = booklistGrid.Row

'将选定行的内容在文本框中显示
addbookTypeNO.text = booklistGrid.TextMatrix(i, 0)
addbookTypeName.text = booklistGrid.TextMatrix(i, 1)
permitdays.text = booklistGrid.TextMatrix(i, 2)
bookTypeOther.text = booklistGrid.TextMatrix(i, 3)

End Sub

Private Sub delbookStyle_Click()
'选定要删除行
Dim str As String
str = addbookTypeNO.text

Dim rs As New ADODB.Recordset
Dim sql As String
sql2 = "select booktypeno from bookType where booktypeno = '" & str & "'"
sql = "delete from bookType where booktypeno = '" & str & "'"
Set rs = TransactSQL(sql2)
If rs.EOF = True Then
MsgBox "该编号图户类别不存在！"
Else
If MsgBox("真的要删除这条记录吗？", vbO

帮帮解释一下程序 请问编程高手们帮帮我解释一下下面的C语言程序 帮忙解释一下这个程序 解释一下C语言程序 解释一下这个C程序! 这个程序解释一下!谢谢 C程序，解释一下 解释一下这个Java程序 解释一下这个VB程序 解释一下这个简单程序