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