[belajar-access] public function member_belajaraccess()

[privat access]

public function member_belajaraccess()
on error goto kopdar

dim strMsg as string

strMsg = "Haloooo... apa kabar semua" + chr(13)
strMsg = strMsg + "Emang pada ga kangen nih untuk kopdar? :D " + chr(13)
strMsg = strMsg + "Bang Haer, bang Aksan, Mas VBA (eh, mas MBA maksudnya),
dll..." + chr(13)
strMsg = strMsg + "mgkn udh pada punya rencana holiday kali yaa? :P "

msgbox strMsg,,"Just Checking"

kopdar :
            SibukErr.Description

end function