السلام عليكم اخواني
طريقة العرض الظاهره في هذه الصورة تم عملها بواسطة الاكسل ..
السؤال : هل من الممكن عمل نفس طريقة العرض وإظهار نفس العلامات في البرنامج ؟
محاولتي :
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim random As New Random()
Chart1.Series.Clear()
Chart1.Series.Add("Series1")
Chart1.Series.Item("Series1").LegendText = "Majjhol"
Chart1.Series.Add("Series2")
Chart1.Series.Item("Series2").LegendText = "majjhol2"
Dim pointIndex As Integer
Dim pppp As Integer
For pointIndex = 0 To 9
pppp = pppp + 10
Chart1.Series("Series1").Points.AddY(pppp + random.Next(1, 20))
Chart1.Series("Series2").Points.AddY(pppp + random.Next(1, 20))
Next pointIndex
Chart1.Series("Series1").ChartType = SeriesChartType.Line
Chart1.Series("Series2").ChartType = Chart1.Series("Series1").ChartType
Chart1.Series("Series1").MarkerStyle = MarkerStyle.Circle
Chart1.Series("Series2").MarkerStyle = MarkerStyle.Circle
Chart1.Series("Series1").IsValueShownAsLabel = True
Chart1.Series("Series2").IsValueShownAsLabel = True
End Sub
وهذه النتيجة
~ ~ ~
عند البحث وجدت هذه الصورة ( بصراحه أذهلني تنسيقها وتصميمها )
هذا الموضوع لم اجد له شروحات في المنتديات العربية ابدا يريت احد يتكرم بشرح هذه الاداة بالتفصيل
أو يقوم بشرح هذه النقاط لأهميتها
شاكر ومقدر جهودكم