双11狂欢大促

盲盒赢 定制羽绒服

开启惊喜盲盒，抽取你的专属好礼

— 惊喜奖品抢先看 —

超级年卡50元券

周边70元券

手机支架

一拖三数据线

雨伞

运动毛巾

电动牙刷

VIP月卡

机械键盘

定制羽绒服

超级年卡50元券

周边70元券

手机支架

一拖三数据线

雨伞

运动毛巾

电动牙刷

VIP月卡

机械键盘

定制羽绒服

在vb.net中，如何使用MSchart完成统计图表

2003-07-03 09:46:20 629 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

suzx 墨衍会员 · AI 创作全网分发关注 + 加入社区

手把手教你用89C52单片机驱动0.96寸OLED（IIC接口，附完整代码）本文详细介绍了如何使用89C52单片机通过I2C接口驱动0.96寸OLED显示屏，包括硬件连接、I2C通信原理、SSD1306驱动芯片的初始化及显存管理技巧，并提供了完整的代码示例和常见问题排查方法，帮助电子爱好者快速掌握OLED显示技术。阅读详情

vb.net中，好像没有MSchart控件，而是activex控件AxMSchart,由于本人对vb 中的MSchart控件不熟悉，所以使用AxMSchart控件就更困难了。请哪为高手指教！谢谢！急，急！

...全文

开源libmodbus编译为32位和64位动态库 libmodbus 是支持Linux，Mac OS X，window 的一个开源库，支持modbus TCP和RTU 两种模式。阅读详情

suzx

VB 16,718 成员 110,520 内容

+ 关注 + 加入社区

切换为时间正序

无极超人 2003-08-18

打赏
举报

在这我推荐使用,Chart FX 图表组件。在这个网址
http://www.softwarefx.com/getchartfxlite 找到，注册并下载了，是一个Free Products，所以你放心用吧。

suzx 2003-07-21

打赏
举报

太好了。我正在找这样的控件，因为我用AXChart做出的统计图，效果不太好。在 VB6.0中用OLE控件，调用Excel统计图。而在VB.Net中没有该控件。所以您给我提供的信息太及时了。多谢！

eliphe 2003-07-19

打赏
举报

推荐使用：
HSkyXChart Web统计图表 2.5

下载地址：http://www.skyec.com/cpxz.asp

附带asp、C#、VB.Net完整演示实例！

带完整演示程序,效果图和接口说明

可以生成柱型图,横柱型图,折线图,饼图,点图,区域图

完全免费

suzx 2003-07-09

打赏
举报

谢谢！你的帮助!

szch 2003-07-03

打赏
举报

大体上一致.
搞清楚cloume和row就行了

Montaque 2003-07-03

打赏
举报

两个一样的。.NET对interop过来的CActivex组件都加一个Ax前缀。
真理了一段代码：

'''
'产生一个数据集
Dim ds As New DataSet
Dim dt As New DataTable
Dim dc As New DataColumn

''''''''Generate A Datatable
'Math : single
dc = New DataColumn
dc.ColumnName = "Math Score"
dc.DataType = System.Type.GetType("System.Single")
dt.Columns.Add(dc)

'English : single
dc = New DataColumn
dc.ColumnName = "English Score"
dc.DataType = System.Type.GetType("System.Single")
dt.Columns.Add(dc)

Dim dr As DataRow
Dim i As Integer
For i = 0 To 10
dr = dt.NewRow
dr.Item(0) = Rnd() * 100
dr.Item(1) = Rnd() * 100
dt.Rows.Add(dr)
Next
dt.TableName = "tblStudent"
ds.Tables.Add(dt)

'''
' Read ChartData from dataset
' Only the first Datatable
'''
Dim ChartData(,) As Object
ReDim ChartData(ds.Tables(0).Rows.Count, ds.Tables(0).Columns.Count)
Dim k, l As Integer
For k = 0 To ds.Tables(0).Rows.Count - 1
For l = 0 To ds.Tables(0).Columns.Count - 1
ChartData(k, l) = ds.Tables(0).Rows(k).Item(l)
Next
Next
Me.AxMSChart1.chartType = MSChart20Lib.VtChChartType.VtChChartType2dXY
Me.AxMSChart1.ChartData = ChartData

✦双11狂欢大促✦

在vb.net中，如何使用MSchart完成统计图表

相关推荐

双11狂欢大促