以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  命令窗口这段代码无效  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=82090)
--  作者：nblwar
--  发布时间：2016/3/11 11:41:00
--  命令窗口这段代码无效

Dim t1 As Table = Tables("AM_人事档案主表")

If t1.TopPosition > -1 Then \'如果选定区域包括数据行  
    For i As Integer =  t1.BottomPosition To t1.TopPosition
        MessageBox.Show(i)
    Next
End If
--  作者：nblwar
--  发布时间：2016/3/11 11:46:00
--  
找到原因了，忘了加 Step -1