Vb 根据距离求坐标求VB代码:已知坐标点1的坐标 X=a,Y=b 求向45° 135° 225° 315°移动距离c的公式文化低,对公式的理解能力差,麻烦注释一下,/>原点不一定是 0,0,麻烦用X=a Y=b 距离为c 表示,2点坐标
来源:学生作业帮助网 编辑:作业帮 时间:2024/06/27 11:59:13
![Vb 根据距离求坐标求VB代码:已知坐标点1的坐标 X=a,Y=b 求向45° 135° 225° 315°移动距离c的公式文化低,对公式的理解能力差,麻烦注释一下,/>原点不一定是 0,0,麻烦用X=a Y=b 距离为c 表示,2点坐标](/uploads/image/z/5226479-71-9.jpg?t=Vb+%E6%A0%B9%E6%8D%AE%E8%B7%9D%E7%A6%BB%E6%B1%82%E5%9D%90%E6%A0%87%E6%B1%82VB%E4%BB%A3%E7%A0%81%EF%BC%9A%E5%B7%B2%E7%9F%A5%E5%9D%90%E6%A0%87%E7%82%B91%E7%9A%84%E5%9D%90%E6%A0%87+X%3Da%2CY%3Db++%E6%B1%82%E5%90%9145%C2%B0+135%C2%B0+225%C2%B0+315%C2%B0%E7%A7%BB%E5%8A%A8%E8%B7%9D%E7%A6%BBc%E7%9A%84%E5%85%AC%E5%BC%8F%E6%96%87%E5%8C%96%E4%BD%8E%2C%E5%AF%B9%E5%85%AC%E5%BC%8F%E7%9A%84%E7%90%86%E8%A7%A3%E8%83%BD%E5%8A%9B%E5%B7%AE%2C%E9%BA%BB%E7%83%A6%E6%B3%A8%E9%87%8A%E4%B8%80%E4%B8%8B%2C%2F%3E%E5%8E%9F%E7%82%B9%E4%B8%8D%E4%B8%80%E5%AE%9A%E6%98%AF+0%2C0%2C%E9%BA%BB%E7%83%A6%E7%94%A8X%3Da+Y%3Db+%E8%B7%9D%E7%A6%BB%E4%B8%BAc+%E8%A1%A8%E7%A4%BA%2C2%E7%82%B9%E5%9D%90%E6%A0%87)
Vb 根据距离求坐标求VB代码:已知坐标点1的坐标 X=a,Y=b 求向45° 135° 225° 315°移动距离c的公式文化低,对公式的理解能力差,麻烦注释一下,/>原点不一定是 0,0,麻烦用X=a Y=b 距离为c 表示,2点坐标
Vb 根据距离求坐标
求VB代码:
已知坐标点1的坐标 X=a,Y=b 求向45° 135° 225° 315°移动距离c的公式
文化低,对公式的理解能力差,麻烦注释一下,/>
原点不一定是 0,0,麻烦用X=a Y=b 距离为c 表示,
2点坐标X2=... y2=.
3点坐标X3=.Y3=.
4点坐标X4=.y4=...
5点坐标X5=.y5=.
另外再问一个问题,怎样才能取消list上的焦点,比如在list空白处点击后,让list失去焦点
Vb 根据距离求坐标求VB代码:已知坐标点1的坐标 X=a,Y=b 求向45° 135° 225° 315°移动距离c的公式文化低,对公式的理解能力差,麻烦注释一下,/>原点不一定是 0,0,麻烦用X=a Y=b 距离为c 表示,2点坐标
Dim c As Single, ju As Single
Dim x As Single, y As Single
Dim x2 As Single, y2 As Single
Dim x3 As Single, y3 As Single
Dim x4 As Single, y4 As Single
Dim x5 As Single, y5 As Single
x = 100
y = 100
c = 100‘x y c的值你自己定,我是随便写了几个数
ju = Sqr(c * c / 2)
x2 = x + ju: y2 = y + ju
x3 = x + ju: y3 = y - ju
x4 = x - ju: y4 = y + ju
x5 = x - ju: y5 = y - ju
PSet (x, y)
PSet (x5, y5)
PSet (x2, y2)
PSet (x3, y3)
PSet (x4, y4)
想让某个控件失去焦点,把焦点移到其他控件即可,如:Me.SetFocus