哪位高手帮帮我

各位高手帮帮忙! 我是菜鸟 
下面程序是连接到一个数据库 然后向listview控件中 加头像 有些地方不明白 希望 谁能帮帮我
Private Sub Form_Load()
Dim rs1 As New ADODB.Recordset
Dim rs2 As New ADODB.Recordset
rs2.Open "select * from tb_user", cnn, adOpenStatic
    If rs2.RecordCount > 0 Then
        rs2.MoveFirst
        '向ListView中添加图片
        Do While rs2.EOF = False
            Mystr = rs2.Fields("user_name")
            MyIcon = Val(Right(rs2.Fields("user_tx"), Val(Len(rs2.Fields("user_tx")) - 2)))    这里 看不懂 是怎么计算出 头像值呢?
            Set itmX = ListView1.ListItems.Add(, , Mystr, MyIcon)
            rs2.MoveNext
 End Sub
       Public Function cnn() As ADODB.Connection     '定义函数
    Set cnn = New ADODB.Connection
    cnn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\db_Exp.mdb;Persist Security Info=False"
End Function
--------------------编程问答-------------------- ListView1设置了imagelist

MyIcon 只是imagelist对应图片的index值
  
*****************************************************************************
欢迎使用CSDN论坛专用阅读器 : CSDN Reader(附全部源代码) 

http://feiyun0112.cnblogs.com/ --------------------编程问答--------------------

引用 1 楼 feiyun0112 的回复:

ListView1设置了imagelist

MyIcon 只是imagelist对应图片的index值
 
*****************************************************************************
欢迎使用CSDN论坛专用阅读器 : CSDN Reader(附全部源代码)

http://feiyun0112.cnblogs.com/

同意

补充：.NET技术 ,  VB.NET