Add the ScaleTop property:

currenty = .scaletop + (.scaleheight - .textHeight(sMyString)) / 2


Marco

-----Original Message-----
From: weh2oski4u@p... [mailto:weh2oski4u@p...]
Sent: Saturday, July 27, 2002 8:26 AM
To: professional vb
Subject: [pro_vb] RE: Printing centered text


Hello-

Does anyone know of a way to do this when the top and bottom non-printing 
regions are not of equal size? The statement:

CurrentY = ScaleHeight / 2 - HalfHeight   ' Set Y.

does not work in that situation.

Thanks,
Gretchen