Scroll Bar in MessageBox ??

[Mili]

Hi,
Thanks for this Code. This code is really good. Can I
add one scroll bar to this msgbox so that if number of
messages are more, I can scroll through it and the
Message Box size will remain same.


Sub ThreeStrings()
Dim Msgs() As String
Dim Msg As String
Dim I As Long

ReDim Msgs(1 To 3)
Msgs(1) = "Hello World"
Msgs(2) = "How are you?"
Msgs(3) = "I am fine"

For I = LBound(Msgs) To UBound(Msgs)
Msg = Msg + vbCrLf + Msgs(I)
Next
Msg = Right(Msg, Len(Msg) - 2)
MsgBox Msg
End Sub

Thanks

Regards

Mili

 

[Chirag]

If you have many messages, a user form may be more appropriate than the
traditional message box. The user form can have a textbox control to hold
the messages.

- Chirag

PowerShow - View multiple shows simultaneously
http://officerone.tripod.com/powershow/powershow.html

 

[Mili]

Hi Thanks,
I am very new to this VB stuff. Is it possible for you
to send me some code examples for the User form creation.

Thanks

Regards

Mili.