锐客网

  1. 首页 > 睿知 > it技术 > >

vb.net坐标图 vb中坐标怎么写

IT技术坐标

vb.net怎么自定义坐标系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"'标示原点
怎么用VB.NET编程实现在桌面随机坐标显示指定的某些图片（随机显示某张图片），望高手帮忙1.首先建立一个基于Microsoft .NET Framework 2.0以上的VB.NET解决方案 。
2.在窗体上面添加一个PictureBox控件，并绑定到父容器里面（绑定到父容器的操作可以不去实现） 。
3.给PictureBox.Image指定路径，这里以“C:\Windows\Web\Wallpaper\Windows\img0.jpg”为例子，当然这张图片在Windows 7旗舰版下面会有的 。
4.添加代码：
Public Class Form1
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Randomize()
Dim xScn As UInteger = My.Computer.Screen.Bounds.Width
Dim yScn As UInteger = My.Computer.Screen.Bounds.Height
ReLine:
Dim xShow As Integer = Int((xScn1) * Rnd()) - Me.Width
Dim yShow As Integer = Int((yScn1) * Rnd()) - Me.Height
Me.FormBorderStyle = Windows.Forms.FormBorderStyle.None
PictureBox1.Image = Image.FromFile("C:\Windows\Web\Wallpaper\Windows\img0.jpg")
PictureBox1.SizeMode = PictureBoxSizeMode.StretchImage
If xShow = 0 And yShow = 0 Then
Me.Location = New Point(xShow, yShow)
Else
GoTo ReLine
End If
Me.Show()
End Sub
End Class
5.我是使用 Visual Studio 2012 Ultimate 开发的 ， 若有错误请参考请他方法进行修改
怎样在vb.net的picturebox里画出坐标?。?/h2>自己用GDI 画的无论什么什么尺寸的picturebox都行
不过别太小了o(∩_∩)o
代码放在哪里自己决定啊
最好是放在 picturebox的resize时间里
每次picturebox大小改变都重画一次坐标
Dim b As New Bitmap(PictureBox1.Width, PictureBox1.Height)
Dim g As Graphics = Graphics.FromImage(b)
g.Clear(Color.White)
Dim p As New Pen(Color.Black)
p.EndCap = Drawing2D.LineCap.ArrowAnchor
g.DrawLine(p, 30, PictureBox1.Height - 30, 30, 30)
g.DrawLine(p, 30, PictureBox1.Height - 30, PictureBox1.Width - 30, PictureBox1.Height - 30)
Dim i As Integer
Dim bs As New SolidBrush(Color.Green)
Dim po As New Point
po.X = 0
po.Y = PictureBox1.Height - 35
For i = 700 To 1000 Step 50
g.DrawString(i, Me.Font, bs, po.X, po.Y)
g.DrawLine(p, po.X28, po.Y5, po.X30, po.Y5)
po.Y -= (PictureBox1.Height - 100) / 6
Next
po.X = 30
po.Y = PictureBox1.Height - 30
For i = 0 To 40 Step 5
g.DrawString(i, Me.Font, bs, po.X, po.Y5)
g.DrawLine(p, po.X, po.Y2, po.X, po.Y)
po.X= (PictureBox1.Width - 100) / 8
Next
PictureBox1.Image = b
vb.net怎么绘制平面直角坐标系创建Graphics对象，可以调用CreateGraphics()直接做图也可以创建Bitmap对象然后调用Graphics.FromBitmap(b)得到Graphics G
G.Clear(Colors.Black)
G.DrawLine(Pens.White, 画线的坐标
VB.NET 坐标查找问题代码就不写了,给你思路,默认左上角是原点,所以x的位置=窗口高度-y.
这样就获得xy
复杂点的办法是重写绘制,绘制十字,
【vb.net坐标图 vb中坐标怎么写】简单点的办法就是十字放到picbox或者image里,然后取中,然后隐藏,确定按钮点击显示,中心位置等于坐标点,然后换算左上角控件位置,然后设置坐标.
关于vb.net在picture.box里面画坐标图的TranslateTransform方法是用来平移对象的 。如果你学过计算机图形学，有个偏移矩阵，就是它了 。
你只要知道TranslateTranform(0,240)表示把图形移动到当前位置 (0,240)的地方就行了 。
ScaleTransform用于缩放对象，1,1的话表示大小不变 。
vb.net坐标图的介绍就聊到这里吧，感谢你花时间阅读本站内容 ， 更多关于vb中坐标怎么写、vb.net坐标图的信息别忘了在本站进行查找喔 。

    推荐阅读


    上一篇：电视老黑屏是什么原因，电视经常黑屏是什么问题

    下一篇：直播内容如何运营，直播内容如何运营起来