ग्रैंड टोटल डेटाग्रिडव्यू गणना समस्या


नमस्ते।
जब मैं डेटाग्रिडव्यू में एक उप-योग डालता हूं तो कोड कुल परिवर्तनों की पुनर्गणना करता है
मेरा पाश. सब कुछ गिनें
कृपया मुझे आपकी सहायता या आपके विचारों की आवश्यकता है।

मैंने क्या प्रयास किया है:

वी.बी
Private Sub BtnSum_Click(sender As Object, e As EventArgs) Handles BtnSum.Click
    Dim somme As Double
    For x As Integer = 0 To DgvDevisClent.Rows.Count - 1
        somme += CType(DgvDevisClent.Rows(x).Cells(4).Value, Double)
    Next
    somme = String.Format("{0:##,##0.000}", CDbl(somme.ToString))
    DgvDevisClent.Rows.Insert(DgvDevisClent.CurrentRow.Index + 1, 1)
    DgvDevisClent.CurrentCell = DgvDevisClent.Rows(DgvDevisClent.CurrentRow.Index + 1).Cells(0)
    DgvDevisClent.CurrentRow.Cells(4).Value = somme
    DgvDevisClent.Focus()
End Sub

समाधान 1

आपके कोड में निम्नलिखित पंक्ति है:

वी.बी
somme = String.Format("{0:##,##0.000}", CDbl(somme.ToString))

तो, आप डबल मान को एक स्ट्रिंग में परिवर्तित करते हैं, ताकि आप कॉल में इसका उपयोग करने के लिए इसे वापस डबल में परिवर्तित कर सकें String.Format, जो थोड़ा व्यर्थ है। लेकिन फिर आप उस स्ट्रिंग का मान निर्धारित करने के लिए उपयोग करते हैं somme, जिसे डबल के रूप में घोषित किया गया है। इन सबका कोई मतलब नहीं है, इसलिए कोड की वह पंक्ति हटा दें।

समाधान 2

आपकी टिप्पणी के आधार पर –

उद्धरण:

जब मैं डेटाग्रिडव्यू इवेंट के साथ कोड को रीफ्रेश करता हूं तो मेरे लेबल में कुल मिलाकर परिवर्तन होता है
उदाहरण
प्रथम-आइटम $1
दूसरा-आइटम $2
कुल योग $3
मेरा लेबल $6 प्रदर्शित करता है या $3 प्रदर्शित करने का स्थान प्रदर्शित करता है

जब आप अपना डेटाग्रिड रीफ्रेश करते हैं तो आप ताज़ा कुल दिखाने के लिए मूल कुल साफ़ नहीं कर रहे हैं –

वी.बी
'Clear your label of all totals...
YourLabel.Text = ""

'Recalculate the total and update your label with the correct total...
Dim somme As Double
For x As Integer = 0 To DgvDevisClent.Rows.Count - 1
    somme += CType(DgvDevisClent.Rows(x).Cells(4).Value, Double)
Next
somme = String.Format("{0:##,##0.000}", CDbl(somme.ToString))

'Display the updated total in your label, PAY ATTENTION to the above solution and comments though...
YourLabel.Text = somme

コメント

タイトルとURLをコピーしました