ARIS VB 분석시.
- Option Explicit ' 명시적 변수 선언
- ReDim : 배열 변수의 저장 공간을 다시 할당합니다.
프로시저 수준에서 동적 배열 변수를 선언하고 저장 공간을 할당하거나 다시 할당합니다.
ReDim [Preserve] varname(subscripts) [, varname(subscripts)] . . .
Preserve : ※. 기존 데이터 유지하면서 배열 증가시
마지막 차원의 크기를 바꿀 경우 기존 배열 안에 있는 데이터를 보존합니다.
varname : 변수 이름. 표준 변수 명명 규칙을 따릅니다.
subscripts : 배열 변수의 차원. 60개까지의 차원을 선언할 수 있습니다. subscripts 요소의 구문은 아래와 같습니다.
upper [,upper] . . . : 배열의 하한값은 항상 0입니다.
ReDim 문은 배열 차원의 첨자 없이 빈 괄호와 함께 Private, Public 또는 Dim 문을 사용하여 이미 정식으로 선언된 동적 배열의 크기를 정의하거나 다시 정의하는 데 사용합니다. ReDim 문을 반복하여 사용하면 배열의 차원과 요소를 바꿀 수 있습니다.
Preserve 키워드를 사용하면 마지막 배열 차원의 크기만 변경할 수 있으나, 그 차원의 개수는 바꿀 수 없습니다. 예를 들어 1차원 배열만 있는 마지막이면서 유일한 차원이기 때문에 그 차원의 크기를 조절할 수 있지만, 2차원 이상의 배열인 경우 최종 차원의 크기만 조절할 수 있지만 그 배열의 내용은 그대로 보존하고 있습니다.
아래 예제에서는 배열에 있는 기존 데이터를 삭제하지 않으면서 동적 배열의 마지막 차원의 크기를 늘리는 방법을 보여줍니다.
ReDim X(10, 10, 10)
. . .
ReDim Preserve X(10, 10, 15)
- UBound 함수 : 지정 배열 차원에서의 배열 수 리턴 <-> LBound
> UBound(배열명[, 배열차수]) : 배열차수 생략시 1로 간주
> Dim A(100,3,4)
UBound(A, 1) : 100
UBound(A, 2) : 3
UBound(A, 3) : 4
- Private Function : 리턴 값이 있는 함수
[Public [Default] | Private] Function name [(argumentlist)]
[statements]
[name = expression]
[Exit Function]
[statements]
[name = expression]
End Function
- Private Sub : 일반 함수.
[Public [Default] | Private] Sub name [(argumentlist)]
[statements]
[Exit Sub]
[statements]
End Sub
- Type
[Private | Public] Type Type명
요소명 As type
요소명 As type
. . .
End Type
Ex)
Private Type Test
Name1 as String * 6
Age as Byte
Address as String * 60
End Type
Private Sub Command1_Click()
Dim a as Test
a.Name1 = "먹순이" : a.Age = 1 : a.Address = "마당 화분 옆"
Print "이름:" & a.Name1
Print "나이:" & a.Age
Print "주소:" & a.Address
End Sub
- instr / inStrRev
instr 함수는 문자열중에 찾고자 하는 문자를 처음부터 찾아서 제일먼저 나오는 문자의 위치를 돌려줍니다.
dim XX as integer
xx=inStr("c:\windows\exeplorer.exe","\")
이렇게 하게되면 xx는 3이 되죠 \가 3번째에 있으니까
반대로 instrRev 함수는 문자열중에 찾고자 하는 문자를 뒤에서부터 찾습니다.
dim XX as integer
xx=inStrRev("c:\windows\exeplorer.exe","\")
이러면 xx는 11이 됩니다.
뒤에서 부터 \를 찾아봤을때 \는 11번째위치에 있는거죠 앞에서 11번째위치...
이 위치를 알게되면 Mid나 Left,Right 같은 문자를 짜르는 함수를 이용하여 원하는 것을 할수 있을겁니다.
- Nothing
VBScript의 Nothing 키워드는 개체 변수를 실제 개체와 구분하는 데 사용합니다.
Set 문을 사용하여 Nothing을 개체 변수로 할당합니다. 사용 예는 아래와 같습니다.
Set MyObject = Nothing
여러 개체 변수들이 동일한 실제 개체를 참조할 수 있습니다.
한 개체 변수를 Nothing으로 할당하면 그 변수는 어떠한 실제 개체도 참조하지 않습니다.
여러 개체 변수들이 동일한 실제 개체를 참조할 경우 명시적으로 Set 문을 사용하여 해당되는 모든 변수들이 Nothing으로 설정된 후
또는 함축적으로 Set 문을 사용하여 Nothing으로 설정된 마지막 개체 변수가 범위밖으로 빠져나간 후에만
그 변수들이 참조하는 개체에 연결된 메모리와 시스템 리소스를 해제합니다.
Posted by Edward. K
