Private Sub Form_Load()
ScaleMode = 3 '像素模式
End Sub
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
MsgBox X & "," & Y
End Sub
获取的是相对窗体区域左上角(不含标题栏)
病情分析:
检查出有肺动脉高压。
指导意见:
治疗方法
一.药物治疗:1.血管舒张药,2.抗凝。二.肺或者心脏移植。
你是要取当前屏幕的坐标,还是自己软件窗口的坐标,或者是别的软件的坐标,这些都不一样的