السلام عليكم ورحمة الله وبركاته
اخواني كيف استطيع تمثيل نسب التصويت بالرسم بالاضافة للتمثيل الرقمي
ان اعنلت الكود الي بحسب النسب المئوية بس بدي امثلوا بالرسم زي ما بتسوس اغلب المواقع
و هي الكود تبع حساب النسب المئوية
Dim total As Integer
Dim reader As System.Data.SqlClient.SqlDataReader
Dim read As String
read = "select * from Takeam"
Dim readcom As New SqlCommand(read, cn)
cn.Open()
reader = readcom.ExecuteReader(CommandBehavior.SingleRow)
If reader.Read Then
total = reader("excelant") + reader("good") + reader("miduom") + reader("week")
Me.TotalLabel.Text = "عدد المصوتين" + " " + CType(total, String)
Me.ExcellentLabel.Text = "%" + "ممتاز" + " " + CType(Math.Round((reader("excelant") / total) * 100), String)
Me.GoodLabel.Text = "%" + "جيـد" + " " + CType(Math.Round((reader("good") / total) * 100), String)
Me.MedialLabel.Text = "%" + "متوسط" + " " + CType(Math.Round((reader("miduom") / total) * 100), String)
Me.PoorLabel.Text = "%" + "ضعيف" + " " + CType(Math.Round((reader("week") / total) * 100), String)
End If
cn.Close()
طبعا المقصود بالرسم (خط) يمثل النسبة المئوية لكل خيار