컴퓨터 엑셀 워드 포토숍 구글어스 WINDOWS JAVASCRIPT JAVA C++

 
Previous Post Java 자바] double 배열 중앙값, 중간값, 메디안 구하기 메서드; Median M...B셔터, T셔터 차이점; 벌브 셔터(Bulb Shutter), 타임 셔터(Time Shut...C언어] double 배열 중앙값, 중간값, 메디안 구하기 함수; Median Functi...Perl 펄] 중앙값, 중간값, 메디안 구하기 함수; Median Function광각 디카] 28미리 광각 렌즈 지원되는 똑딱이는? 28mm 컴팩트 디카Python 파이썬] 무한 루프 만들기, 루프 탈출/빠져나오기 방법 'while' 'bre...C언어] 무한루프 만들기, 루프 탈출/빠져나오기 방법; 'while' 'for' 'brea...Excel 엑셀] 분산 구하기 함수 (표본의 분산); Variance FunctionExcel 엑셀] 중앙값, 중간값, 메디안 구하기 함수; Median Function매스매티카] 중앙값, 중간값, 메디안 구하기 함수; Mathematica Median

Excel VBA 엑셀 비베] 무한 루프, 루프 탈출, 빠져 나오기 방법; Do Loop Exit Do

Monday, May 28, 2007

비베에서는 "Do ... Loop"문으로 간단히 무한루프를 구현할 수 있습니다. 루프에서 빠져나오려면 "Exit Do"문을 사용합니다. C언어의 break문에 해당합니다.

빠져나올 수 없는 영원한 무한루프에서는 키보드의 Ctrl+Break키를 누르면 프로그램 전체의 실행이 강제로 종료됩니다. (Ctrl키를 누르면서 Pause/Break키를 누르는 것입니다.)

아래 예제는 무한 루프 속에서 대화상자를 계속 출력하는 예제입니다. 편의상 3개까지만 나타내고 종료합니다.

비베에서 무한루프(Infinity Loop) 만들기 예제


(엑셀에서 Alt+F11키를 눌러, 비베 에디터를 실행하고, 비베 에디터 메뉴의, "삽입 > 모듈"을 선택한 후, 다음 코드를 붙여 넣습니다.)
비베 에디터에서 F5 키를 누르거나, 엑셀에서 Alt+F8 키를 누르면 VBA 매크로가 실행됩니다.
Sub Infinity_Loop_Example()
  Dim Counter
  Counter = 0

  Do
    MsgBox "무한 루프: Ctrl+Break키로 강제 종료 가능"

    '''''''''''''''''''''''''''''''''''''''''
    ' 이 부분이 없으면 영원한 무한 루프
    '
    Counter = Counter + 1
    If Counter = 3 Then
      Exit Do
    End If
    '''''''''''''''''''''''''''''''''''''''''
  Loop

End Sub



0 Comments:

Post a Comment

<< Home RSS 2.0 feed

구글 Google 에서 제공하는 무료 블로그 서비스인 블로거 Blogger 의 인터넷 주소는 www.blogger.com 입니다. Blogger 에 블로그를 만들면, blogspot.com 이라는 주소에 블로그가 생성됩니다.
블로그를 직접 방문하지 않고도 최신 게시물을 구독하려면 RSS 2.0 feed 주소를 리더기에 등록하시면 됩니다.
Categories
Previous Posts
Monthly Archives
Top