edskee
asked on
VB form with no icon?
How the heck do you remove the icon from the upper-left corner of a form? I have a program that pops up warning boxes, and I dont want an icon in the upper-left, like the MsgBox window pops up without the icon.
In the form, if I switch the icon to (none) the damn windows default icon appears instead. How the heck do I just remove it altogether?
In the form, if I switch the icon to (none) the damn windows default icon appears instead. How the heck do I just remove it altogether?
ASKER CERTIFIED SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
Just set Icon property to "(none)" and BorderStyle property to "Fixed Dialog".
ryancys, that's pretty good. You get the windows flag (in Win2K) but that looks better than the form image.
If you really want to "get rid of" the icon but leave everything else intact, you'll have to create a new icon with all pixels transparent, then set the icon to THAT.
If you really want to "get rid of" the icon but leave everything else intact, you'll have to create a new icon with all pixels transparent, then set the icon to THAT.
ASKER
No, because then you still have the space where the icon would be. Load up a form, then have it call a MsgBox... the msgbox has the 'title' all the way to the left, no icon, no space where an icon would be.
Havent tried appari's or rimvis's suggestions yet. Gonna give it a shot tonight.
Havent tried appari's or rimvis's suggestions yet. Gonna give it a shot tonight.
I see...you wanted "warning boxes". Then I think that appari's comment should work for you if you want to allow the form to be resized, or Rimvis' will work if you don't.
Set the forms settings as follows:
BORDERSTYLE = 3 - FIXED DIALOG
ICON = (NONE)
HelixDaKat
BORDERSTYLE = 3 - FIXED DIALOG
ICON = (NONE)
HelixDaKat
Private Sub Form_Load()
Form1.Picture = LoadPicture() 'Clear the picture.
end sub
Form1.Picture = LoadPicture() 'Clear the picture.
end sub
ASKER
Thanks... sorry for the delay in grading the question.
add this line of code: Me.Icon = Nothing