function teamname(team)
teamname=team
select case
lcase(team)
case "삼성" : teamname="삼성
라이온즈"
case "sk" : teamname="SK 와이번즈"
case "한화" : teamname="한화 이글스"
case "현대" : teamname="현대
유니콘스"
case "두산" : teamname="두산 베어스"
case "롯데" : teamname="롯데 자이언츠"
case "kia" : teamname="기아
타이거스"
case "lg" : teamname="LG 트윈스"
end
select
end function
teamname("삼성") -> "삼성 라이온즈" 반환
'쓸만한 주저리' 카테고리의 다른 글
작은 따옴표를 디비에 입력할 때 변환 문자 (0) | 2006.04.06 |
---|---|
원격 접속 지원 사이트 (0) | 2006.04.05 |
부모창에 있는 스크립트 실행하기 (0) | 2006.03.22 |
기록 갯수만큼 배열 선언하기 (0) | 2006.03.20 |
복사하지 않고 글꼴 설치하기 (0) | 2006.03.15 |