ListView Again

If I have two columns (Report Style) and some items added to the control using this code:

    Dim lstItem As ListItem
    
    With ListView1
        .ColumnHeaders.Add , "Column1", "Column1"
        .ColumnHeaders.Add , "Column2", "Column2"
        Set lstItem = .ListItems.Add(1, "Text1", "Text1")
        lstItem.SubItems(.ColumnHeaders("Column2").SubItemIndex) = "Text2"
        Set lstItem = .ListItems.Add(2, "Text3", "Text3")
        lstItem.SubItems(.ColumnHeaders("Column2").SubItemIndex) = "Text4"
        
        Set lstItem = Nothing
    End With

How would do it so when the user double clicks on the listview, I can add each column to a seperate textbox (from one line of course - I use fullrowselection kind of thing)
To show it more visually:

    Column1     Column2
      Text1       Text2
      Text3       Text4

After the user doubleclicks on the first row my textboxs would look like this:

------------------   -----------------------
|   Text1        |   |      Text2          |
------------------   -----------------------

I hope you know what I mean.

[Mark Sreeves]

Try this:

Private Sub Form_Load()
Dim lstItem As ListItem
    

        Set lstItem = ListView1.ListItems.Add(, , "Text1")
        lstItem.SubItems(1) = "Text2"
        
        Set lstItem = ListView1.ListItems.Add(, , "Text3")
        lstItem.SubItems(1) = "Text4"
        
        Set lstItem = Nothing
 

End Sub

Private Sub ListView1_ItemClick(ByVal Item As MSComctlLib.ListItem)

Text1.Text = Item.Text
Text2.Text = Item.SubItems(1)
End Sub

Thanks Mark!!!!! Almost what I was looking for (I changed it a little bit and it works perfectly).
Thanks again