반응형

마소 공식 가이드 

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

 

Set 문 - Visual Basic

자세한 정보: Set 문(Visual Basic)

docs.microsoft.com

 

특징.

 

  변수의 앞글자에 숫자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) 메세지 박스 띄우기

윈도우에서 많이 보는 기본적인 메세지박스를 띄울 수 있는 코드이다. Msgbox "내용", [선택옵션], "제목" Msgbox "Box Message", 0, "Title" 아래 예를 들면 3번째 항목의 숫자를 무엇을 넣냐에 따라 메세지

ansan-survivor.tistory.com

 

 

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 기본 문법

Visual Basic Script의 문법을 설명하기 앞서, vbs에서는 마땅한 print 함수, 출력 함수가 없습니다. 그래서 선언으로 대신 설명하고, 만약 print를 하고 싶다면 msgbox(Message Box)로 대신 출력해도 됩니다. msg

kkamikoon.tistory.com

 

 

반응형

+ Recent posts