vb.net数据分析 vbnet reportviewer
vb.net读取txt的数据作图问题
一、分析:
为白云等地区用户提供了全套网页设计制作服务,及白云网站建设行业解决方案。主营业务为网站建设、做网站、白云网站设计,以传统方式定制建设网站,并提供域名空间备案等一条龙服务,秉承以专业、用心的态度为用户提供真诚的服务。我们深信只要达到每一位用户的要求,就会得到认可,从而选择与我们长期合作。这样,我们也可以走得更远!
1,这一类随时间而变化的曲线图,通常把横轴作为时间,把纵轴作为相应的值,在这里就是密度值。
2,点的集合就是线;一组时间、密度值,对应一个点,把点连接起来就构成了线。
二、在VB.NET中作图,需要知道并解决几个问题:
1,与VB6一样,VB.NET中默认的坐标系统,左上角为坐标原点,X轴的正向为从左向右,Y轴的正向是从上向下。
为了使得它与数学中的坐标系统相一致,可以使用VB.NET中Graphics类的两个方法;
1、TranslateTransform----平移变换
格式:Graphics.TranslateTransform(dx,dy)
其中:dx 和 dy分别是Single数据类型
2、ScaleTransform----缩放变换
格式:Graphics.ScaleTransform(sx,sy)
其中:sx 和 sy分别是Single数据类型;
例如:为了符合数学中的一般格式,可以使用下述代码:
Graphics.ScaleTransform(1, -1)
这样就把Y轴的正方向给翻过来了。
三、VB.NET中绘制图形
1,绘制圆或椭圆
'绘制图形的三步曲
'1,获得一个Graphics对象
Dim MyGraphics As Graphics
MyGraphics = Me.CreateGraphics
'2,定义一个Pen对象,用于绘制图形(轮廓线)
Dim MyPen As New Pen(Color.Black)
'3,定义一个Brush对象,用于填充图形(如果需要填充的话)
Dim MyBrush As New SolidBrush(Color.Orange)
'绘制一个实心圆,该圆在:直线x=200,y=200,x=200+100,y=200+100所划的矩形区域内
MyGraphics.FillEllipse(Brush, 200, 200, 100, 100)
'绘制一个空心圆,该圆在:直线x=200,y=200,x=200+100,y=200+100所划的矩形区域内
MyGraphics.DrawEllipse(Pen, 200, 200, 100, 100)
注意:最后两个数值如果不等,就是绘制椭圆
当圆足够小,就是点了。
2,绘制直线
'1,获得一个Graphics对象
Dim MyGraphics As Graphics
MyGraphics = Me.CreateGraphics
'2,定义一个Pen对象,用于绘制图形(轮廓线)
Dim MyPen As New Pen(Color.Black)
MyGraphics.DrawLine(MyPen, 200, 200, 100, 100)
'或者直接用
Me.CreateGraphics.DrawLine(New Pen(Color.Black), 50, 50, 200, 200)
vb6和vb.net如何选择?
vb6多线程没有vb.net方便
vb6可以在win10上运行,开发的程序也可以不用担心无法运行的问题 都向下兼容的
理论和现实上 都不会让vb6开发的程序无法运行
够用,只不过是因为处理文件上没有多线程 速度上可能会慢点而已
这个因人而异,每个人的理解能力不同,编程逻辑思想比较重要,语法不同比较容易解决
VB.net/C#编程:我需要将Excel表格的部分数据导入到DataGridView进行进一步分析
DataGridView没有存储功能,不叫导入,他是显示、读取、编辑数据用的。如果你的Grid里有数据他来自哪个表啊?你就要分析哪个表与Excel表的关系,而不是Grid与Excel表的关系。用Grid可以直接连接Excel表,不需要做导入操作,估计你意思是Grid里有数据了,修改里面的数据插入Excel匹配数据项。先可以读取Excel数据,然后插入到你Grid显示的表里,而不是Grid里。
OleDbConnection cnn=new OleDbConnection();
cnn.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + Application.StrartUpPath + "/Excel名称.xls;Extended Properties='Excel 8.0;HDR=YES'";
cnn.Open();
try
{
sql="Select 字段名 From [Sheet1$] where 条件表达式";
OleDbDataAdapter oda=new OleDbDataAdapter(sql,cnn);
DataSetds=new DataSet();
oda.Fill(ds);
if(ds.Tables[0].Rows.Countamp;gt;0)
{
//...继续连接数据库,也填充一个DataSet对象ds1
//...把Excel数据循环遍历方式或者用跨数据库方式(或ACCESS整理方式)插入数据库
dataGridView.DataSource=ds1.Tables[0];
}
}
catch
{
cnn.Close();
MessageBox.Show("数据库文件丢失","系统消息");
}
finnly
{
cnn.Close();
}
sql 为string
不知道你看懂没有
文章标题:vb.net数据分析 vbnet reportviewer
网站链接:http://pwwzsj.com/article/dospsho.html