使用WINCC库中的阀门、电机等图标，单击他们弹出操作的对话框，现在的问题是弹出的对话框是在鼠标点击的位置附近出来，但是点击监控画面边缘的图标时发现，弹出的对话框超出了画面的边缘，还得用鼠标拖拽回来，（因为是改造项目，原制作者在PLC中的地址不规律，无法用结构变量，只能把阀门的操作对话框逐一制作出来，我使用VB程序加画面窗口做的，）程序如下：
Sub MouseDown(ByVal Item, ByVal Button, ByVal Shift, ByVal x, ByVal y)
Dim PIC
Set PIC = ScreenItems("画面窗口1")''''''''选择画面窗口
ScreenItems.Item("画面窗口1").PICTURENAME="阀门号"
PIC.Visible = False
PIC.Left = item.Left+10
PIC.Top = item.Top
ScreenItems("画面窗口1").Visible = True
End Sub
不知道怎么解决，请高手们赐教！
问题补充：能不能来个VB的程序判断离上下、左右的位置啊