[Visual Basic] 비주얼베이직 스크립트 (VBScript) 기초 문법 (if문, for문, foreach문, case문, dim, set 변수선언, 타입)

마소 공식 가이드 

https://docs.microsoft.com/ko-kr/dotnet/visual-basic/language-reference/statements/set-statement

Set 문 - Visual Basic

 

특징.

 

  변수의 앞글자에 숫자x

  마지막에 특수문자 . 들어가면 안됨

  변수길이 255자 이내

  대소문자 구분 안함

  문자열(String) 오직 " " 큰따옴표만 사용 내부에 있는 경우 String이 됨,

  작은따옴표 ' 는 주석으로만 사용.  
  날짜, 시간 저장 가능. ex) 함수 : Now()    /   날자형 변수(#)사용 Today = #20/07/2020#

  True

 

 숫자 타입. (Digit Type)

Integer	-32,768 ∼ 32,767
Long	-2,147,483,648 ∼   2,147,483,647
Byte	0 ∼ 255  (음수 X)
Single	음수경우 : -3.402823E38 ∼ -1.401298E-45 / 양수경우 : 1.401298E-45 ∼ 3.402823E38
Double	음수경우 : -1.79769313486232E308 ∼ -4.94065645841247E-324 / 양수경우 : 4.94065645841247E-32 ∼ 1.79769313486232E308
Currency	-922,337,203,685,477.5808 ∼ 922,337,203,685,488.5807

 

결과값 출력확인을 위해서 Msgbox를 쓸 수 있다.

https://ansan-survivor.tistory.com/1510

[Visual Basic] 비주얼베이직 스크립트 (VBScript) 메세지 박스 띄우기

 

 

1. 주석달기, 변수 선언하기

변수선언 : Dim [변수명]

주석달기 : 문자 ' 를 앞에 쓰면 뒤에는 모두 주석이 됨.

예)

' 주석달기
' 변수 하나
Dim MyVar
' 변수 여럿
Dim a,b,c,d

 

 

2. 변수에 값 대입하기

숫자 : [변수명] = 12.34  

문자 : [변수명] = "hello world"

예)

pi = 3.1415
str = "come back"

 

 

3. 상수 선언하기

  (변수는 언제든 값을 바꿔서 넣을 수 있지만, 상수는 한번 선언하면 계속 그값이 유지된다)

Const [상수명] = 값

예)

Const MAXMEMBER = 12039382
Const PI = 3.1415

 

 

4. Set 사용하기, 개채변수 선언, Object나 Collection을 담는 변수

  Dim으로 선언 후, Set으로 개채변수로 사용

Set [개채변수] = object

예) dict 개체변수선언, 그리고 dict에 여러개 object를 넣음

Dim dict 
Set dict = CreateObject("Scripting.Dictionary")
dict.Add "Name", "VBScript" 
dict.Add "Id", "1" 
dict.Add "Trainer", "K Mondal"

If dict.Exists("Name") Then 
    msgbox true
Else 
    msgbox false
End If

 

5. 두개의 문자열 합치기 & 연산자

str1 = "hello "
str2 = "world"
str3 = str1 & str2 & "nice to meet you"

 

6. 조건문 (If, Elseif, Else ,End if)

형태

If condition Then
     [statements]

[Elseif condition Then]

     [elseif_statements]

[Else]

     [elsestatements]

End If

예)

dim a
a = 11

if a < 10 Then
    result = True
elseif a >= 5 Then
    result = false
else
    result = 0
end if

msgbox result

 

 

 

7. 비교문 (AND, OR, IS NOTHING, NOT)

=	같으면
a<b	b가 크면
a>b	a가 크면
a<=b	b가 크거나 같으면
a>=b	a가 크거나 같으면
a<>b	a와 b가 다르면
a And b	a도 true b도 true 여야만 true
a Or b	a나 b중 하나만 true여도 true
a Is Nothing	set으로 선언된 개체변수에 사용
a Not b	a나 b 둘다 아니어야 true

Dim dict 
Set dict = Nothing

한 개체 변수를 Nothing으로 지정하면 그 변수는 어떠한 실제 개체도 참조하지 않습니다. 여러 개체 변수들이 동일한 실제 개체를 참조할 경우 명시적으로 Set문을 사용하여 해당되는 모든 변수들이 Nothing으로 지정된 후 또는 함축적으로 Set문을 사용하여 Nothing으로 지정된 마지막 개체 변수가 범위 밖으로 빠져나간 후에만 그 변수들이 참조하는 개체에 연결된 메모리와 시스템 리소스를 해제합니다.

(Nothing 출처: http://www.namsam.com/asp/vbscript/ko_597.htm)

 

 

8. for 반복문 (for ... next)

형태

For counter = start To end [Step step]

     [statements]

Next

예)

for i = 0 to 10 step 1
    msgbox i
next

i가 10에 도달할 때까지 10번 반복한다.

 

 

9. for each 반복문 (for ... Each)

여러항목이 있는 Lists 안에 각각 하나씩 빼서 다 나올 때까지 반복

형태

For Each OneList In Lists

     MsgBox & OneList   

Next

 

 

 

10. While 반복문

여러항목이 있는 Lists 안에 각각 하나씩 빼서 다 나올 때까지 반복

형태

예)

dim a
a = 3


while a < 10
    msgbox "num of " & a,, ""
    a = a + 1
wend

10까지 도달하면 안 뜬다

 

11. Case 문

형태

 Select Case [variable_name]

        Case   [value1] 

                   [statements]

        Case  [value2] 

                [statements]

        Case Else

                 [statements]

  End Select

예)

dim a
a = 3

select case a

    case 1
        msgbox "a is 1"
    case 2
        msgbox "a is 2"
    case else
        msgbox "nothing"
        
end select

 

 

참고하기 좋은 사이트

-> https://kkamikoon.tistory.com/entry/VBVisual-Basic-Script-%EA%B8%B0%EB%B3%B8-%EB%AC%B8%EB%B2%95

VB(Visual Basic) Script 기본 문법