Question

VB 如何在Picture控件指定的坐标位置标记

比如Picture的坐标范围(-1000,1000)-(1000，0),怎么在(0,500)处，Print"Y500"哪。谢谢！！

Answer 1

首先(-1000,1000)这个坐标是显示不出来的。
如果你要建立坐标系的话你要选择Picture中的某个点，比如(1000,1000)作为坐标原点(0,0)。
如果不考虑坐标Y轴的正方向而使用Picture默认的向下，那么(0,500)就在Picture中的坐标就是(1000,1500)，
picture.currentx=1000
picture.currenty=1500
picture.print "Y500"

Answer 2

Private Sub Command1_Click()
Picture1.Scale (-1000, 1000)-(1000, 0)
Picture1.CurrentX = 0
Picture1.CurrentY = 500
Picture1.Print "Y500"
End Sub