첨부 소스 코드는 나눔고딕코딩 폰트를 사용합니다.
728x90
반응형
728x170
Public Function DisplayMessage(tbTarget, strMessage As String) As Boolean

    DisplayMessage = False

    On Error GoTo errorLabel
    
    If TypeOf tbTarget Is TextBox Then

        tbTarget.Text = strMessage

    End If
    
    DisplayMessage = True
    
    Exit Function

errorLabel:

    Err.Raise vbError + 1001, Err.Description

End Function
728x90
반응형
그리드형(광고전용)
Posted by icodebroker
TAG ,

댓글을 달아 주세요