006. xfnString2Coll

xfnString2Coll 함수

• • 입력받은 문자열의 문자요소를 xProperties 요소로 나누어 주는 함수입니다.

구문

• xfnString2Coll(ByVal str As String) As xProperties

반환값

• • 성공 : xProperties가 반환됩니다.

  • 오류 : 문자열이 없으면 Nothing이 반환됩니다.

참고

• • 유사한 함수

    • 문자 요소를 Array 타입으로 반환합니다.

    • xfnString2Array(ByVal str As String) As String()

예제

코드

Dim strStrs As xProperties

Dim strs As xProperty

Dim cnt As Integer

Set strStrs = xfnString2Coll("Teamdata21")

If strStrs Is Nothing Then

    Debug.Print "Nothing"

else

    For Each strs In strStrs

        Debug.Print strs.Value

    Next

End If

'------------결과값---------------

T

e

a

m

d

a

t

a

2

1