作业帮 > 数学 > 作业

【200分】求能把一个45度倾斜的直角坐标系转换成水平的直角坐标系的VBS公式!

来源:学生作业帮 编辑:神马作文网作业帮 分类:数学作业 时间:2024/11/11 07:32:53
【200分】求能把一个45度倾斜的直角坐标系转换成水平的直角坐标系的VBS公式!
坐标系如下图
坐标系的黑点处,红色坐标系的X50,Y50等于蓝色坐标系的X0,Y50处
或者红色坐标系的X50,Y0等于蓝色坐标系的X25,Y25处
求VBS里的转换公式.
反向转换的公式也要.

我想要正确的VBS代码,或者按键精灵的代码.

【200分】求能把一个45度倾斜的直角坐标系转换成水平的直角坐标系的VBS公式!
红到蓝
x1=int(inputbox("x"))
y1=int(inputbox("y"))
x2=(x1-y1)/2
y2=(x1+y1)/2
msgbox(x2&","&y2)
蓝到红
x1=int(inputbox("x"))
y1=int(inputbox("y"))
x2=x1+y1
y2=y1-x1
msgbox(x2&","&y2)
以上是vbs代码
我说45°是特殊角有必要算得那么麻烦吗?