Foxtable(狐表) → 用户栏目 → 专家坐堂 → 图表问题


  共有2619人关注过本帖树形打印复制链接

主题：图表问题
帅哥哟，离线，有人找我吗？
lin98
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：六尾狐 帖子：1381 积分：9209 威望：0 精华：0 注册：2020/11/4 22:15:00 		图表问题  发帖心情 Post By：2024/3/12 9:45:00 [只看该作者]

  Dim i As Integer
Dim Chart As WinForm.Chart = e.Form.Controls("Chart1") 
Dim C1Cha As C1.Win.C1Chart.C1Chart = Chart.BaseControl
Dim Series As WinForm.ChartSeries 
Chart.VisualEffect = True 
'Chart.ChartType = ChartTypeEnum.Bar
Chart.ChartType = ChartTypeEnum.XYPlot
chart1.Parent = pictureBoxBackground ' 
报错提示chart1被保护不能访问，如何处理？

chart1.Series.Clear() 
Dim series As New Series("MySeries") 
chart1.Series.Add(series) 
series.ChartType = SeriesChartType.Line ' 
  
 
For i As Integer = 0 To 9 
    series.Points.AddXY(i, i + Rand.Next(5)) 
Next 
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：112337 积分：571929 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2024/3/12 9:50:00 [只看该作者]

chart.Parent = pictureBoxBackground

 回到顶部
帅哥哟，离线，有人找我吗？
lin98
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：六尾狐 帖子：1381 积分：9209 威望：0 精华：0 注册：2020/11/4 22:15:00 		  发帖心情 Post By：2024/3/12 10:34:00 [只看该作者]

'Using System.Windows.Forms.DataVisualization.Charting 
'Dim Chart As WinForm.Chart '定义一个图表变量
'Dim Series As WinForm.ChartSeries '定义一个图系变量
'Chart = e.Form.Controls("Chart1") ' 引用窗口中的图表
'' 设置图表的背景色为透明或与背景图匹配的颜色  
        
''        Chart.BorderSkin.SkinStyle = BorderSkinStyle.None ' 移除图表边框  

'' 移除图表的边框  
'Chart.ChartAreas(0).AxisX.LineWidth = 0 
'Chart.ChartAreas(0).AxisY.LineWidth = 0 
'Chart.BorderWidth = 0 

        

'Chart.SeriesList.Clear() '清除图表原来的图系
'Series = Chart.SeriesList.Add() '增加一个图系
'Series.Length = 10 '新增图系包括10个数据点
'For i As Integer = 0 To 9 '指定每个数据点的位置
'    Series.X(i) = i '指定水平坐标
'    Series.Y(i) = i + Rand.Next(5) '垂直坐标用随机数生成
'Next

'End Using

报错：Using System.Windows.Forms.DataVisualization.Charting中DataVisualization不是Forms的成员？
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：112337 积分：571929 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2024/3/12 10:36:00 [只看该作者]

foxtable没有这种东西，不要随便创造用法

 回到顶部
帅哥哟，离线，有人找我吗？
lin98
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：六尾狐 帖子：1381 积分：9209 威望：0 精华：0 注册：2020/11/4 22:15:00 		  发帖心情 Post By：2024/3/12 10:48:00 [只看该作者]

Dim Chart As WinForm.Chart '定义一个图表变量
Dim Series As WinForm.ChartSeries '定义一个图系变量
Chart = e.Form.Controls("Chart1") ' 引用窗口中的图表
'        Chart.BorderSkin.SkinStyle = BorderSkinStyle.None ' 移除图表边框  
        

' 移除图表的边框  
Chart.ChartAreas(0).AxisX.LineWidth = 0 
报错：ChartAreastion不是WinForm.Chart的成员
Chart.ChartAreas(0).AxisY.LineWidth = 0 
Chart.BorderWidth = 0 

Series = Chart.SeriesList.Add() '增加一个图系
        

Chart.SeriesList.Clear() '清除图表原来的图系
Series.Length = 10 '新增图系包括10个数据点
For i As Integer = 0 To 9 '指定每个数据点的位置
    Series.X(i) = i '指定水平坐标
    Series.Y(i) = i + Rand.Next(5) '垂直坐标用随机数生成
Next
'Using System.Windows.Forms.DataVisualization.Charting 
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：112337 积分：571929 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2024/3/12 11:30:00 [只看该作者]

不要网上搜一些foxtable不存在的东西乱套。可以在本论坛搜索
 回到顶部
帅哥哟，离线，有人找我吗？
cd_tdh
 小大  7楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：狐精 帖子：3223 积分：21413 威望：0 精华：0 注册：2016/3/28 16:57:00 		  发帖心情 Post By：2024/3/12 11:32:00 [只看该作者]

Dim b2 As C1.Win.C1Chart.C1Chart = e.Form.Controls("Chart2").BaseControl
b2.BackColor = Color.white   'Transparent
b2.ChartArea.Style.BackColor = Color.white  'Aqua   '图板颜色
b2.ChartArea.Style.Border.BorderStyle = 0  '图板外形框线型
b2.ChartArea.Style.GradientStyle = 0    '图板外形框样式
b2.Style.Border.BorderStyle = C1.Win.C1Chart.BorderStyleEnum.None
b2.ChartArea.Style.Border.BorderStyle = C1.Win.C1Chart.BorderStyleEnum.None

参照这样写
[此贴子已经被作者于2024/3/12 11:36:12编辑过]
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04785 秒, 4 次数据查询