'*************************************************************************
'**模 块 名：frm_operator
'**网    址：www.mingrisoft.com  价值无限，服务无限
'**电    话：（0431）84978981,84978982
'**创 建 人：明日科技
'**日    期：2007-11-7
'**修 改 人：mrwq
'**日    期：2007-11-7
'*************************************************************************
Dim itmX As ListItem     '定义一个ListItem对象
Dim key  As String     '定义字符串变量
Dim a
Private Sub Command1_Click()
    ListView1.TextBackground = lvwTransparent  '设置为透明
End Sub

Private Sub Form_Load()
    ListView1.Picture = LoadPicture(App.Path & "\图片.bmp")
    ListView1.SmallIcons = ImageList1
    Adodc1.RecordSource = "select * from tb_enter order by number"
    Adodc1.Refresh
    If Adodc1.Recordset.RecordCount > 0 Then
        ListView1.ListItems.Clear
        Adodc1.Recordset.MoveFirst
        Do While Adodc1.Recordset.EOF = False
            key = Adodc1.Recordset.Fields("Address")
            Set itmX = ListView1.ListItems.Add(, , key, 1)
            Adodc1.Recordset.MoveNext
        Loop
    End If
End Sub


这段代码中。 是vb标准教程的， P161页。 光盘mr\10\s1\01. 请问这里 Dim itmX As ListItem     '定义一个ListItem对象 设置对象是什么意思啊.？ 还有.Add(, , key, 1)  这个 1 代表了什么呢。 谢谢老师了。