Message Boc Creator Problem =[

right i got board so i falt i might as well make a mesage box creater but im stuck all i need is the icons but i cant figuer out were to put it in the code e.g

text2 is the title
text1 is the caption
text3 is were they will enter the icon code E.G vbcritical

but i cant find how to fit text3.text into the code

Code:

---

Private Sub Command1_Click()
MsgBox (Text2.Text), vbInformation, (Text1.Text)
End Sub

---

can anyone help thanks =]

p.s is there a way to put it in a drop down menu instead of text3.text and sorry for bad spelling

Instead of a textbox, use a drop down combo for the icon selection.

And set the .ItemData to the value of the icon constant value so when its selected you can easily pass the value to your function.

Code:

---

Option Explicit

Private Sub Command1_Click()
    MsgBox Combo1.ItemData(Combo1.ListIndex)
End Sub

Private Sub Form_Load()
    Combo1.AddItem "Critical", 0
    Combo1.ItemData(0) = 16
End Sub

---

I found this little messagebox and have started using it. It may give you some ideas:
http://www.planet-source-code.com/vb...51231&lngWId=1