배열이 주어지면 문자열이 배열에 존재하는지 확인하는 함수를 갖고 싶습니다. 문자열은 함수의 입력과 배열 내용에서 정확히 동일해야합니다.
Function IsInArray(ThsStrng As String, arr() As String, bnd As Integer) As Boolean
For Z = 1 To bnd
If arr(Z) = ThsStrng Then
IsInArray = True
Else
IsInArray = False
End If
Next Z
End Function
처음에는 함수가 제대로 실행 된 것 같았습니다. 이 함수를 몇 번 사용한 후 False 값 (입력 문자열이 배열의 값과 같지 않음을 의미)이 올바르지 않음 (배열의 값과 정확히 동일한 입력 값이 있음)을 발견했습니다. .
도와주세요,
배열 중간에서 일치 항목이 발견되면 어떻게되는지 상상해보십시오. 다음 반복은 불일치가되고 반환 값은로 다시 설정됩니다 False
. 일치하는 항목이 발견되면 루프를 중지해야합니다.
이에 대한 VBA 구문은
Exit For
이 기사는 인터넷에서 수집됩니다. 재 인쇄 할 때 출처를 알려주십시오.
침해가 발생한 경우 연락 주시기 바랍니다[email protected] 삭제
몇 마디 만하겠습니다