VB如何畫坐標軸?。?！

VB畫坐標軸方法：

網(wǎng)站建設(shè)哪家好，找成都創(chuàng)新互聯(lián)公司！專注于網(wǎng)頁設(shè)計、網(wǎng)站建設(shè)、微信開發(fā)、微信小程序定制開發(fā)、集團企業(yè)網(wǎng)站建設(shè)等服務(wù)項目。為回饋新老客戶創(chuàng)新互聯(lián)還提供了華安免費建站歡迎大家使用！

Private Sub Form_paint()

Dim i, j As Integer

Me.CurrentX = 0

Me.CurrentY = 0

Print 0

Me.ScaleMode = 3

Me.Line (0, 0)-(0, 3000)

Me.Line (0, 0)-(3000, 0)

For i = 100 To 3000 Step 100

Me.Line (i, 0)-(i, 10)

temp = i

CurrentX = i - TextWidth(temp) / 2

Print i

Next

For i = 100 To 3000 Step 100

Me.Line (0, i)-(10, i)

temp = i

CurrentY = i - TextHeight(temp) / 2

Print i

Next

End Sub

加箭頭

Private Sub Form_paint()

Dim i, j As Integer

Me.CurrentX = 10

Me.CurrentY = 10

Print 0

Me.ScaleMode = 3

Me.Line (10, 10)-(10, 600)

Me.Line (10, 10)-(600, 10)

For i = 100 To 500 Step 100

Me.Line (i, 10)-(i, 20)

temp = i

CurrentX = i - TextWidth(temp) / 2

Print i

Next

For i = 100 To 500 Step 100

Me.Line (10, i)-(20, i)

temp = i

CurrentY = i - TextHeight(temp) / 2

Print i

Next

Me.Line (590, 20)-(600, 10) 'x箭頭

Me.Line (590, 0)-(600, 10) 'x箭頭

Me.Line (0, 590)-(10, 600) 'y箭頭

Me.Line (20, 590)-(10, 600) 'y箭頭

End Sub

vb.net怎么自定義坐標系

scale(x1,y1)-(x2,y2)

你只要記住，這里的x1,y1是左上角的坐標，x2,y2是右下角的坐標，通過這兩個點的坐標設(shè)定，就可以決定坐標原點的位置以及坐標軸的方向了，比如

Scale (-300,200)-(300,-200)

以上是把坐標原點設(shè)在窗體中心，x軸長600，方向從左到右，y軸長400，方向從下向上。

Scale (800,0)-(0,600)

以上是把坐標原點設(shè)在窗體右上角，x軸長800，方向從右到左，y軸長600，方向從上向下。

下面說坐標軸和原點的標示法：

假定自定義坐標設(shè)為：

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" '標示原點

vb.net怎么繪制平面直角坐標系

創(chuàng)建Graphics對象，可以調(diào)用CreateGraphics()直接做圖也可以創(chuàng)建Bitmap對象然后調(diào)用Graphics.FromBitmap(b)得到Graphics G

G.Clear(Colors.Black)

G.DrawLine(Pens.White, 畫線的坐標

如何用vb畫坐標系？

坐標原點默認是左上角，可以改變的，F(xiàn)ORM1.SCALE

(X1,Y1)-(X2,Y2)橫坐標范圍是從X1到X2，縱坐標是從Y1到Y(jié)2，若坐標設(shè)在窗體中間，則FORM1.SCALE

(-ME.WIDTH/2,-ME.HEIGTH/2)-(ME.WIDTH/2,ME.HEIGTH/2),畫橫坐標ME.LINE

(-ME.WIDTH/2,0)-(ME.WIDTH/2,0)

畫縱坐標FORM1.LINE

(0,-ME.HEIGTH/2,0,ME.HEIGTH/2)

vb.net怎么繪制帶坐標軸的的一次函數(shù)？最好附上源碼。

1、利用公式求出Y值 　第一列設(shè)置表頭為x，下面依次填入取值， 比如 x 1 2 3 4 ...... 第二例表頭設(shè)置為y，在下面表格中填入計算公式 如 =2*x+1 然后選中點右下角的十字型標記，拖下去，和前面x數(shù)量一致。 2、然后選中數(shù)據(jù)源（即選中要進行操作的數(shù)據(jù)區(qū)域，這里指XY值所在區(qū)域。） 3、執(zhí)行菜單命令插入——圖表——XY散點圖 　執(zhí)行命令，打開圖表向?qū)υ捒蜻xXY散點圖－－選平滑線散點圖－－完成　 最后使用圖表向?qū)г跈M坐標填入x值，縱坐標填入y值，生成圖即可 將一次函數(shù)的Y列用公式編輯出來，分別填寫出當取不同的X值時得到不的函數(shù)值，選擇函數(shù)值所在列，插入——圖表按提示操作。執(zhí)行菜單命令 執(zhí)行菜單命令