VB程序,求高手.输入坐标(X,Y),根据X和Y的值确定坐标所在的象限或坐标轴或原点
来源:学生作业帮 编辑:搜搜做题作业网作业帮 分类:综合作业 时间:2024/06/28 14:45:19
VB程序,求高手.
输入坐标(X,Y),根据X和Y的值确定坐标所在的象限或坐标轴或原点
输入坐标(X,Y),根据X和Y的值确定坐标所在的象限或坐标轴或原点
![VB程序,求高手.输入坐标(X,Y),根据X和Y的值确定坐标所在的象限或坐标轴或原点](/uploads/image/z/15680615-23-5.jpg?t=VB%E7%A8%8B%E5%BA%8F%2C%E6%B1%82%E9%AB%98%E6%89%8B.%E8%BE%93%E5%85%A5%E5%9D%90%E6%A0%87%EF%BC%88X%2CY%EF%BC%89%2C%E6%A0%B9%E6%8D%AEX%E5%92%8CY%E7%9A%84%E5%80%BC%E7%A1%AE%E5%AE%9A%E5%9D%90%E6%A0%87%E6%89%80%E5%9C%A8%E7%9A%84%E8%B1%A1%E9%99%90%E6%88%96%E5%9D%90%E6%A0%87%E8%BD%B4%E6%88%96%E5%8E%9F%E7%82%B9)
我写了一下比楼上的详细一点
Private Sub Form_Load()
x = InputBox("请输入X坐标", "")
y = InputBox("请输入Y坐标", "")
If x < 0 And y > 0 Then
MsgBox "这个坐标在第二象限!", vbInformation, ""
ElseIf x < 0 And y < 0 Then
MsgBox "这个坐标在第三象限!", vbInformation, ""
ElseIf x > 0 And y > 0 Then
MsgBox "这个坐标在第一象限!", vbInformation, ""
ElseIf x > 0 And y < 0 Then
MsgBox "这个坐标在第四象限!", vbInformation, ""
ElseIf x > 0 And y = 0 Then
MsgBox "这个坐标在X轴的正半轴上!", vbInformation, ""
ElseIf x < 0 And y = 0 Then
MsgBox "这个坐标在X轴的负半轴上!", vbInformation, ""
ElseIf x = 0 And y < 0 Then
MsgBox "这个坐标在Y轴的负半轴上!", vbInformation, ""
ElseIf x = 0 And y > 0 Then
MsgBox "这个坐标在Y轴的负正轴上!", vbInformation, ""
ElseIf x = 0 And y = 0 Then
MsgBox "这个坐标在原点上!", vbInformation, ""
End If
End Su
Private Sub Form_Load()
x = InputBox("请输入X坐标", "")
y = InputBox("请输入Y坐标", "")
If x < 0 And y > 0 Then
MsgBox "这个坐标在第二象限!", vbInformation, ""
ElseIf x < 0 And y < 0 Then
MsgBox "这个坐标在第三象限!", vbInformation, ""
ElseIf x > 0 And y > 0 Then
MsgBox "这个坐标在第一象限!", vbInformation, ""
ElseIf x > 0 And y < 0 Then
MsgBox "这个坐标在第四象限!", vbInformation, ""
ElseIf x > 0 And y = 0 Then
MsgBox "这个坐标在X轴的正半轴上!", vbInformation, ""
ElseIf x < 0 And y = 0 Then
MsgBox "这个坐标在X轴的负半轴上!", vbInformation, ""
ElseIf x = 0 And y < 0 Then
MsgBox "这个坐标在Y轴的负半轴上!", vbInformation, ""
ElseIf x = 0 And y > 0 Then
MsgBox "这个坐标在Y轴的负正轴上!", vbInformation, ""
ElseIf x = 0 And y = 0 Then
MsgBox "这个坐标在原点上!", vbInformation, ""
End If
End Su
已知函数y=(m-3)^2x+m-2x-3的图像经过坐标原点以及第二第四象限的直线,求m的值
已知点A(3x-2y,y+1)在第二、四象限两坐标轴夹角平分线上,且点A的坐标为5,求x+y的值.
在平面直角坐标轴中,点P(X,Y)是第一象限直线y=-x+6上的点,点A(5,0)O是坐标原点,设三角形PAO的面积
关于直角坐标坐标绕原点旋转新坐标(x',y')和旧坐标(x,y)的关系
帮我总结一下对称的规律 比如关于原点,坐标轴,直线,点对称 坐标(x,y)怎么变
编程序:已知三维空间中的一个点坐标(x,y,z),求该点到原点的距离
已知函数y=2x+3 y=3x+2 求焦点坐标和函数经过的象限
已知抛物线y=-x的平方-2x+a的平方-1/2 确定此抛物线的顶点在第几象限.假设抛物线经过原点,求顶点坐标.
圆的方程x²+y²-6x-8y=0 过坐标原点作长为8的弦,求弦所在方程
已知函数y=(m-3)x+m²-2m-3的图像是经过坐标原点以及第二、四象限的直线,求m的值!
已知函数y=(m-3)x+m²-2m-3的图像是经过坐标原点以及第二、四象限的直线,求m的值
已知函数y=(m-3)x+m^2-2m-3的图象是经过坐标原点以及第二,四象限的直线,求m的值.