第13章综合实例.ppt

  1. 1、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
  2. 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  3. 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
第13章综合实例

第13章 综合实例 13.1 统计图的绘制 13.2 电话号码簿系统 本章小结 13.1.1 功能和界面设计 13.1.2 MSChart定制控件 13.1.3 DataGrid控件 13.1.4 DataSet控件 13.1.5 设计代码 1.任务 设计一个统计图设计器,要求该设计器能够根据数据库中所存数据,生成相应的折线图、直方图等多种统计图表。 2.界面设计 在窗体上放置1个MSChart定制控件、1个DataGrid控件和8个按钮。 MSChart是一个以图形方式显示数据的图表。 对MSChart控件的添加方法说明如下: 在【工具箱】中的【Windows窗体】上点击右键,选中弹出菜单的【添加/移除项】选项,将弹出的【自定义工具栏】对话框,选中【COM组件】选项卡,在下面的列表框中选中“Microsoft Chart Control 6.0”,再点击【确认】按钮,然后在【Windows窗体】上双击“Microsoft Chart Control 6.0”图标即可。 一般而言,AMSC控件与数据网格(DataGrid 对象)相关连,可以用数据网格显示图表中的数据。数据网格是存有已图表化数据的表。数据网格中也包括用于在图表中标识系列和分类的标签。设计人员通过从表或数组中插入或输入数据给数据网格填充信息。 DataGrid对象被配置为行和列。可以向该矩阵添加和减去行、列和标签以更改图表的外观。 BackColor——设置偶数行的背景色。 BackgroundColor——设置网格中非行区域的背景颜色。 BorderStyle——设置边框样式。 DataSouce——设置网格所显示数据的数据源。 Font——设置显示的文字字体。 Height——设置控件高度。 Item——设置指定单元格值。 Size——设置控件的高度和宽度。 Visible——设置是否显示该控件。 VisibleColumnCount——设置可见列的数目。 对象——该对象设置可见行的数目。 Width对象——该对象设置控件的宽度。 DataSet控件是ADO.NET中的重要控件,它是从数据库中检索到的数据在内存中的缓存。 1.DataSet控件主要属性 (1)DataSetName:设置当前DataSet控件的名称。 (2)HasErrors:获取指示此DataSet控件的任何表的任何行中是否有错误值。 (3)NameSpace:设置DataSet控件的命名空间。 (4)Prefix:设置XML前缀。 (5)Tables:获取包含在DataSet控件中的表的集合。 2.DataSet控件主要方法 (1)Clear方法:该方法清除DataSet控件。 (2)Copy方法:该方法复制DataSet控件的结构和数据。 (3)ReadXml方法:该方法将XML架构和数据读入DataSet控件。 (4)WriteXml方法:该方法从DataSet控件写XML数据,也可以选择写架构。 1.输入数据 2.折线图 3.立体折线图 4.直方图 5.立体直方图 6.立体域图 7.饼图 8.结束 Private Sub blnl_Click(ByVal sender As System. Object, ByVal e As System.EventArgs) Handles. Blnl_Click Dim rows, cols, r, c As Short Dim a(4) As String a(1)=2000年 a(2)=2001年 a(3)=2002年 a(4)=2003年 OleDbConnection1.Open() OleDbDataAdapter1. Fill(DataSetl1, TABLE1) DataGrid1.DataSource=DataSetl1 rows=DataSetl1.TABLE1.Rows. Count() cols=DataSet11.TABLE1.Columns.Count() AMSC.RowCount=rows AMSC.ColumnCount=cols AMSC.TitleText=DataSet11. TABLE1. TableName. ToString ( ) AMSC.ShowLegend=True For r=1 To AMSC.RowCount AMSC.Row=r AMSC.RowLabe1=a (r) For c=1 To AMSC.ColumnCount AMSC.Column=c AMSC. ColumnLabe1=DataSet11. TABLE1. Columns (c- 1 ). ColumnName AMSC.Data=

文档评论(0)

ailuojue2 + 关注
实名认证
内容提供者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档