PGR21.com
이전 질문 게시판은 새 글 쓰기를 막았습니다. [질문 게시판]을 이용바랍니다.
Date 2009/04/11 02:27:02
Name 오래방
File #1 미치겠다.frm (0 Byte), Download : 19
Subject 비주얼 베이직 관련 질문이 있습니다..
Dim strname(10) As String

Private Sub Command1_Click()
strname(1) = "kwon"
strname(2) = "kim"
strname(3) = "lee"
strname(4) = "choi"
strname(5) = "park"
strname(6) = "jo"
strname(7) = "jung"
strname(8) = "kang"
strname(9) = "moon"
strname(10) = "seo"

For i = 0 To 9
If strname(0) = Text1.Text Then
MsgBox Text1.Text & "님 회원입니다."
Exit For
MsgBox Text1.Text & "님 회원이 아닙니다."
End If
Next i

End Sub


아이디 10개를 데이터에 입력해놓고
텍스트박스에 사용자가 아이디를 입력하였을때
데이터에 입력된 값이면 회원입니다 라는 메세지 박스가
데이터에 없는 값이면 회원이 아닙니다 라는 메세지 박스를 뛰우려고 하는데
도저히 진전이 않되네요... 처음부터 틀린거 같은데 몇시간째 헤매고 있는지 모르겠습니다..
혹시나 베이직 잘하시는분 있으시면 조금만 도와주셨으면 좋겠습니다^^

통합규정 1.3 이용안내 인용

"Pgr은 '명문화된 삭제규정'이 반드시 필요하지 않은 분을 환영합니다.
법 없이도 사는 사람, 남에게 상처를 주지 않으면서 같이 이야기 나눌 수 있는 분이면 좋겠습니다."
09/04/11 02:43
수정 아이콘
For i = 0 To 9
If strname(i) = Text1.Text Then
MsgBox Text1.Text & "님 회원입니다."
Exit For
Else
MsgBox Text1.Text & "님 회원이 아닙니다."
End If
Next i

End Sub

수업시간에 깔짝 배운걸로 어떻게 써보긴 했는데 맞을려나요..
목록 삭게로! 맨위로
번호 제목 이름 날짜 조회
53614 비주얼 베이직 관련 질문이 있습니다.. [1] 오래방1618 09/04/11 1618
53613 컴퓨터가 사망한거 같습니다 .. [3] 제로스1900 09/04/11 1900
53612 위닝에서의 코나미 이펙트 질문 [4] 까야제맛3056 09/04/11 3056
53611 비스타 소리 설정에 관한 질문입니다. 飛上夢2540 09/04/11 2540
53610 축구부하면 학업에.. [20] Ggobugi2109 09/04/11 2109
53609 견적 내는데 메인보드 질문좀요~ ^^; [7] OnlyJustForYou1707 09/04/11 1707
53607 생산가능곡선? 실효보호율? 오-굿!5781 09/04/11 5781
53606 제로보드 질문 다시 올립니다~~이번엔 위젯 [4] 래토닝1758 09/04/11 1758
53605 알보칠이 그렇게 무섭나요? [17] 관심좀2078 09/04/11 2078
53603 헤어고수님들~~ [3] DeStinY....2095 09/04/10 2095
53602 잡지사 취직 관련 질문입니다. [2] 나라당1962 09/04/10 1962
53601 익스프롤러 우클릭 했을때 생기는거 없에는 법좀 알려주세요~ Naraboyz1908 09/04/10 1908
53600 자동차 취득가액 질문입니다. 환타스틱2728 09/04/10 2728
53599 지금 제 상태에 조언이나 충고 부탁드립니다 [9] 앞마당감나무1727 09/04/10 1727
53598 MC (Multi Carrier) 라고 아시나요?? [5] dhkdlwm.1887 09/04/10 1887
53596 정말 '죽음'뒤엔 아무것도없는것일까요?? [24] DeStinY....2584 09/04/10 2584
53595 한국영화의 인지도 질문입니다 [6] 핸드레이크2271 09/04/10 2271
53594 Nightwish풍의 해외그룹 추천 부탁드립니다. [5] 2268 09/04/10 2268
53593 인터넷 새탭을 뛰우면 창이 사라져요;; [1] 라캉~2223 09/04/10 2223
53592 회계에서 분개할때 모르는 부분이 있어요. [2] kiss1779 09/04/10 1779
53591 웹에서 글이나 페이지를 클릭 할때 약간의 딜레이가 발생합니다 득이1516 09/04/10 1516
53590 언제부턴가 눈을 크게 뜨면 이마에 주름이 생기는데요... [8] Epicurean4222 09/04/10 4222
53589 화포수리병에 대한 질문입니다 [6] ILikeOOv3755 09/04/10 3755
목록 이전 다음
댓글

+ : 최근 6시간내에 달린 댓글
+ : 최근 12시간내에 달린 댓글
맨 위로