로그인

Select the product you need help with

사용 스크립트 제어 모듈 및 프로시저 수집 방법

기술 자료: 184745 - 이 문서가 적용되는 제품 보기.

기계 번역 고지 사항 보기

기계 번역된 문서와 영문 원본 문서 나란히 보기

모두 확대 | 모두 축소

요약

이 문서에서는 Microsoft Script 컨트롤의 세그먼트 코드 모듈 및 절차 속성을 사용하는 방법을 보여 줍니다. 인수 개수가 동적으로 확인하는 방법 및 Function 또는 Sub 프로시저의 여부를 보여 줍니다.

위로 가기 | 피드백 보내기

Microsoft 스크립트 컨트롤이 다른 모듈로 세그먼트 스크립트 호스트 응용 프로그램의 기능이 포함되어 있습니다. 기본 모듈 "전역" 항상 나타납니다. 서로 다른 모듈에 같은 이름의 프로시저가 포함될 수 있습니다 (즉, 프로시저 이름을 모듈 범위 있을 경우).

또한 Microsoft Script 컨트롤 호스트 응용 프로그램에서 동적으로 이를 예상하는 인수의 개수와 물론 Function 또는 Sub 프로시저가 있는지 여부를 확인할 수 있도록 프로시저 속성이 포함됩니다. 호스트 응용 프로그램에서를 올바른 개수의 매개 변수 값 입력하도록 할 수 있습니다.

스크립트 컨트롤의 모듈 속성을 모듈 개체의 컬렉션을 포함하는 개체입니다. 다음 속성과 메서드는 있습니다.

수: 모듈 수입니다.
Item(x): 단일 모듈 개체를 반환합니다.
이름 추가: 지정한 이름을 가진 새 모듈을 추가합니다.

모듈 개체 다음 속성과 메서드는 있습니다.

이름: 모듈 이름입니다.
프로시저: 프로시저 개체입니다.
AddCode 코드: 모듈에 다음 코드를 추가합니다.
실행된 이름, 인수: 명명된 프로시저를 실행합니다.

프로시저 개체를 프로시저 개체의 컬렉션을 포함합니다. 다음 속성과 메서드는 있습니다.

수: 모듈의 프로시저에서 수.
Item(x): 단일 프로시저 개체를 반환합니다.

프로시저 개체에는 다음과 같은 메서드와 속성이 있습니다.

이름: 프로시저 이름입니다.
HasReturnValue: Function 또는 Sub 프로시저가 있는지 여부를 나타냅니다.
NumArgs: 프로시저에 필요한 인수 개수.

참고: 모든 속성 및 메서드가 나열된 개체, 목록만 이 문서의 관련 제공됩니다.

다음 예제에서는 이러한 속성 및 메서드를 사용하는 방법을 보여 주는 대화형 프로그램을 제공합니다.

중요: Microsoft 프로그래밍 예제를 목적으로만 묵시적인, 보증, 않습니다, 상품성 및 특정 목적에의 적합성에 대한 묵시적인된 보증을 포함하며 이에 제한되지 않고 제공합니다. 이 문서에서는 프로시저를 작성하고 디버깅하는 데 사용되는 도구 및 여기서 설명하는 프로그래밍 언어에 익숙한 사용자를 대상으로 합니다.

예제

Visual Basic에서 기본적으로 Form1이 만들어집니다 새 프로젝트를 만듭니다.
프로젝트 메뉴에서 구성 요소 클릭한 다음 "Microsoft Script 컨트롤 1.0" 확인란을 선택하십시오.
스크립트 컨트롤 (ScriptControl1), 텍스트 상자 (텍스트1) Command1, Command2, Command3 세 명령 단추를 추가하고 두 나열합니다 (List1입니다, List2) Form1에 상자. 여러 줄 텍스트 상자의 속성을 TRUE로 설정하십시오. 5 줄의 30자 맞게 텍스트 상자를 크기를 조정하십시오.

Form1에 다음 코드를 추가합니다:

      Private Sub Command1_Click()
        ScriptControl1.Modules.Add Text1.Text
        Form_Activate
      End Sub

      Private Sub Command2_Click()
        ScriptControl1.Modules(List1).AddCode Text1.Text
        List1_Click
      End Sub

      Private Sub Command3_Click()
      Dim RetVal As Variant, m As Variant
        Set m = ScriptControl1.Modules(List1.Text)
        With m.Procedures(List2.Text)
          Select Case .NumArgs
            Case 0
              RetVal = m.Run(List2.Text)
            Case 1
              RetVal = m.Run(List2.Text, 5)
            Case 2
              RetVal = m.Run(List2.Text, 4, 23)
            Case Else
              MsgBox "Procedure has too many arguments"
          End Select
          If .HasReturnValue Then
            MsgBox List2.Text & " returned: " & RetVal
          End If
        End With
      End Sub

      Private Sub Form_Activate()
      Dim m As Variant
        List1.Clear
        With SCriptControl1
          .Language = "VBScript"
          .AllowUI = True
          For Each m In .Modules
            List1.AddItem m.Name
          Next m
        End With
      End Sub

      Private Sub Form_Load()
        Command1.Caption = "Add Module"
        Command2.Caption = "Add Code"
        Command3.Caption = "Run Procedure"
      End Sub

      Private Sub List1_Click()
      Dim m As String, p As Variant
        m = List1
        List2.Clear
        If m = "" Then Exit Sub
        For Each p In ScriptControl1.Modules(m).Procedures
          List2.AddItem p.Name
        Next p
      End Sub

      Private Sub List2_Click()
      Dim m As String, p As String, r As Boolean, a As Long
        m = List1
        p = List2
        With ScriptControl1.Modules(m).Procedures(p)
          r = .HasReturnValue
          a = .NumArgs
        End With
        MsgBox m & "." & p & " has " & IIf(r, "a", "no") & _
               " return value and " & a & " arguments"
      End Sub

Form1을 실행하십시오.
다음 텍스트 상자에 입력할 수 있는 모듈 추가 클릭하여 새 모듈을 만들:
Mod2

다음 스크립트는 텍스트 상자에 입력합니다:

      Function Calc(X)
        Calc = X * 2
      End Function

전역 List1입니다 있는 선택하고 코드 전역 모듈 추가 클릭하십시오.

다음 스크립트는 텍스트 상자에 텍스트를 입력합니다:

      Function Calc(X, Y)
        Calc = X * Y
      End Function

      Sub Test()
        MsgBox "The Test Sub in Module Mod2"
      End Sub

Mod2 List1입니다 있는 선택하고 코드 전역 모듈 추가 클릭하십시오.
다양한 모듈 및 프로시저를 클릭하십시오. 메시지 상자에 나타나는 절차를 선택할 때 프로시저의 인수 개수가 뿐만 아니라 반환 값이 있는지 여부를 나타내는 걸리는.
프로시저 선택한 후 실행할 수 있도록 프로시저 실행 을 클릭하십시오. 코드를 사용할 수 있는 인수의 개수를 결정하고 다양한 메시지 상자에 결과를 볼 수 있습니다.

참고:

전역 모듈 이름은 항상 "전역" 제어 버전 또는 지역화 따라 않을 수 있습니다. 단어 "전역" 코딩 - GlobalName 상수 대신 하드 사용합니다.
개별 모듈 또는 프로시저를 제거할 방법이 없습니다. 스크립트 컨트롤의 .Clear 메서드 코드를 모두 지울 수 있습니다. 이름이 같은 프로시저를 사용하여 .AddCode 메서드를 사용하여 프로시저가 덮어쓸 수 있습니다.

위로 가기 | 피드백 보내기

참조

스크립트 컨트롤을 얻는 방법에 대한 자세한 내용은 Microsoft 기술 자료의 다음 문서를 참조하십시오.

184739
(http://support.microsoft.com/kb/184739/EN-US/ )
: INFO: 스크립트 제어 얻는 위치

추가 정보 및 전역 모듈에서 프로시저를 호출하는 예제는 Microsoft 기술 자료의 다음 문서를 참조하십시오.

184740
(http://support.microsoft.com/kb/184740/EN-US/ )
: 호출 함수 스크립트 컨트롤 사용 방법

Microsoft 스크립트 컨트롤 도움말 항목:

   HasReturnValue Property
   NumArgs Property
   AddCode Method
   Run Method
   Modules Collection
   Procedures Collection

위로 가기 | 피드백 보내기

속성

기술 자료: 184745 - 마지막 검토: 2004년 7월 13일 화요일 - 수정: 4.1

본 문서의 정보는 다음의 제품에 적용됩니다.

Microsoft Visual Basic 5.0 Learning Edition
Microsoft Visual Basic 6.0 Learning Edition
Microsoft Visual Basic 5.0 Professional Edition
Microsoft Visual Basic 6.0 Professional Edition
Microsoft Visual Basic 5.0 Enterprise Edition
Microsoft Visual Basic Enterprise Edition for Windows 6.0
Microsoft Visual Basic 4.0 Standard Edition
Microsoft Visual Basic 4.0 Professional Edition
Microsoft Visual Basic 4.0 32-Bit Enterprise Edition
Microsoft Visual Basic for Applications 5.0

kbmt kbhowto kbscript KB184745 KbMtko

기계 번역된 문서

중요: 본 문서는 전문 번역가가 번역한 것이 아니라 Microsoft 기계 번역 소프트웨어로 번역한 것입니다. Microsoft는 번역가가 번역한 문서 및 기계 번역된 문서를 모두 제공하므로 Microsoft 기술 자료에 있는 모든 문서를 한글로 접할 수 있습니다. 그러나 기계 번역 문서가 항상 완벽한 것은 아닙니다. 따라서 기계 번역 문서에는 마치 외국인이 한국어로 말할 때 실수를 하는 것처럼 어휘, 구문 또는 문법에 오류가 있을 수 있습니다. Microsoft는 내용상의 오역 또는 Microsoft 고객이 이러한 오역을 사용함으로써 발생하는 부 정확성, 오류 또는 손해에 대해 책임을 지지 않습니다. Microsoft는 이러한 문제를 해결하기 위해 기계 번역 소프트웨어를 자주 업데이트하고 있습니다.

이 문서의 영문 버전 보기.

위로 가기 | 피드백 보내기