| 以文本方式查看主题 - Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp) -- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2) ---- 飞老师的代码不太懂，望赐教 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=29011) |
| -- 作者：jxkqf -- 发布时间：2013/2/25 19:08:00 -- 飞老师的代码不太懂，望赐教 飞老师，下面的代码有俩处不明白，还望指教. 1、Windows.Forms.Form 是个啥东东？帮助里没有说吧。 2、e.Form.Controls("Btn_Add").BaseControl.FindForm画横线的代码是啥意思？ 3、 .Grid.Cols(0).Visible = False 我查了一下，table里没有这样的属性啊？ 代码如下： Dim Basefrm As Windows.Forms.Form = e.Form.Controls("Btn_Add").BaseControl.FindForm Basefrm.Width = e.Form.DropDownBox.Width With Tables(e.Form.Name & "_Tbl_Main") .Grid.Cols(0).Visible = False .Grid.Rows(0).Visible = False .Grid.CellButtonImage = GetImage("delete.png") .ExtendLastCol = True .DefaultRowHeight = 30 .DataTable.SysStyles("Focus").BackColor = Color.SkyBlue .DataTable.SysStyles("Focus").ForeColor = Color.Red .Cols("值").ComboList = "|..." End With [此贴子已经被作者于2013-2-25 19:11:18编辑过]
|
| -- 作者：双轨制 -- 发布时间：2013/2/25 19:10:00 -- 其实没有必要搞明白的，能用就行。
|