비베 6 질문...

1/1

백신 접종 이후 몸에 일어나는 변화.jpg 야옹 ㅋㅋㅋㅋ 작성자 : 포항의봄.

ㅇㅁㄹ(121.146) 2010.11.14 11:06:39

조회 38 추천 0 댓글 0

VB6에서

wordlist(50)에

각각 여러개의 단어가 들어가있고

난수를 생성해서(이를테면 A에 저장) label1.caption = wordlist(a) 이런식으로 이용하려고 하는데

앞에 나왔던것이 한번 나오면 안되잖아요

그래서 로또프로그램이나 이런거 보고 지식인에 어떤사람이 하란 대로 코드 복사한다음에 약간 수정해서 보니까

Dim 시작수 As Integer

Dim 끝수 As Integer

Dim R(50) As Integer

Dim CardCount As Integer

Dim A As Integer

Dim i As Integer

시작수 = 0

끝수 = meanlist2

Randomize

CardCount = 시작수

A = Int((끝수 - 시작수 + 1) * Rnd + 시작수) \'0에서 끝수까지 무작위 값을 발생

For i = 시작수 To 끝수

If R(i) = A Then GoTo exist \'같은 번호가 있으면 강제로 이동

R(CardCount) = A

CardCount = CardCount + 1

exist:

If CardCount = 끝수 + 1 Then Exit Do

Loop

label1.caption = meanlist(A)

이런식이 됐는데 결국은 무한돌고...

비베 이런식은 처음이라 무한을 어떻게 해결해야하는지 모르겠어음요 ㅠㅠ

meanlist(50) 이 각각 단어의 뜻이 들어가있고 이걸보고 맞춰야하는데

단어가 꼭 50개 꽉 채워져있지않은것도 감안해야하고..

로또 코딩은 봐도 조금달라서 뭐가뭔지 모르겠고... ㅠㅠ 저 코드좀 도와주실분 없나요 ㅠㅠ

고정닉 0

전체 댓글 0개

등록순

본문 보기

타인의 권리를 침해하거나 명예를 훼손하는 댓글은 운영원칙 및 관련 법률에 제재를 받을 수 있습니다.
Shift+Enter 키를 동시에 누르면 줄바꿈이 됩니다.

갤러리 리스트
번호	제목	글쓴이	작성일	조회	추천
설문	비난 여론에도 뻔뻔하게 잘 살 것 같은 스타는?	운영자	24/06/03	-	-
229788	암호해독 [1]	야비의신(116.38)	11.01.08	83	0
229787	맛있당 ㅎㅎ [5]	BTTTS!	11.01.08	112	0
229786	아이폰3gs 랑 아이폰4랑 해상도가 틀린데 각각 어떻게 호환되는거양? [7]	Mayu	11.01.08	135	0
229785	쩌름아랬글북한암호 [1]	야비의신(116.38)	11.01.08	171	0
229784	멀티 부팅 로드할때요.. 좀 도와주세요 ㅠㅠ.. [3]	몽클몽클	11.01.08	65	0
229783	갑자기 와우가 하고 싶어졌어.	VL	11.01.08	94	0
229782	코갤vs프갤	야비의신(116.38)	11.01.08	147	0
229780	이거 돈되나? 아닌가? 뭔가? 괜찮을까? 하고있으니 [2]	ㅇㅇㅇ(219.241)	11.01.08	89	0
229779	내일 대망의 모래다리가 나온다.	Finalizer	11.01.08	59	0
229778	Win api 깨작거리면서 공부할 때. [2]	흠(175.120)	11.01.08	101	0
229777	프갤넘들을 베타적이지 [8]	Finalizer	11.01.08	155	0
229776	혹시 프갤러중에 코갤에서 활동하는 횽들 있음?	ㅁㄴㅇㄹ(175.214)	11.01.08	83	0
229774	세로드립 가운데 [1]	다람쥐v	11.01.08	140	0
229772	win api 이용해서 프랙탈 나무그리기같은거 할수있나? [1]	ㅇㅇㅇ(219.241)	11.01.08	128	0
229771	요즘 암호해독도 쉽나여? [1]	시방새1	11.01.08	130	0
229770	개발하는 사람 중에 코딩만 잘하고 커뮤니케이션 존내 못하는 사람 있지 않냐 [2]	허세강	11.01.08	168	0
229769	사례합니다 [3]	간---d(211.206)	11.01.08	105	0
229768	이거 북한 암호같은데 해독 가능? [7]	dd(183.99)	11.01.08	527	0
229767	와우같은건 프로그램 몇명이서 짠거임? [3]	ㅇㅇ(125.190)	11.01.08	159	0
229766	C언어 책 추천 좀 해주봐ㅠㅠ [8]	좆초보(118.47)	11.01.08	259	0
229765	음. 디씨에서 웹디자이너 채용한다는데 [3]	BTTTS!	11.01.08	121	0
229763	그러고보니 vmware를 깔았는데 어디뒀는지 모르겠다 [1]	BTTTS!	11.01.08	69	0
229762	코스트 // gh5st.exe 목마 확인. [8]	BTTTS!	11.01.08	150	0
229761	덕짜-르 투척 [1]	땡칠도사	11.01.08	133	0
229760	솔까 테트리스 알아서 짤 정도면 초보는 넘어선거 아니냐? [7]	노력하는초보	11.01.08	270	0
229759	정전중? [2]	삶은계란(125.183)	11.01.08	51	0
229757	윈api가 재밌다고!?!! 하는사람들이해안감... [4]	ㅇㅇㅇ(219.241)	11.01.08	180	0
229756	시방새1 횽 보세여 [7]	대마법서오즈	11.01.08	95	0
229755	플갤형들 전에 질문한 존뉴비인데요 헤헤 [2]	존뉴비(125.190)	11.01.08	87	0
229754	다슬기향로션.. [12]	ㅡㅡ(121.188)	11.01.08	182	0
229753	이색히들은 하드웨어는 모름... 컴공에 다닌다면서 컴터도 혼자 못 고침; [4]	ㅇㅇ(14.61)	11.01.08	191	0
229751	심심해서 하는 뻘짓 [3]	DMW(125.138)	11.01.08	88	0
229750	수요일부터 API 정복 책을 보고있는데	늅늅이(59.10)	11.01.08	97	0
229749	근데 트위터가 해킹하고	풋사과1	11.01.08	83	0
229748	국내 사이트에서 영상으로 보고 배우고싶다 [1]	시방새1	11.01.08	99	0
229747	이제 스마트폰 어플 한물갓지않음?? [5]	ㅡㅡ(121.188)	11.01.08	160	0
229746	간만에 글싸기..(설계(?)질문글) [3]	미역c(203.237)	11.01.08	75	0
229745	머신툴 사용방법좀 알려주실분 있으세여 [1]	핑크(118.35)	11.01.08	117	0
229743	형들 안드로이드니 아이폰이니 하는거 공부하려면 어케 해야대나여? [2]	ㅋ(211.169)	11.01.08	107	0
229741	너네들 툴 부터접했냐? [5]	시방새1	11.01.08	236	0
229740	분량 줄이는 팁	ㅡㅡ(121.188)	11.01.08	40	0
229739	msconfig에서 시작프로그램들 정리하려하는데 [2]	12324	11.01.08	341	0
229738	요즘 해커학원도 있더라 ㅋㅋㅋ [1]	시방새1	11.01.08	206	0
229737	태민이의 해킹카페 회원들의 반응.............jpg	ㅡㅡ(121.188)	11.01.08	267	0
229736	열혈강의 예약판매 하는 새 책이	왁스맛치즈	11.01.08	65	0
229735	마타마타야	왁스맛치즈	11.01.08	36	0
229734	My-SQL 유료버전있는데 무료같은 유료? [2]	왁스맛치즈	11.01.08	149	0
229733	님들 지금 여기서 잉여짓하고 있을때가 아니라능 [1]	DMW(125.138)	11.01.08	116	0
229732	뭔가 할말이 있었는데	elwlwlwk	11.01.08	75	0
229731	MSDN 어디서 파나요?? [2]	ㅇㅇ(211.169)	11.01.08	111	0