Foxtable(狐表)用户栏目专家坐堂 → [求助]飞老师,可否做一个商业版的史上最实用的组合框?


  共有7816人关注过本帖树形打印复制链接

主题:[求助]飞老师,可否做一个商业版的史上最实用的组合框?

帅哥哟,离线,有人找我吗?
jxkqf
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:778 积分:7463 威望:0 精华:0 注册:2009/9/7 10:55:00
[求助]飞老师,可否做一个商业版的史上最实用的组合框?  发帖心情 Post By:2013/2/18 21:19:00 [显示全部帖子]

飞老师:

 

看到您做的史上最实用的组合框,非常心仪。下载下来一看,却不是商业版的,麻烦您有空给我们这些商业版用户提供一个商业版的史上最实用的组合框。万分感谢!

 

我给你发短信了,您看到了吗?

 

 

原帖地址:http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=28705

[此贴子已经被作者于2013-2-18 21:19:57编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
jxkqf
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:778 积分:7463 威望:0 精华:0 注册:2009/9/7 10:55:00
  发帖心情 Post By:2013/2/19 14:18:00 [显示全部帖子]

万分感谢!

不过和那个还是有点小区别。


 回到顶部
帅哥哟,离线,有人找我吗?
jxkqf
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:778 积分:7463 威望:0 精华:0 注册:2009/9/7 10:55:00
  发帖心情 Post By:2013/2/25 17: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


 回到顶部
帅哥哟,离线,有人找我吗?
jxkqf
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:778 积分:7463 威望:0 精华:0 注册:2009/9/7 10:55:00
  发帖心情 Post By:2013/2/25 20:45:00 [显示全部帖子]

谢谢林老师!

 回到顶部