datatable如何计算指定列的行数

tx = datatable.GetSheet("jia").GetParameter("提米").Value
'msgbox tx
num=1 '计算该列有多少行，是根据循环的次数来计算的
      '并且从datatable中获取一次数据，该值就加 1
      '因为在 num之前，tx已经获取到了datatabel的值，所以num就设为 1

While instr(tx,"该列的末尾，结束标志")=0 '等于0，则说明没有寻找到 “该列的末尾，结束标志”这个字符串
    datatable.GetSheet("jia").SetNextRow
    tx = datatable.GetSheet("jia").GetParameter("提米").Value
    num=num+1
'msgbox tx
    'num=instr(tx,"该列的末尾，结束标志")
    'msgbox num
Wend
msgbox num
msgbox num-1'减 1 后才是真正的行数，因为 “该列的末尾，结束标志”并不是我们的值，它只是充当了一个哨兵的作用，所以要减 1