▶ 뭉충닷컴
 
mungchung.com login
Site Search
My Space
주절주절...
공부방
쥔장소개
Board
자유게시판
유용한 정보
자료실
Programming
강좌 & Articles
Spring 3.0
프로그래밍 Tip
   -ASP
   -PHP
   -JavaScript
   -HTML
   -Java/JSP
   -Database
   -Crystal Report
   -Visual Basic
   -이클립스
   -리눅스
   -기타
Windows API (VB)
Spread Sheet 7.0
컴퓨터활용 Tip
Other things
StarCraft 전략
StarCraft 문서
김용(金庸)
Son Q & Dieda

VB의 Choose 함수

VB 조회 수 9485 추천 수 0 2007.10.10 21:47:46
VB에 Choose 이런 함수가 있는지 오늘 수업들으면서 처음 알았다 -_-

Dim I As Integer
Dim Occupation As Boolean
Dim Hobby As Boolean
Dim strOccu As String
Dim strHobby As String
Dim temp As String

For I = 1 To 5
    Occupation = Choose(I, opt1.Value, opt2.Value, opt3.Value, opt4.Value, opt5.Value)
    If Occupation = True Then
        strOccu = Choose(I, opt1.Caption, opt2.Caption, opt3.Caption, opt4.Caption, opt5.Caption)
    End If
Next

For I = 1 To 5
    Hobby = Choose(I, Check1.Value, Check2.Value, Check3.Value, Check4.Value, Check5.Value)
    If Hobby = True Then
        temp = Choose(I, Check1.Caption, Check2.Caption, Check3.Caption, Check4.Caption, Check5.Caption)
        strHobby = strHobby & "," & temp
    End If
Next

MsgBox strOccu
MsgBox strHobby


귀찮아서 소스만 올린다.
체크박스나, 옵션선택에서 선택된 항목이 있는지 없는지 검사하는 함수이다. 반환값은 true/false


http://www.vbarchiv.net/commands/Choose.php

참고
문서 첨부 제한 : 0Byte/ 2.00MB
파일 크기 제한 : 2.00MB (허용 확장자 : *.*)
List of Articles
번호 제목 글쓴이 날짜 조회 수