編程求坐標象限

Ⅰ 大學VB坐標象限按要求與步驟的怎麼編程

Visual Basic 6.0 編程工具
步驟/方法
打開Visual basic6.0(一下簡稱vb),新建一個標准EXE，設置控制項：

雙擊Form1窗體：復制如下代碼粘貼到Form1代碼窗口：
Private Sub Command1_Click()
Dim Rects As RECT, ExecuteValue As Boolean
Dim MousePoint As POINTAPI
ExecuteValue = GetDesktopWindowRect(Command2.Hwnd, Rects, MousePoint)
Debug.Print "ExecuteValue=" & ExecuteValue
Debug.Print "Rects.Top=" & Rects.Top
Debug.Print "Rects.Left=" & Rects.Left
Debug.Print "Rect.Bottom=" & Rects.Bottom
Debug.Print "Rect.Right=" & Rects.Right
Debug.Print "MousePoint.X= " & MousePoint.X
Debug.Print "MousePoint.Y=" & MousePoint.Y
'MsgBox "執行結果請看立即窗口！", 48, "提示"
End Sub
Private Sub Command2_Click()
SetCursorToControl Command1.Hwnd
End Sub
Private Sub Label2_Click()
End Sub
【復制代碼到Form1代碼窗口】

點擊 工程菜單》添加模塊》點擊打開：

把如下代碼復制到所示的窗口：
'Programming By Kejisoft (http://Hi.Bai.com/Kejisoft)
'Date：2011-02-10
'Functions：
' GetDesktopWindowRect
' 獲取一個控制項在屏幕用Rect描述的位置
' SetCursorToControl
' 設置滑鼠指針到一個控制項
'Version：1.0.0.0
'IDE:Microsoft Visual Basic 6.0企業版
Declare Function GetDesktopWindow Lib "user32" () As Long
Declare Function GetWindowRect Lib "user32" (ByVal Hwnd As Long, lpRect As RECT) As Long
Type RECT
Left As Long
Top As Long
Right As Long
Bottom As Long
End Type
Declare Function GetCursorPos Lib "user32" (lpPoint As POINTAPI) As Long
Type POINTAPI
X As Long
Y As Long
End Type
Declare Function SetCursorPos Lib "user32" (ByVal X As Long, ByVal Y As Long) As Long
Public Function GetDesktopWindowRect(Hwnd As Long, Rct As RECT, MousePos As POINTAPI) As Boolean
Dim execute As Integer
execute = GetWindowRect(Hwnd, Rct)
GetDesktopWindowRect = IIf(execute = 0, False, True)
GetCursorPos MousePos
End Function
Public Function SetCursorToControl(ControlHwnd As Long) As Boolean
Dim Rect2 As RECT, MousePos2 As POINTAPI
Dim ControlX As Long, ControlY As Long
SetCursorToControl = GetDesktopWindowRect(ControlHwnd, Rect2, MousePos2)
'計算控制項的中心位置坐標
ControlX = Rect2.Left + ((Rect2.Right - Rect2.Left) / 2)
ControlY = Rect2.Top + ((Rect2.Bottom - Rect2.Top) / 2)
SetCursorPos ControlX, ControlY
End Function

5
下一步可以按F5運行測試效果，完成！

Ⅱ 用vb編寫程序,單擊按鈕後,通過輸入對話框輸入點的兩個坐標,判斷點在哪一個象限,並在窗體輸出判斷結果

你要先規劃你的坐標系。
如X軸取-500到500
Y軸取-500到500

if X>0 and Y>0 then print "第一象限「
if X>0 and Y<0 then print "第四象限「
if X<0 and Y>0 then print "第二象限「
if X<0 and Y<0 then print "第三象限「

若有（-333，450）則 "第二象限「

參見下面
scale(x1,y1)-(x2,y2)『定義坐標系
你只要記住，這里的x1,y1是左上角的坐標，x2,y2是右下角的坐標，通過這兩個點的坐標設定，就可以決定坐標原點的位置以及坐標軸的方向了，比如
Scale
(-300,200)-(300,-200)
以上是把坐標原點設在窗體中心，x軸長600，方向從左到右，y軸長400，方向從下向上。
Scale
(800,0)-(0,600)
以上是把坐標原點設在窗體右上角，x軸長800，方向從右到左，y軸長600，方向從上向下。

下面說坐標軸和原點的標示法：
假定自定義坐標設為：
Scale
(-300, 200)-(300, -200)
則
Line (-300, 0)-(300, 0) '畫x軸
Line (0,
200)-(0, -200) '畫y軸
CurrentX = 290
CurrentY = -5
Print "x"
'標示x軸
CurrentX = 5
CurrentY = 200
Print "y" '標示y軸
CurrentX =
5
CurrentY = -5
Print "0" '標示原點

Ⅲ 程序輸入一個平面坐標系的x、y坐標,輸出該點在坐標系的四個象限中的哪一個,或者在x坐標或y坐標或原點上

if else語句判斷呀，如果x=0怎樣，y=0怎樣，都等於0怎樣，都不為0的時候x>0,y>0是第一象限。。總之就是判斷每種情況咯~~

Ⅳ 1,輸入兩個數代表一個點的坐標(x,y),然後判斷點(x,y)屬於哪一個象限.用C語言編程寫

#include <stdio.h>
int main() {
int x,y;
printf("輸入2個整數(空格隔開,q退出):\n");
while(scanf("%d%d",&x,&y) == 2) {
if(x == 0) {
if(y == 0) printf("(0,0)在坐標原點\n");
else if(y > 0) printf("(0,%d)在Y上半軸上\n",y);
else printf("(0,%d)在Y下半軸上\n",y);
}
else if(x < 0) {
if(y < 0) printf("(%d,%d)在第三象限\n",x,y);
else if(y == 0) printf("(%d,0)在X左半軸上\n",x);
else printf("(%d,0)在第二象限\n",x);
}
else {
if(y < 0) printf("(%d,%d)在第四象限\n",x,y);
else if(y == 0) printf("(%d,0)在X左半軸上\n",x);
else printf("(%d,%d)在第一象限\n",x,y);
}
printf("輸入2個整數(空格隔開,q退出):\n");
}
return 0;
}

Ⅳ 編程 輸入一平面坐標點(x,y),判斷並輸出該坐標點位於哪個象限c語言

#include<stdio.h>

int x,y;
char *output[20];
int p;

void main(){
printf("請輸入一個坐標如：3,3\n");
while(scanf("%d,%d",&x,&y)!=EOF)
{

if(x > 0 && y > 0)
p=1;
else if(x > 0 && y < 0)
p=4;
else if(x < 0 && y > 0)
p=2;
else if(x < 0 && y < 0)
p=3;

switch(p){
case 1:*output = "第一象限\n";break;
case 4:*output = "第四象限\n";break;
case 2:*output = "第二象限\n";break;
case 3:*output = "第三象限\n";break;
}
printf("%s",*output);
}
}

Ⅵ 從鍵盤上輸入直角坐標繫上一個點的坐標（x,y）,編程實現判斷該點屬於第幾象限

printf("(%.2f,%.2f)在第..象限!\n",x,y); -- 去掉所有 輸出語句里的 & 即可。

Ⅶ 編程，輸入平面上任意一點的坐標（x，y），判斷並顯示該點位於哪個象限的信息。

開始
輸入X,Y
是 判斷：x＞0？ 否
判斷Y＞0？ 判斷Y＜0？
是 否 是 否
輸出第一象限 輸出第四象限 輸出第三象限 輸出第二象限

Ⅷ c語言編程問題：輸入4個任意數字，然後按從小到大的順序輸入坐標點（x，y），輸出該點所在的象限。代碼是：

1、打開自己的Python語言編程的IDLE。

Ⅸ 如何用VB編程：用點的坐標判斷它在第幾象限

Private Sub Form_Load()
Dim x As Double, y As Double
x = CDbl(InputBox("輸入x的坐標"))
y = CDbl(InputBox("輸入x的坐標"))

If x > 0 And y > 0 Then
MsgBox "第一象限"
ElseIf x > 0 And y < 0 Then
MsgBox "第四象限"
ElseIf x < 0 And y > 0 Then
MsgBox "第二象限"
ElseIf x < 0 And y < 0 Then
MsgBox "第三象限"
ElseIf x = 0 And y = 0 Then
MsgBox "原點"
ElseIf x = 0 Then
MsgBox "y軸"
ElseIf y = 0 Then
MsgBox "x軸"
End If
End Sub