• 목록
  • 아래로
  • 위로
  • 0
  • 늘보
  • 조회 수 6133

 CIMON소스 - RunScriptEx예제 소스 입니다.

사이먼 작화하시는 분들은 연습한번 해보세요
 
기초적인 프로그램 입니다,


Sub do_Action01()
 
'confirm‍
If GetTagVal ("RST") = 0 Then Exit Sub
 
'call the scenario script
RunScriptEx "do_scenario",1,GetTagVal ("숫자")
 

End Sub






Sub do_scenario()
 
'Get parameter
Action_number# = GetParameter()
 
'confirm‍
If Action_number# = 0 Then Exit Sub
 
'scenario number handling
Select Case Action_number#
      Case 1
           msgbox "1"
      Case 2 to 8
           msgbox "2~8"
End Select
 

End Sub

공유

facebooktwitterpinterestbandkakao story
퍼머링크

댓글 0

권한이 없습니다.