listview info

Collapse
This topic is closed.
X
X
 
  • Time
  • Show
Clear All
new posts
  • Gurk

    listview info

    hi all ive been looking on the internet about information of the listview
    control
    and i can't find anything useful.

    i have this code now and i've' got so far now i can write values into the
    listview.

    if i do one row of the list looks like this

    input's set 101110001100100 0

    input's is the first collumn (the one you can select)

    the others 1 and 0's are all subitems (16 collumns) not al in one subitem.

    now my question is howte retrieve the data of one line behind the firts.
    collum.
    so if i select the "input's set" i have to store the 101110001100100 0 in
    avarable or more variables.

    sorry for the explenation but i don't realy know how to explayn easy.


    ----------------------------------this code is at form
    load:----------------------

    Set clmX = ListView1.Colum nHeaders. _
    Add(, , "IO", ListView1.Width / 10)

    For intI = 1 To 16

    strIO = GetINI("IO", "IO" & intI, "?")

    If strIO = "output" Then

    Set clmX = ListView1.Colum nHeaders. _
    Add(, , "I", ListView1.Width / 1000)

    ElseIf strIO = "input" Then

    Set clmX = ListView1.Colum nHeaders. _
    Add(, , "O", ListView1.Width / 1000)

    End If
    Next intI
    ListView1.View = 3
    End Sub

    -----------------------this is a command button-----------------------------

    Private Sub Command1_Click( )

    Dim itmx As ListItem
    Set itmx = ListView1.ListI tems.Add(, , "input's set")

    For intI = 1 To 16

    strIO = GetINI("IO", "IO" & intI, "?")

    If strIO = "output" And Check1(intI) = vbChecked Then

    itmx.SubItems(i ntI) = 1
    Else
    itmx.SubItems(i ntI) = 0
    End If
    Next intI

    itmx.SubItems(1 ) = 1

    End Sub


Working...