主题：[求助]指定参数已超出有效值

If CurrentTable.Rows.Count = 0 Then
    msgbox("没有数据")
Else
    Dim r As Row = CurrentTable.Rows(CurrentTable.Rows.Count-1)
    e.Form.Controls("公账框").Text = r("余额")
End If

甜版主，您这个貌似还是要报错啊~再帮忙看看~

我想实现的其实就是    点击某个按钮后     得出表内的某个数值，  然后将该数值显示在一个文本框内！~     帮忙看下 这个写法的中间是缺什么才报错了

刚发现~   这个写法   貌似是要正好在操作这个表格的情况下   代码没问题~     重启程序新开的话~  就会报错~      

那你就改成具体的表名

 

Dim t As Table = Tables("表A")
If t.Rows.Count = 0 Then
    msgbox("没有数据")
Else
    Dim r As Row = t.Rows(t.Rows.Count-1)
    e.Form.Controls("公账框").Text = r("余额")
End If