Excel VBA 학습 노트-3
2922 단어 Excel
하나.제어 흐름 키워드 요약
1. 분기
i.GoSub...Return 문
한 프로세스 에서 다른 하위 프로그램으로 건너뛰어서 실행하고 실행한 후에 되돌려줍니다.
과정 중 어느 곳에서든 GoSub과 Return을 사용할 수 있지만 GoSub과 그에 상응하는 Return 문장은 반드시 같은 과정에 두어야 한다.하위 프로그램에는 Return 문구가 하나 이상 포함될 수 있지만 첫 번째 Return 문구가 나타나면 GoSub 문구에 이어 문장 계속 실행됩니다.
GoSub을 사용할 수 없습니다.Return을 사용하여 Sub 프로세스를 시작하거나 종료합니다.
분리된 프로세스를 생성하고 GoSub을 사용하라는 프롬프트...Return을 호출하면 프로그램을 더욱 구조화할 수 있습니다.
Sub GosubDemo()
Dim Num
' 。
Num = InputBox("Enter a positive number to be divided by 2.")
' ， 。
If Num > 0 Then GoSub MyRoutine
Debug.Print Num
Exit Sub ' Exit 。
MyRoutine:
Num = Num/2 ' 2。
Return ' GoSub 。
End Sub
ii.On Error 문
a.On Error GoTo line
java와 유사한try {...}catch(Exception e){...}잘못된 정보를 포착 처리하려면 그것을 사용하는 것이 가장 좋다
Sub test()
Dim a As Integer
Dim b As Integer
a = 3
b = 0
On Error GoTo errorline
Debug.Print a / b
errorline:
Select Case Err.Number
Case 11
Debug.Print " "
Case Else
Debug.Print " "
End Select
End Sub
b.On Error Resume Next
오류가 발생했을 때, 아래의 문장을 계속 실행합니다
Sub test()
Dim a As Integer
Dim b As Integer
a = 3
b = 0
On Error Resume Next
Debug.Print a / b
Select Case Err.Number
Case 11
Debug.Print " "
b = 1
Case Else
Debug.Print " "
End Select
End Sub
c.On Error GoTo 0
오류 처리 프로그램 닫기, 자바와 같은throw, 이상 던지기
Sub test()
Dim a As Integer
Dim b As Integer
a = 3
b = 0
On Error Resume Next
Debug.Print a / b
On Error GoTo 0
Select Case Err.Number
Case 11
Debug.Print " "
b = 1
Case Else
Debug.Print " "
End Select
End Subiii.On...GoSub과 On...GoTo
Sub OnGosubGotoDemo()
Dim Number, MyString
Number = 2 ' 。
' Branch to Sub2.
On Number GoSub Sub1, Sub2 ' On...GoSub ， 。
On Number GoTo Line1, Line2 ' Line2 。
' On...GoTo ， 。
Exit Sub
Sub1:
MyString = "In Sub1": Return
Sub2:
MyString = "In Sub2": Return
Line1:
MyString = "In Line1"
Line2:
MyString = "In Line2"
End Sub
iv.
이 내용에 흥미가 있습니까?
현재 기사가 여러분의 문제를 해결하지 못하는 경우 AI 엔진은 머신러닝 분석(스마트 모델이 방금 만들어져 부정확한 경우가 있을 수 있음)을 통해 가장 유사한 기사를 추천합니다:
Excel Grep toolExcel Grep tool ■히나가타 ■ 시트 구성 ExcelGrep.cls...
텍스트를 자유롭게 공유하거나 복사할 수 있습니다.하지만 이 문서의 URL은 참조 URL로 남겨 두십시오.
CC BY-SA 2.5, CC BY-SA 3.0 및 CC BY-SA 4.0에 따라 라이센스가 부여됩니다.
좋은 웹페이지 즐겨찾기
