vb.net绘制二维图形 vb 绘图

vb中用二维xy绘图怎么弄

使用函数line或pset函数。

line 方法

在对象上画直线和矩形。

语法

object.Line [Step] (x1, 1) [Step] (x2, y2), [color], [B][F]

Line 方法的语法有以下对象限定符和部分：

部分 描述

object 可选的。 对象表达式，其值为“应用于”列表中的对象。如果object 省略，具有焦点的窗体作为object。

Step 可选的。关键字，指定起点坐标，它们相对于由 CurrentX 和 CurrentY 属性提供的当前图形位置。

(x1, y1) 可选的。Single （单精度浮点数），直线或矩形的起点坐标。ScaleMode 属性决定了使用的度量单位。如果省略，线起始于由 CurrentX 和 CurrentY 指示的位置。

Step 可选的。关键字，指定相对于线的起点的终点坐标。

(x2, y2) 必需的。Single （单精度浮点数），直线或矩形的终点坐标。

color 可选的。Long （长整型数），画线时用的 RGB 颜色。如果它被省略，则使用 ForeColor 属性值。可用 RGB 函数或 QBColor 函数指定颜色。

B 可选的。如果包括，则利用对角坐标画出矩形。

F 可选的。如果使用了 B 选项，则 F 选项规定矩形以矩形边框的颜色填充。不能不用 B 而用 F。如果不用 F 光用 B，则矩形用当前的 FillColor 和 FillStyle 填充。FillStyle 的缺省值为 transparent。

说明

画联结的线时，前一条线的终点就是后一条线的起点。

线的宽度取决于 DrawWidth 属性值。在背景上画线和矩形的方法取决于 DrawMode 和 DrawStyle 属性值。

执行 Line 方法时， CurrentX 和 CurrentY 属性被参数设置为终点。

这个方法不能用于With...End With 语句块。

PSet方法：PSet不只是用在PictureBox上，也可以用在窗体上，PSet最主要功用用就是在某一点位置上画一个点，用法是Object.PSet(X,Y), Color：Private Sub Command1_Click()

Picture1.PSet(500,260),RGB(128,0,255)

'RGB函数是以红色、绿色、蓝色来表示颜色，详情请到函数指令参考

End Sub

●若颜色省略，则以PictureBox预设的颜色。

Private Sub Command1_Click()

Picture1.DrawWidth = 10 '线条宽度

Picture1.PSet (500, 260), RGB(128, 0, 255)

Me.DrawWidth = 10

Me.PSet (500, 260), RGB(128, 0, 255)

End Sub

●前面有学到随机数的运用，因此我们来做个范例看看，范例─满天繁星：

Private Sub Timer1()_Timer

Randomize

X = Int(Rnd * Picture1.ScaleWidth)

Y = Int(Rnd * Picture1.ScaleHeight)

R = Int(Rnd * 256)

G = Int(Rnd * 256)

B = Int(Rnd * 256)

Picture1.PSet (X, Y), RGB(R, G, B)

End Sub

相关问答

Q1: VB.net中如何画图？

VB.net与VB不同。

VB.net已经有专门绘图vb.net绘制二维图形的类。

可以定义笔刷然后用Drawing类中vb.net绘制二维图形的方法绘制。

Private Sub DrawEllipse()

Dim myPen As New System.Drawing.Pen(System.Drawing.Color.Red)

Dim formGraphics as System.Drawing.Graphics

formGraphics = Me.CreateGraphics()

formGraphics.DrawEllipse(myPen, New Rectangle(0,0,200,300))

myPen.Dispose()

formGraphics.Dispose()

End Sub

Private Sub DrawRectangle()

Dim myPen As New System.Drawing.Pen(System.Drawing.Color.Red)

Dim formGraphics as System.Drawing.Graphics

formGraphics = Me.CreateGraphics()

formGraphics.DrawRectangle(myPen, New Rectangle(0,0,200,300))

myPen.Dispose()

formGraphics.Dispose()

End Sub

Q2: vb.net绘制曲线图

。net  其实还是很好绘制图形的

你可以看下 Graphics  类

   Dim d As New Bitmap(Me.Width, Me.Height)  ‘一个图片吧

      Dim g As Graphics = Graphics.FromImage(d)’绘制  准备在这个图片是进行

然后  就是你绘制的东西了

线 就是   g.DrawLine()

圆 弧度  就用  g.DrawArc(Pens.Black, New Rectangle(0, 0, 400, 200), 0, 360)

复杂的就是      g.DrawBezier()

 等  如果你用的是 VS的  编译  上面都有详细的参数说明

     Dim d As New Bitmap(Me.Width, Me.Height)

        Dim g As Graphics = Graphics.FromImage(d)

        g.DrawArc(Pens.Black, New Rectangle(0, 0, 200, 200), 0, 360)

        g.DrawLine(Pens.Red, New Point(0, 0), New Point(200, 200))

        g.DrawLines(Pens.Green, New Point() {New Point(0, 0), New Point(50, 40), New Point(50, 80), New Point(90, 70), New Point(100, 400)})

        g.DrawBezier(Pens.Yellow, New Point(0, 100), New Point(0, 0), New Point(200, 0）， New Point(200, 200))

        g.Dispose()

        Me.BackgroundImage = d

Q3: vb.net读取txt的数据作图问题

一、分析：

1，这一类随时间而变化的曲线图，通常把横轴作为时间，把纵轴作为相应的值，在这里就是密度值。

2，点的集合就是线；一组时间、密度值，对应一个点，把点连接起来就构成了线。

二、在VB.NET中作图，需要知道并解决几个问题：

1，与VB6一样，VB.NET中默认的坐标系统，左上角为坐标原点，X轴的正向为从左向右，Y轴的正向是从上向下。

为了使得它与数学中的坐标系统相一致，可以使用VB.NET中Graphics类的两个方法；

1、TranslateTransform----平移变换

格式：Graphics.TranslateTransform(dx,dy)

其中：dx 和 dy分别是Single数据类型

2、ScaleTransform----缩放变换

格式：Graphics.ScaleTransform(sx,sy)

其中：sx 和 sy分别是Single数据类型；

例如：为了符合数学中的一般格式，可以使用下述代码：

Graphics.ScaleTransform(1, -1)

这样就把Y轴的正方向给翻过来了。

三、VB.NET中绘制图形

1，绘制圆或椭圆

'绘制图形的三步曲

'1，获得一个Graphics对象

Dim MyGraphics As Graphics

MyGraphics = Me.CreateGraphics

'2，定义一个Pen对象，用于绘制图形（轮廓线）

Dim MyPen As New Pen(Color.Black)

'3，定义一个Brush对象，用于填充图形（如果需要填充的话）

Dim MyBrush As New SolidBrush(Color.Orange)

'绘制一个实心圆，该圆在：直线x=200，y=200，x=200+100，y=200+100所划的矩形区域内

MyGraphics.FillEllipse(Brush, 200, 200, 100, 100)

'绘制一个空心圆，该圆在：直线x=200，y=200，x=200+100，y=200+100所划的矩形区域内

MyGraphics.DrawEllipse(Pen, 200, 200, 100, 100)

注意：最后两个数值如果不等，就是绘制椭圆

当圆足够小，就是点了。

2，绘制直线

'1，获得一个Graphics对象

Dim MyGraphics As Graphics

MyGraphics = Me.CreateGraphics

'2，定义一个Pen对象，用于绘制图形（轮廓线）

Dim MyPen As New Pen(Color.Black)

MyGraphics.DrawLine(MyPen, 200, 200, 100, 100)

'或者直接用

Me.CreateGraphics.DrawLine(New Pen(Color.Black), 50, 50, 200, 200)

Q4: 二维图形怎么绘制？

1.绘制直线

单击工具栏中的“直线”按钮可实现直线的绘制.在绘图区任一位置选择直线的起点vb.net绘制二维图形，移动鼠标给直线一个方向vb.net绘制二维图形，在命令行输入数字后按回车键确定直线的长度.配合使用下方的“正交”选项，可绘制垂直或水平的直线(连续按“F8”可打开或关闭正交).

2.绘制构造线

单击“构造线”按钮选择构造线命令，直接单击绘图区的任意两点可确定一条构造线.构造线是无限长的一条线，通常用来做参考线使用，如图所示.

绘制构造线

3.绘制多段线

单击“多段线”按钮，可绘制多段线图形.根据命令行的提示，输入相应字母可完成直线、圆弧等的绘制.单击鼠标右键“确定”按钮或使用“回车”“空格”可结束操作.按“Esc”键可放弃选择的命令.多段线绘制出的图形是一个整体.使用多段线还可进行箭头的绘制.单击“多段线”按钮，在视图中任意位置确定箭头的起点，此时命令行出现提示“指定下一个点或[圆弧(A)/半宽(H)/长度(L)/放弃(U)/宽度(W)]：”，输入“W”后按回车键指定起点宽度，此时输入箭头的起点宽度，这里我们输入“0”按回车键即可.再次输入200，指定端点宽度.此时，在命令行中输入“L”按回车键指定箭头的长度，在命令行出现的“指定直线长度：”后面输入数值400按回车键，即可绘制成想要的箭头，如图所示.

多段线绘制箭头

4.绘制多线

输入多线样式名在建筑装饰绘图中，常使用多线来进行墙体等双线条的绘制.多线绘制前，可对多线进行设置，来实现双线或三线的绘制.设置方法是单击“格式”→“多线样式”命令.弹出“多线样式”对话框，单击“新建”按钮，在“新建样式名”中输入需要创建的多线样式名称，这里我们以240墙体为例.单击“继续”按钮，如图所示.

输入多线样式名

勾选直线的“起点”和“端点”选项，选择图元下方的第一个选项，在偏移文本框中输入墙线偏移量，这里我们输入120，在“颜色”下拉列表框中选择“绿”，单击“线型”按钮，弹出“选择线型”对话框，在已加载的线型列表中选择需要的线型，我们选择“ByBlock”单击“确定”按钮，如图所示

设置第一条直线偏移量

5.绘制点

单击工具栏中的“点”按钮，可以进行点的绘制.通常默认的点很小，不选中的情况下很难看到.单击“格式”→“点样式”命令弹出“点样式”对话框，可选择不同的点的样式，也可通过“点大小”选项调整点的大小.装饰工程制图中，常使用点的样式来作为灯的表示符号，如图所示.

点的样式

定数等分：如果要将点按照一定数量等分摆放，可以使用定数等分命令.例如，要在一条指定距离的线段上定数等分摆放5个点，操作方法为单击“绘图”→“点”→“定数等分”命令，单击要等分的线段，5个点会将线段分为6段，所以，在命令行提示中输入线段数目为6，按回车键即可完成操作，如图所示.

点的定数等分

定距等分：如果要使点按规定的距离摆放，则可使用定距等分命令.例如，绘制500长的线段，要在线段上每120的部分绘制一点，单击“绘图”→“点”→“定距等分”命令后，单击要定距等分的线段，指定线段长度为120，按回车键完成点的定距等分绘制，如图所示.

点的定距等分

6.绘制矩形

选择工具栏中的“矩形”按钮，激活矩形命令.矩形命令是通过确定两个对角点的位置来确定矩形的大小的，激活命令后命令行会出现指定第一个角点，确定点的位置后输入相对坐标(@600，200)，表示绘制长600、宽200、相对起点为坐标原点的矩形.如果在指定第一个角点前输入“C”按回车键，则表示绘制带倒角的矩形，命令行提示指定倒角距离，倒角的距离可以相同也可以不同，第一个倒角的距离指的是逆时针方向的倒角距离，第二个倒角距离指的是顺时针方向的倒角距离.在指定矩形角点时还可输入标高、圆角、厚度、宽度、面积、尺寸、旋转等命令，如图所示

矩形命令提示

7.绘制圆

单击工具栏中的“圆”按钮，根据命令行提示“指定圆的圆心或[三点(3P)/两点(2P)/切点、切点、半径(T)]：”，直接单击视图上任意一点，即可确定圆心位置.(1)输入“3P”表示用指定圆周上三点的方法画圆.(2)输入“2P”表示指定直径的两端点画圆.(3)输入“T”表示按先指定两个相切对象，后给出半径的方法画圆.

8.绘制圆弧

单击工具栏中的“圆弧”按钮，激活圆弧命令.圆弧命令需要确定三个点.指定圆弧的起点，指定圆弧的第二个点(圆弧上中间部分的一个点)，指定圆弧的端点.

9.绘制椭圆

单击工具栏中的“椭圆”按钮，激活椭圆命令.根据命令行提示单击视图中任意位置指定椭圆的圆心，单击另一点确定椭圆的其中一个轴的半轴长度.再次单击，确定椭圆另一个轴的半轴长度.命令行提示如图所示。

椭圆命令行提示

10.绘制样条曲线

样条曲线用来绘制形状不规则的曲线，在装饰制图中通常用来绘制花纹.单击工具栏中的“样条曲线”按钮，通过在视图中连续点击创建点来进行曲线的绘制，结束时可单击鼠标右键确定或输入“T”指定端点的切向、输入“C”选择闭合绘制的图形，如图所示.

样条曲线绘制效果

Q5: 第3章 二维绘图

20191217

数据可视化（data visualization）技术指的是运用计算机图形学和图像处理技术，将数据转换为图形或图像在屏幕上显示出来，并进行交互处理的技术。它涉及计算机图形学、图像处理、计算机辅助设计、计算机视觉及人机交互技术等多个领域。

学习目标:

（1）熟悉并掌握简单二维图形显示与绘图函数；

（2）熟悉图形显示的特征控制语句，包括颜色控制、线型控制、线条粗细控制、坐标控制等；

（3）了解其他二维图形显示函数

在 MATLAB中绘制二维图形，通常包括以下步骤:

（1）准备数据；

（2）设置当前绘图区；

（3）绘制图形；

（4）设置图形中曲线和标记点格式；

（5）设置坐标轴和网格线属性；

（6）标注图形；

（7）保存和导出图形。

【例3-1】下面通过示例来演示绘图步骤:在同一坐标轴上绘制cos（x）、cos（2x）和cos（3x）这三条曲线

程序命令如下：

运行结果如图3-1所示。

plot函数是最基本、最常用的绘图函数，用于绘制线性二维图。有多条曲线时，循环使用由坐标轴颜色顺序属性定义的颜色，以区别不同的曲线；之后在循环使用由坐标轴线型顺序属性定义的线型，以区别不同的曲线。它的多种语法格式如下：

（1）plot(Y):若 Y 是一维数组时，plot(Y)是把（i,X(i)）各点顺次连接起来，其中i的取值范围从1到length(X);若 Y 是普通的二维数组时，相当于对 Y 的每一列进行plot(Y(:,i))画线，并把所有的折线累叠绘制在当前坐标轴下。

(2) plot(X,Y):若X和Y都是一维数组时，功能和line(X,Y)类似；但plot函数中的X和Y也可以是一般的二维数组，这时候就是对X和Y的对应列画线。特别的，当X是一个向量，Y是一个在某一方面和X具有相同长度的二维数组时，plot(X,Y)则是对X和Y的每一行（或列）画线。

（3）plot(X1,Y1,X2,Y2,...,Xn,Yn):表示对多组变量同时进行绘图，对于每一组变量，其意义同前所述。

（4）plot(X1,Y1,LineSpec,...):其中LinSpec是一个指定曲线颜色、线型等特征的字符串。可以通过它来指定曲线的线型、颜色以及数据点的标记类型，如表3-1所示。这在突出显示原始数据点和个性化区分多组数据的时候是十分有用的。

【例3-2】 绘制矩阵的图形

程序命令如下：

【例3-3】利用line函数绘制cos函数图形

程序命令如下：

运行结果如图3-3所示。

【例3-4】画同心圆。

程序命令如下：

运行结果如图3-4所示。

【例3-5】利用plot函数绘制函数效果图，并对其进行线型设置。

程序命令如下：

运行结果如图3-5所示。

在 MATLAB中， figure函数用于创建一个新的图形对象。图形对象会在屏幕上单独的窗口中输出。

subplot函数用于生成与控制多个坐标轴把当前图形窗口分隔成几个矩形部分，不同的部分是按行方向以数字进行标号的。每一部分有一坐标轴，后面的图形输出于当前的部分中。 subplot函数的用法有以下几种

（1）h＝subplot（m，n，p）/subplot（mnp）:将 figure划分为m*n块，在第p块创建坐标系，并返回它的句柄。当m、n、p＜10时，可以简化为 subplot（mnp）或者 subplotmnp。

subplot是将多个图画到同一个平面上的工具。其中，m表示是图排成m行，n表示图排成n列，也就是整个 figure中有n个图是排成一行的，一共m行，如果第一个数字是2就是表示2行图。p是指要把曲线画到 figure中哪个图上，如果是1表示是从左到右第一个位置。

（2）subplot（m，n，p，＇replace＇＇）:创建新坐标系来替换已存在的所指定的坐标系。

（3）subplot（m，n，P）:此时P为向量，表示将P中指定的小块合并成一个大块创建坐标系，P中指定的小块可以不连续，甚至不相连。

比如 subplot（2，3，［2 5］）表示将第2和5小块连成一个大块； subplot（2，3，［2 6］）由于2和6不连续也不相连，此时表示将第2、3、5和6四块连成一个大块，相当于 subplot（2，3，［2 3 5 6］）。

（4）subplot（h）:将坐标系h设为当前坐标系，相当于axes（h）

（5） subplot（＇Position＇，［left bottom width height］）在指定位置创建一个新坐标系，等效于axes（＇Position＇，［left bottom width height］）。

（6）subplot（...， propl， valuel，prop2 ，value2，...）:在创建坐标系时，同时设置相关属性。

（7）h＝ subplot(...):返回所创建坐标系的句柄。

【例3-6】画出参数方程的图形。 程序命令如下:

运行结果如3-6所示。

【例 3-7】利用subplot(m,n, P)函数对图形进行分割。

程序命令如下。

运行结果如图3-7所示。

运行结果如图3-8所示。

关于vb.net绘制二维图形和vb 绘图的介绍到此就结束了，不知道你从中找到你需要的信息了吗 ？如果你还想了解更多这方面的信息，记得收藏关注本站。