I want to write URDU on Picture Box. I can write English on Picture Box using PictureBox.Print property. Please find the below code too.
Code:
Public Sub PrintToCenter(Msg As String, PicBox As PictureBox, FormTop As Boolean)
With PicBox
.AutoRedraw = -1
.Font = "Courier New"
.FontSize = 14
.FontBold = True
.ForeColor = vbWhite
HalfWidth = .TextWidth(Msg) / 2 ' Calculate one-half width.
HalfHeight = .TextHeight(Msg) / 2 ' Calculate one-half height.
.CurrentX = .ScaleWidth / 2 - HalfWidth ' Set X.
.CurrentY = .ScaleHeight / 2 - HalfHeight ' Set Y.
End With
PicBox.Print Msg ' Print message.
End Sub