VB.NET DataTeble หาค่าล่าสุด Last หรือ สูงสุด Max ช่วยแนะนำหน่อยครับ

' Last
dt.Rows(dt.Rows.Count)("Patient")

' Max
var maxRow = dt.Select("Patient = MAX(Patient)");

        Dim Patient As DataTable
        Dim MaxID As Object
        Dim fillter As String = ""
        Dim NewID As Integer
        Patient = ds.Tables("Patient")
        'Patient.Select("", "PID DESC")
        Patient.Rows(Patient.Rows.Count)("Patient")
        MaxID = Patient.Select("PID = MAX(PID)")
        'MaxID = Patient.Compute("MAX(PID)", fillter)
        NewID = CInt(MaxID)
        NewID = NewID + 1