المساعد الشخصي الرقمي

مشاهدة النسخة كاملة : VS2010 Chart Control [modified]



C# Programming
07-02-2010, 01:50 AM
Hi all,

Could you please let me know which property of the chart object will allow me to format values in Currency?

I want to have my Y axis to show Currency Amonut Like ($100,$200,%300 etc...)

Here is my code..

How can i format the chart control so that the revenue apprears in £ sign?

At the moment its jUst showing Numbers not having a $ sign.

Here is Code:

With dt



.Columns.Add(New DataColumn("Hours", System.Type.GetType("System.String")))
.Columns.Add(New DataColumn("Revenue", System.Type.GetType("System.String")))

.PrimaryKey = New DataColumn() {dt.Columns("Hour")}

End With

Using con As SqlConnection = New SqlConnection(Session("ConnectionString").ToString)
Using com As SqlCommand = New SqlCommand(strCommand, con)
con.Open()
Dim i As Integer = 0
Using reader As SqlDataReader = com.ExecuteReader
While reader.Read()
' Dim sSeries As String = reader(0).ToString.Trim.


Dim sSeries As String = reader.GetName(i)
Dim dr As DataRow
Dim sData As String = ConvertToString(reader(0))
If sData = "Total" Then

Else

' For f As Integer = 1 To reader.

dr = dt.NewRow()
'dr("Hour") = reader.GetName(i)
Try
dr("Hours") = Convert.ToString(reader(0))
dr("Revenue") = Convert.ToDecimal(reader(1))
Catch ex As Exception
End Try

dt.Rows.Add(dr)

dt.AcceptChanges()
End If

End While
Dim Count As Integer = dt.Rows.Count
If Count = 0 Then
Exit Sub
End If
With Chart1

.Titles.Add("Revenue Generated by Hour and Channel ")
.Series.Clear()
.Series.Add("Revenue")
.ChartAreas.Clear()
.ChartAreas.Add("ChartArea1")
.ChartAreas("ChartArea1").AxisX.Title = "HOUR"
.ChartAreas("ChartArea1").AxisY.Title = "Revenue"
.Series("Revenue").ChartType = SeriesChartType.Column
.Series("Revenue").IsValueShownAsLabel = True


.DataSource = dt
.Series("Revenue").XValueMember = "Hours"
.Series("Revenue").AxisLabel = "Revenue"
.Series("Revenue").XAxisType = AxisType.Primary
.Series("Revenue").YValueMembers = "Revenue"
.DataBind()
.Legends.Add("Legend1")
.AlignDataPointsByAxisLabel()
End With
modified on Thursday, July 1, 2010 3:18 PM