none
如何在datatable裡面做運算 RRS feed

  • 問題

  • 如何在datatable裡面計算出某個人的業績,不用透過迴圈的方式計算加總。

    2007年10月27日 下午 04:29

解答

  • 這個範例不知道是不是你所說的參考一下吧

       Dim table As New DataTable
            Dim colString As DataColumn = New DataColumn("ID")
            colString.DataType = System.Type.GetType("System.String")
            table.Columns.Add(colString)
            Dim colInt32 As DataColumn = New DataColumn("Sale")
            colInt32.DataType = System.Type.GetType("System.Int32")
            table.Columns.Add(colInt32)
            table.Rows.Add("1", "10")
            table.Rows.Add("2", "20")
            table.Rows.Add("1", "30")
            table.Rows.Add("3", "40")
            Dim sumObject As Object
            sumObject = table.Compute("Sum(Sale)", "ID = 1")
            MsgBox(sumObject)
    2007年10月27日 下午 04:49

所有回覆

  • 你可以參考看看: DataColumn.Expression

     

    2007年10月27日 下午 04:45
  • 這個範例不知道是不是你所說的參考一下吧

       Dim table As New DataTable
            Dim colString As DataColumn = New DataColumn("ID")
            colString.DataType = System.Type.GetType("System.String")
            table.Columns.Add(colString)
            Dim colInt32 As DataColumn = New DataColumn("Sale")
            colInt32.DataType = System.Type.GetType("System.Int32")
            table.Columns.Add(colInt32)
            table.Rows.Add("1", "10")
            table.Rows.Add("2", "20")
            table.Rows.Add("1", "30")
            table.Rows.Add("3", "40")
            Dim sumObject As Object
            sumObject = table.Compute("Sum(Sale)", "ID = 1")
            MsgBox(sumObject)
    2007年10月27日 下午 04:49
  • 程式碼區塊

       Dim table As New DataTable
       Dim colString As DataColumn = New DataColumn("ID")
       colString.DataType = System.Type.GetType("System.String")
       table.Columns.Add(colString)
       Dim colInt32 As DataColumn = New DataColumn("Sale")
       colInt32.DataType = System.Type.GetType("System.Int32")
       table.Columns.Add(colInt32)
       table.Rows.Add("1", "10")
       table.Rows.Add("2", "20")
       table.Rows.Add("1", "30")
       table.Rows.Add("3", "40")
       Dim sumObject As Object
       sumObject = table.Compute("Sum(Sale)", "ID = 1")
       MsgBox(sumObject.ToString())

     

     

    2007年10月28日 上午 01:45