رسم نمودار در vb.net

[solmaz_zm]

می خواستم بدونم آیا میشه (با استفاده از داده های درون یک dbgrid یا خروجی یک query )در vb نموداری در اکسل رسم کرد.
اگه امکانش هست،به چه صورت؟

[najafzade]

می خواستم بدونم آیا میشه (با استفاده از داده های درون یک dbgrid یا خروجی یک query )در vb نموداری در اکسل رسم کرد.
اگه امکانش هست،به چه صورت؟

خروجیها رو میشه به یک فایل excel اکسپورت کرد.
خود crystal report بهترین امکانات رو داره.:متفکر:

[solmaz_zm]

یعنی در crystal report می شه نمودار رسم کرد.(من تا حالا باهاش کار نکردم.)؟؟؟

[solmaz_zm]

لطفا یک نفرکمک کنه؟؟

[steghlalt]

اگه بشه که عالیه منم بهش نیاز دارم

[Vahab]

اگه دوستان راهنمائی کنن خوبه چون منم لنگ همین موضوع هستم

[davood-ahmadi]

یک فرم جدید بسازید و موارد زیر بصورت ویزاردی انجام دهید:
1- یک کانکشن به بانک مربوطه
2- یک دیتاآداپتر به جدول مربوطه
3- ساخت یک دیتا ست از جدول مورد نظر
4- ایجاد یک فایل کریستال ریپورت
5- انتخاب گزینه ویزارد کریستال ریپورت و انتخاب دیتاست و در انتخابهای بعدی ، انتخاب چارت را انجام دهید

اگر کمی با گزارشگیری کار کرده باشید حتماً می توانید به هدفتون برسید

[mhddns]

چرا خودتان را اذیت می کنید ؟
از کامپوننت Dundas استفاده کنید:
c:\dundas.bmp

اگه نیاز داشتی بگو

[Sub Zero]

چرا خودتان را اذیت می کنید ؟
از کامپوننت Dundas استفاده کنید:
c:\dundas.bmp

اگه نیاز داشتی بگو
اگه ممکنه یه سورس که حاوی این کامپوننت باشه رو برای دوستان و بنده بزارید

[VisualStudio]

چرا خودتان را اذیت می کنید ؟
از کامپوننت Dundas استفاده کنید:
c:\dundas.bmp

اگر نسخه فول این کامپوننت را دارید بزارید

[VisualStudio]

با این کد هم میتوانید نمودار دایره ای بکشید من امتحان نکردم فقط این کد را از جایی کپی کردم

' ----------------------------------------
' Required Imports :
'
' Microsoft.VisualBasic
' System.Drawing
' System
' ----------------------------------------
' Shows how to call the DrawPieChart method
Public Sub DrawPieChartHelper()
Dim percents() As Integer = {10, 20, 70}
Dim colors() As Color = {Color.Red, Color.CadetBlue, Color.Khaki}
Dim graphics As Graphics = Me.CreateGraphics
Dim location As Point = New Point(10, 10)
Dim size As Size = New Size(150, 150)
DrawPieChart(percents, colors, graphics, location, size)
End Sub

' Draws a pie chart.
Public Sub DrawPieChart(ByVal percents() As Integer, ByVal colors() As Color, _
ByVal surface As Graphics, ByVal location As Point, ByVal pieSize As Size)
' Check if sections add up to 100.
Dim sum As Integer = 0
For Each percent As Integer In percents
sum += percent
Next
If sum <> 100 Then
Throw New ArgumentException("Percentages do not add up to 100.")
End If
If percents.Length <> colors.Length Then
Throw New ArgumentException("There must be the same number of percents and colors.")
End If
Dim percentTotal As Integer = 0
For percent As Integer = 0 To percents.Length() - 1
surface.FillPie( _
New SolidBrush(colors(percent)), _
New Rectangle(location, pieSize), CType(percentTotal * 360 / 100, Single), CType(percents(percent) * 360 / 100, Single))
percentTotal += percents(percent)
Next
Return
End Sub