INSTR 사용법

INSTR사용법

​

InStr( 시작점, 대상문자열, 검색문자열)

​

InStr( 1, "Statistics Study", "S") => 결과 : 1

InStr( 2, "Statistics Study", "S") => 결과 : 12

​

MsgBox InStr(2, "Statistics Study", "S") => 12

​

[Opetion Compare문의 설정을 사용하여 비교를 수행]

MsgBox InStr(2, "Statistics Study", "S", -1) => Error

​

[이진비교]

MsgBox InStr(2, "Statistics Study", "S", 0) => 12

​

[텍스트비교]

MsgBox InStr(2, "Statistics Study", "S", 1) => 6 (대소문자 구분없이 결과 찾음)

​

[마이크로소프트 엑세스 전용]

MsgBox InStr(2, "Statistics Study", "S", 2) => Error

​

​

​

[예제] 첫번째 ":" 부터 두번째 ":" 사이의 길이를 구하여라

2	0	2	1	/	1	0	/	1	1		0	8	:	0	0	-	0	9	:	0	0
1	2	3	4	5	6	7	8	9	10	11	12	13	14	15	16	17	18	19	20	21	22

Dim str As String

Dim start1 As Integer

Dim resultlen As Integer

​

str = "2021/10/11 08:00-09:00"

​

' 문자열 "-" 의 위치를 구한다

start1 = InStr(1,str,"-")

MsgBox start1 '=> 17

​

' 문자열 "-" 의 위치에서 시작하여 ":"의 위치(두번째 ":" 의 위치)를 구한후 첫번째 ":" 의 위치를 구하여 뺀다.

resultlen = Instr(start1, str, ":") - InStr(1,str,":")

MsgBox resultlen '=> 6