VB编程,输入平面上任一点的坐标(x,y),判断并显示该点位于哪个象限的信息。详细~
3个回答
展开全部
昏,这么简单
看我的
Function decide(ByVal txt As String)
Dim x, y As Integer
Dim loc As Variant
loc = Split(txt, ",")
x = Val(loc(0))
y = Val(loc(1))
If x > 0 And y > 0 Then
MsgBox "第1象限"
ElseIf x < 0 And y > 0 Then
MsgBox "第2象限"
ElseIf x < 0 And y < 0 Then
MsgBox "第3象限"
ElseIf x > 0 And y < 0 Then
MsgBox "第4象限"
End If
End Function
看我的
Function decide(ByVal txt As String)
Dim x, y As Integer
Dim loc As Variant
loc = Split(txt, ",")
x = Val(loc(0))
y = Val(loc(1))
If x > 0 And y > 0 Then
MsgBox "第1象限"
ElseIf x < 0 And y > 0 Then
MsgBox "第2象限"
ElseIf x < 0 And y < 0 Then
MsgBox "第3象限"
ElseIf x > 0 And y < 0 Then
MsgBox "第4象限"
End If
End Function
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
什么叫“象限的信息”?
追问
就是1,1为第一象限。。。-1,-2为第二象限,以此类推。。。
追答
-1.-2
应该是第三象限吧!
你要显示这个象限的什么信息呢?
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
原点是0,0 吗 ?
追问
没错。。。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询