Viewing Thread:
"Visual Basic quicky"

Centering text on an API controlled messagebox.

I.e.

If mlNumIterations >= MAX_ITERATIONS Then
meSubmissionState = SS_FINISHED


Reply = MessageBox(0, "The Goverment Sumbisssion Gateway has not responded in the required time limit." & vbCr & "EOY submission has failed." & vbCr & "You will need to resubmit the EOY file.", "CRITICAL ERROR", MB_OK& & MB_ICONSTOP)

End If

-=-=-=-=-

Months since I used VB. Most is coming back, but not all.

Light wrote:
> Ahh, I see. Sorry.
>
> Not a scooby mate.

Neh bother. It's something really damn simple but it's driving me mental, especially considering I've managed the rest of the program. Grrr.

[edit] Nope. All message boxe texts are left justified. Must have created a form emulating one last time, but allowing more control. Oh well.

Ahh, I see. Sorry.

Not a scooby mate.

Light wrote:
> Left = (Screen.Width - Width) / 2
> Top = (Screen.Height - Height) / 2
>
> Should work (I think)

Nah, centering the text in the messagebox, not the messagebox itself. It's all left justified at the moment. Looks poor.

Screeny

[URL]http://img226.exs.cx/img226/6446/eoy0dt.jpg[/URL]

Ignore the spakky fingered spelling of "submission". ;D

Left = (Screen.Width - Width) / 2
Top = (Screen.Height - Height) / 2

Should work (I think)

Centering text on an API controlled messagebox.

I.e.

If mlNumIterations >= MAX_ITERATIONS Then
meSubmissionState = SS_FINISHED


Reply = MessageBox(0, "The Goverment Sumbisssion Gateway has not responded in the required time limit." & vbCr & "EOY submission has failed." & vbCr & "You will need to resubmit the EOY file.", "CRITICAL ERROR", MB_OK& & MB_ICONSTOP)

End If

-=-=-=-=-

Months since I used VB. Most is coming back, but not all.