when I check PageSize im mPD the custom size is not there

[active]

I run the code below and in the diialog box I click Properties and set a
custom page size.

But when I check PageSize in mPD the custom size is not there.

Any help for this?

Thanks



Private mPD As New PrintDocument

Dim PD As New PrintDialog

With PD

'If .PrinterSettings is used the system-wide printer preferences are changed

'If .Document is used changes only effect this app

..Document = mPD

...snip..
If .ShowDialog() <DialogResult.OK Then

..Dispose()

Exit Sub

End If

....use mPD