홈네트워크 제어문인데 좀 도와주세요~ 어떻게 해야할지

게시판이 올바른지 확인해주세요.
Private Sub Image4_Click() ` 상태확인해서 이미지 띄어주는 명령어 Dim Tname As String Dim rValue As String Tname = NVL_Gas_ST_199 rValue = DStatus.OnOff_Func(Tname) If (rValue = ON) Then i2.Visible = False i1.Visible = True Else i1.Visible = False i2.Visible = True End IfEnd Sub-----------------Private Sub Image5_Click() `OFF 넣는 명령어 Dim Tname As String Tname = NVL_Gas_SST_199 Tname = DCmd.OnOffSet_Func(Tname, OFF)End Sub-------------------Private Sub Image6_Click() `ON 넣는 명령어 Dim Tname As String Tname = ON End Sub
기본적으로 클래스모듈엔 OFF밖에 못받습니다.근데 상태확인 하면서 i1,i2이미지를 띄어줄껀데 OFF이미지는 정상적으로 나올 것 같은데ON이미지를 어떻게 출력할지가 난감하네요.
어떻게 해야할까요?