Thread Rating:
  • 0 Vote(s) - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
Custom Msg Box
#1
Allright, Im trying to make a custom msgbox, The basic one is ugly as, well you know.

So I made a form, Added a lable and a button, Wahoo. Now, the sub;

Code:
Public Sub MsgBox(Msg As String)
          frmMsgBox.Visible = True
          Msg = frmMsgBox.MsgLabel.Caption
End Sub

So basicly, this is called,
Code:
Call MsgBox("Bound Item ; This Item may not be dropped nor traded.")

The Box will pop up, set the label and you can click ok to close it.

Yet. It dosn't work Someone wanna let me know why?
Reply
#2
I think...
Msg = frmMsgBox.MsgLabel.Caption
should be
frmMsgBox.MsgLabel.Caption = Msg
Reply
#3
Dragoons Master Wrote:I think...
Msg = frmMsgBox.MsgLabel.Caption
should be
frmMsgBox.MsgLabel.Caption = Msg

Aw, Such an easy fix. Thanks!
Reply
#4
It happens hehehe.
Reply
#5
Yeah, lblCaption would've been nothing and your just

setting the variable Msg to what lblCaption would be.
Reply


Forum Jump:


Users browsing this thread: 3 Guest(s)