■ 함수 프로시저 사용하기
----------------------------------------------------------------------------------------------------
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
----------------------------------------------------------------------------------------------------
'VB' 카테고리의 다른 글
| [VB] 명령 구하기 (0) | 2015.05.15 |
|---|---|
| [VB] SELECT SQL 실행하기 (0) | 2015.05.15 |
| [VB] 레코드셋 구하기 (0) | 2015.05.15 |
| [VB] MDB 연결 구하기 (0) | 2015.05.15 |
| [VB] 응용 프로그램 경로 구하기 (0) | 2015.05.15 |
| [VB] 함수 프로시저 사용하기 (0) | 2015.05.15 |
| [VB] 속성 사용하기 (0) | 2015.05.15 |
| [VB] FOR ~ TO ~ STEP ~ EXIT FOR ~ NEXT문 사용하기 (0) | 2015.05.15 |
| [VB] 키보드 & 마우스 잠그기 (0) | 2015.05.15 |
| [VB] IF ~ THEN ~ ELSEIF ~ THEN ~ ELSE ~ END IF문 사용하기 (0) | 2015.05.15 |
| [VB] 주석 사용하기 (0) | 2015.05.15 |
TAG 공통
댓글을 달아 주세요