• Revista PROGRAMAR: Já está disponível a edição #53 da revista programar. Faz já o download aqui!

vasco16

3D area and spline area charts

5 mensagens neste tópico

Boas pessoal, ao tentar implementar um gráfico 3d com o objecto chart, e com este código

' Set 3D chart settings
Chart1.ChartAreas("Default").Area3DStyle.Enable3D = true
Chart1.ChartAreas("Default").Area3DStyle.IsRightAngleAxes = false
Chart1.ChartAreas("Default").Area3DStyle.Inclination = 40
Chart1.ChartAreas("Default").Area3DStyle.Rotation = 15
Chart1.ChartAreas("Default").Area3DStyle.LightStyle = LightStyle.Realistic
Chart1.ChartAreas("Default").Area3DStyle.Perspective = 20

' Set SplineArea chart type
Chart1.Series("Series1").ChartType = SeriesChartType.Spline;Area
Chart1.Series("Series2").ChartType = SeriesChartType.Spline;Area

' Set spline line tension 
Chart1.Series("Series1")("LineTension") = "0.6"
Chart1.Series("Series2")("LineTension") = "0.6"

' Disable X axis margin
Chart1.ChartAreas("Series1").AxisX.IsMarginVisible = false
Chart1.ChartAreas("Series2").AxisX.IsMarginVisible = false

' Enable the Marker Lines
chart1.Series("Series1").CustomProperties = "ShowMarkerLines=true"
chart1.Series("Series2").CustomProperties = "ShowMarkerLines=true"

obtenho um erro logo na primeira linha..

A chart element with the name 'Default' could not be found in the 'ChartAreaCollection'.

será falta de código?

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Porque estás a chamar "Default" á tua chartArea? crias-te alguma com esse nome?

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Porque estás a chamar "Default" á tua chartArea? crias-te alguma com esse nome?

corrigi

Chart1.ChartAreas("ChartArea1").Area3DStyle.Enable3D = True

        Chart1.ChartAreas("ChartArea1").Area3DStyle.IsRightAngleAxes = False

        Chart1.ChartAreas("ChartArea1").Area3DStyle.Inclination = 40

        Chart1.ChartAreas("ChartArea1").Area3DStyle.Rotation = 15

        Chart1.ChartAreas("ChartArea1").Area3DStyle.LightStyle = LightStyle.Realistic

        Chart1.ChartAreas("ChartArea1").Area3DStyle.Perspective = 20

        ' Set SplineArea chart type

        Chart1.Series("Series1").ChartType = SeriesChartType.SplineArea

        Chart1.Series("Series2").ChartType = SeriesChartType.SplineArea

        ' Set spline line tension

        Chart1.Series("Series1")("LineTension") = "0.6"

        Chart1.Series("Series2")("LineTension") = "0.6"

        ' Disable X axis margin

        Chart1.ChartAreas("Series1").AxisX.IsMarginVisible = False

        Chart1.ChartAreas("Series2").AxisX.IsMarginVisible = False

        ' Enable the Marker Lines

        Chart1.Series("Series1").CustomProperties = "ShowMarkerLines=true"

        Chart1.Series("Series2").CustomProperties = "ShowMarkerLines=true"

    End Sub

agora da-me erro aqui:

Chart1.Series("Series1").ChartType = SeriesChartType.SplineArea

        Chart1.Series("Series2").ChartType = SeriesChartType.SplineArea

diz que não tenho a series1 e no entando tenho ..

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

fiz o código manualmente mas o meu gráfico nao roda.. está estático.. o que posso fazer ?

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Crie uma conta ou ligue-se para comentar

Só membros podem comentar

Criar nova conta

Registe para ter uma conta na nossa comunidade. É fácil!


Registar nova conta

Entra

Já tem conta? Inicie sessão aqui.


Entrar Agora