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
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