首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VB >

VB画线解决方法

2012-12-28 
VB画线请问一下,如何利用VB根据记事本中的两列数据来画出线条来。就像根据直角坐标系来画样条曲线一样![最

VB画线
请问一下,如何利用VB根据记事本中的两列数据来画出线条来。就像根据直角坐标系来画样条曲线一样!
[最优解释]
思路:
1、使用Open语句读取记事本数据
2、将读来的数据存入一个二维数组
3、将这个数组赋值给一个MSChart,实现曲线绘制。
[其他解释]
GDI+画线:
先到网站下载mGdip.bas:http://www.cmd58.com/ku_web/UploadFile/201042114530261.rar

Option Explicit

Dim Graphics As Long
Dim pen As Long

Private Sub Form_Load()
    Me.AutoRedraw = True
    Me.ScaleMode = 3
    
    InitGDIPlus '初始化GDI+
    GdipCreateFromHDC Me.hDC, Graphics
    GdipCreatePen1 &HFFFF0000, 1, UnitPixel, pen
    GdipDrawLineI Graphics, pen, 1, 5, 2, 12
    GdipDrawLineI Graphics, pen, 3, 20, 4, 16
    GdipDrawLineI Graphics, pen, 5, 4, 6, 1
End Sub

Private Sub Form_Unload(Cancel As Integer)
    GdipDeletePen pen           '删除这个笔(pen)
    GdipDeleteGraphics Graphics '释放graphics占用的内存

    TerminateGDIPlus '卸载GDI+
End Sub

[其他解释]
文件操作+样条曲线函数+画线函数
[其他解释]
引用:
MSChart是什么函数啊?没有接触过耶!

mschart不是函数,它是图表控件。可以画直方图,折线图、散点图等。

[其他解释]
引用:
文件操作+样条曲线函数+画线函数

同意此楼说法。
[其他解释]
我现在知道了,嘿嘿。。。
[其他解释]
引用:
文件操作+样条曲线函数+画线函数

能给写一段代码吗?没有接触过样条曲线函数。比如给出以下数据,将他们平滑地连接,还要有坐标系等。
1 5
2 12
3 20
4 16
5 4
6 1
[其他解释]
引用:
思路:
1、使用Open语句读取记事本数据
2、将读来的数据存入一个二维数组
3、将这个数组赋值给一个MSChart,实现曲线绘制。

MSChart是什么函数啊?没有接触过耶!
[其他解释]
引用:
引用:


MSChart是什么函数啊?没有接触过耶!

mschart不是函数,它是图表控件。可以画直方图,折线图、散点图等。
O(∩_∩)O谢谢
[其他解释]
引用:
请问一下,如何利用VB根据记事本中的两列数据来画出线条来。就像根据直角坐标系来画样条曲线一样!


MSChart是个比较简单的方法
[其他解释]
很好加入timer
[其他解释]
你要折线还是曲线呀,折线容易点,曲线就难多了
[其他解释]
该回复于2012-11-20 13:20:28被管理员删除
------其他解决方案--------------------


1111fdsfdsfds

热点排行