In my code below, the CurrentX and Y coordinates change at random between 1000 and 2000.

How can I get the currentX and currentY of the string 'word'? Is it possible?

Thanks!

-----

Private Sub Command1_Click()

Randomize

Dim word As String
Dim xcoord As Integer
Dim ycoord As Integer
word = "hello"
xcoord = Int(Rnd * 1000) + 1000
ycoord = Int(Rnd * 1000) + 1000
Picture1.Cls
Picture1.CurrentX = xcoord
Picture1.CurrentY = ycoord

Picture1.Print "I just want to say " & word & " to you all"

End Sub

Private Sub Command2_Click()
'what code goes here to make the CurrentX,currentY appear in Picture2?
End Sub