by Kelley Hendrix (1 Submission)
Category: Miscellaneous
Difficulty: Beginner
Date Added: Wed 3rd February 2021
Rating:
(4 Votes)

This code shows how to display the msgbox icons on your form. No Icons to include in your project, no picture controls, only API. UPDATED 12/22/06 - Simplified the little bit of code that was there and added an additional icon. If you like, please vote. Thanks!
API DeclarationsPublic Declare Function LoadStandardIcon Lib "user32" Alias _
"LoadIconA" (ByVal hInstance As Long, ByVal lpIconNum As _
MsgPicTypes) As Long
Public Declare Function DrawIcon Lib "user32" (ByVal hDC _
As Long, ByVal x As Long, ByVal y As Long, _
ByVal hIcon As Long) As Long
Download Msgbox API Icons (3 KB)