Rss & SiteMap
Foxtable(狐表) http://www.foxtable.com
例子:窗体中,有一个按钮,点击该按钮时判断窗口加载的表名,如果当前表名为“表A”则打开‘A窗体’
如果当前表名为“表B”则打开‘B窗体’
if CurrentTable.Name = "表A" then
forms("A窗口).Open
Elseif CurrentTable.Name = "表B" then
forms("B窗口).Open
……
end if
老师你好:再请教你一下:
If e.node.level = 0 Then
Tables("参数设计_table1").DataSource =DataTables(e.node.Text) ‘在“参数设计”的窗体目录树点击某个名称,右侧加载对应名称的表。
For Each cl As Col In Tables("参数设计_table1").Cols
cl.Width = 560 ’设定了加载的表的宽度
Next
End If
我需要:右侧不仅加载了对应名称的表,而且定位到对应名称的表;
由于以下代码需要真正定位到表,才能直到真正做用:
if CurrentTable.Name = "表A" then
forms("A窗口).Open
Elseif CurrentTable.Name = "表B" then
forms("B窗口).Open
……
end if