- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助]检查框被选中如何表达？ (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=60091)
-- 发布时间：2014/11/18 10:15:00
-- [求助]检查框被选中如何表达？
菜单配置栏检查框被选中（打勾）如何表达？用于以下：
If 检查框被选中（打勾） Then
e.DataRow("单株材积")=0.000062341803*e.DataRow("实测胸径")^1.8551497*e.DataRow("实测树高")^0.95682492
e.DataRow("形高值")=12732.39545/e.DataRow("实测胸径")^2*0.000062341803*e.DataRow("实测胸径")^1.8551497*e.DataRow("实测树高")^0.95682492
Else
Dim fdr As DataRow = DataTables("马尾松").find("胸径 = \'" & e.DataRow("实测胸径") & "\' and 树高 = \'" & e.DataRow("实测树高") & "\'")
If fdr IsNot Nothing Then
e.DataRow("单株材积")=fdr("材积")
e.DataRow("形高值")=fdr("形高")
End If
End If
此主题相关图片如下：检查框.jpg
-- 发布时间：2014/11/18 10:23:00
--
If ConfigBar.Items("某某控件").checked Then
-- 发布时间：2014/11/18 10:37:00
--
OK