jQuery中的mousewheel问题(Problems with mousewheel in jQuery)

 最后一个问题很容易回答： 
 
 
 
 我需要更新每一行的分数，所以我需要一个循环，但我不知道将在之前加载到数据表中的行数。 如何获取数据表中的行数 ？ 
 
 
 您只需使用Rows.Count属性： 
 
Dim rowCount As Int32 = tblPatient.Rows.Count ' tblPatient => DataTable '
 
 如果要循环所有行，可以使用foreach ： 
 
For Each row As DataRow In tblPatient.Rows
    ' ... '
Next
 
 或者for -loop： 
 
For i As Int32 = 0 To tblPatient.Rows.Count - 1
    Dim row As DataRow = tblPatient.Rows(i)
    ' ... '
Next
 
 要更新行，您可以使用也支持nullable-types的SetField扩展方法： 
 
For Each row As DataRow In tblPatient.Rows
    Dim id As Int32 = row.Field(Of Int32)("ID")
    Dim race As String = row.Field(Of String)("Race")
    row.SetField("Score", CalculateScore(row))
Next
 
 很抱歉，我无法为您提供正确的计算方法，但由于您未提供Score来源（还没有列），因此您仍然不清楚如何计算它。 但无论如何它可能会给你一个想法。 

The last question is answered easily:
 
 
 
I need to update the score for each row so I am going to need a loop but I do not know the number of rows that will be loaded into the datatable before hand. How do I get the number of rows in the datatable?
 
 
You just have to use the Rows.Count property:
 
Dim rowCount As Int32 = tblPatient.Rows.Count ' tblPatient => DataTable '
 
If you want to loop all rows you can use a foreach:
 
For Each row As DataRow In tblPatient.Rows
    ' ... '
Next
 
or a for-loop:
 
For i As Int32 = 0 To tblPatient.Rows.Count - 1
    Dim row As DataRow = tblPatient.Rows(i)
    ' ... '
Next
 
To update the rows you can use the SetField extension method which also support nullable-types:
 
For Each row As DataRow In tblPatient.Rows
    Dim id As Int32 = row.Field(Of Int32)("ID")
    Dim race As String = row.Field(Of String)("Race")
    row.SetField("Score", CalculateScore(row))
Next
 
Sorry that i cannot provide you the correct calculation but it's still not clear how you want to calculate it since you haven't provided the source of the Score(theres no column). But it might give you an idea anyway.