189 8069 5689

vb.net画图画程序 vb画图语句

如何用VB.NET调用excel的画图命令,即用.NET得到一组点坐标后,调用excel根据点画出曲线图并显示在VB.NET里

你可以通过用VB.net控制excel,让excel生成曲线图,然后利用excelVBA将图输出,最后导入到VB.net就可以了。

十余年的左权网站建设经验,针对设计、前端、开发、售后、文案、推广等六对一服务,响应快,48小时及时工作处理。营销型网站的优势是能够根据用户设备显示端的尺寸不同,自动调整左权建站的显示方式,使网站能够适用不同显示终端,在浏览器中调整网站的宽度,无论在任何一种浏览器上浏览网站,都能展现优雅布局与设计,从而大程度地提升浏览体验。成都创新互联从事“左权网站设计”,“左权网站推广”以来,每个客户项目都认真落实执行。

用VB编写画图程序

提供一个绘制任意曲线的简单代码。其他功能类似,希望能举一反三。

在窗体中添加一个Picture box,然后输入命令如下:

Dim oldx As Single

Dim oldy As Single

Private Sub Picture1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)

If Button = 1 Then       '当鼠标左建按下时发生

Picture1.Line (oldx, oldy)-(X, Y)

oldx = X

oldy = Y

End If

End Sub

Private Sub Picture1_Mousedown(Button As Integer, Shift As Integer, X As Single, Y As Single)

oldx = X

oldy = Y

End Sub

VB.net中如何画图?

分类: 电脑/网络 程序设计 其他编程语言

问题描述:

VB6中的form1.circle (100,200),rgb(0,255,0)的语句如何在VB中使用啊?

急用啊!!!!!!!!

解析:

VB与VB不同。

VB已经有专门绘图的类。

可以定义笔刷然后用Drawing类中的方法绘制。

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


网站栏目:vb.net画图画程序 vb画图语句
转载来源:http://cdxtjz.cn/article/dogphso.html

其他资讯