If Me.ListView1.SelectedItems.Count > 0 Then SqlStr = "Select * from files where id = " & Me.ListView1.SelectedItems(0).SubItems.Item(0).Text FillTextBox(SqlStr) End If