리스트뷰중복제거
다참
2023.04.01
Private Sub 중복제거()
Dim i As IntegerDim j As Integer
For i = ListView2.ListItems.Count - 1 To 1 Step -1For j = i - 1 To 1 Step -1
If ListView2.ListItems(i) = ListView2.ListItems(j) ThenListView2.ListItems.Remove iEnd If
Next jNext i
End Sub
리스트뷰 중복제거 가지고있는 소스입니다.근데 제거가되긴하지만 완벽하게되지가않습니다.꼭 맨마지막에 중복이있으면 맨마지막껀 제거를안합니다..도움좀부탁드립니다.
이전에앞서글을올렸지만 답변이 다안되서 다시한번 요청합니다..도움부탁드립니다.
번호 | 제 목 | 글쓴이 | 날짜 |
---|---|---|---|
2694070 | vb_vbnet님의 사이트댓글자동작성기인데 이것을요. | 가시 | 2025-05-07 |
2694041 | 모듈은 무었인가요? | 하람 | 2025-05-07 |
2694013 | 비쥬얼베이직 책 추천좀요^^... | 초코맛캔디 | 2025-05-07 |
2693985 | 리소스문제데요...ㅋㅋ (1) | 아리에스 | 2025-05-07 |
2693929 | 했는데 ㅠㅠ | 볼수록중독 | 2025-05-06 |
2693870 | 수정좀요 ^^;; (2) | 차오름 | 2025-05-06 |
2693812 | ※고구마는 보아라 (6) | 솔길 | 2025-05-05 |
2693789 | 마우스가있는곳의 좌표 보기 | 하예진 | 2025-05-05 |
2693759 | 실시간으로 서버 열렸는지 닫혔는지 확인하는법좀 | 참이 | 2025-05-05 |
2693728 | 로그인 유지 관련 제발 성실답변좀요 | 에녹 | 2025-05-04 |
2693705 | 아 재질문합니다 (5) | 모아 | 2025-05-04 |
2693677 | Dim a (1 to 11) AS Long에서 11을 K로 놓는 방법 질문 | 진주 | 2025-05-04 |
2693648 | 55런타임오류..... | 가론 | 2025-05-04 |
2693620 | 수다님 꺼처럼 하는방법좀요 | PinkPearl | 2025-05-03 |
2693564 | ir creator 에대해서 질문드립니당.. | 글고운 | 2025-05-03 |
2693540 | 배열 간 이동시키기 | 악당 | 2025-05-03 |
2693518 | 비베 WebBrowser1 오류 도움구합니다 | 수예 | 2025-05-02 |
2693491 | 블로그스크랩기 , 사이트 글가져오기 질문합니다. | Addicted | 2025-05-02 |
2693437 | 폼 에대해서요 ㅜ_ㅜ | 돌삥 | 2025-05-02 |
2693412 | 컴파일 오류떠여 ㅠㅠ | 꺆잉 | 2025-05-01 |