- 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
댓글 0
권한이 없습니다.