비주얼베이직 줄 넘기기 기능
글쓴이: kutest / 작성시간: 금, 2018/11/30 - 12:57오전
아래같이 하면 잘 작동됩니다
dim swich1 as integer ---------------------- private sub command_2click() switch1 = 1 call switchon end sub ---------------------- private function switchon() if (switch1 = 1) then msgbox "켜짐" switch1 = 0 end if end function
그런데 커맨드버튼1 추가시키게되면 이상하게 아래와 같이 줄(?)이 이상하게 나눠져 dim swich1 as integer 부분이 커맨드버튼1과 묶여집니다 그래서 작동 안되구요
'추가' private sub command_1lick() switch1 = 1 call switchon end sub dim swich1 as integer ---------------------- private sub command_2click() switch1 = 1 call switchon end sub ---------------------- private function switchon() if (switch1 = 1) then msgbox "켜짐" switch1 = 0 end if end function
제가 원하는건 아래와같습니다 이렇게 어떻게 할수있나요
private sub command_1click() switch1 = 1 call switchon end sub ---------------------- dim swich1 as integer ---------------------- private sub command_2click() switch1 = 1 call switchon end sub ---------------------- private function switchon() if (switch1 = 1) then msgbox "켜짐" switch1 = 0 end if end function
Forums:
private sub command_1click()
private sub command_1click()
switch1 = 1
call switchon
end sub
----------------------
dim swich1 as integer
코딩하신걸
dim swich1 as integer
private sub command_1click()
switch1 = 1
call switchon
end sub
위와 같이 순서를 바꿔주시고,
dim swich1 as integer -> dim switch1 as integer 변수 명도 잘못된거 같습니다. 옮기실때 오타인거 같은데
private sub command_1click() -> private sub command1_click()
private sub command_2click() -> private sub command2_click()
로 변경후 실행하시면 정상 작동 될거 같습니다. ^^