텍스트파일의 제목을 리스트에 불러오기?!
일본드립
2024.11.13
예를들어
Gogoomas라는 폴더안에
Ryu.txt
Gogm.txt
Debu.txt
GamJ.txt
가 있을경우
리스트박스에
Ryu
Gogm
Debu
GamJ
이렇게 텍스트파일의 이름을 아이템으로 불러오는.. ㄷ
-
루리 2024-11-13
Dir1은 변수가 아니라 DirListBox의 약어 구요
소스에서 end는 쓸필요가 없는뎀
Dim i As Integer
Open App.Path & \\\목록.txt\ For Append As #1
For i = 0 To Dir1.ListCount - 1
List1.AddItem Right$(Dir1.List(i), InStr(StrReverse$(Dir1.List(i)), \\\\) - 1)
Print #1, List1.List(i)
N -
바다 2024-11-13
ㄴ 네 맞습니다 맞고요 (덧글 먹기의 시작)
-
루나 2024-11-13
ㄴ 네 맞습니다 맞고요
-
종달 2024-11-13
폴더명구하는건 아는데.... 응용
Option Explicit
Private Sub Form_Load()
Dir1.Path = App.Path
Dim i As Integer
Open App.Path & \\\목록.txt\ For Append As #1
For i = 0 To Dir1.ListCount - 1
List1.AddItem Right$(Dir1.List(i), InStr(StrReverse$(Dir1
| 번호 | 제 목 | 글쓴이 | 날짜 |
|---|---|---|---|
| 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 |