以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  如何用代码给控件设置初始值?  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=62545)

--  作者:peterx
--  发布时间:2015/1/4 11:35:00
--  如何用代码给控件设置初始值?
使用“下一行”按钮时,希望当前窗口的控制初始化为“请点击选择”,请指教下公式如何修改,谢谢。


With Tables("设备经费管理")
    .Position = .Position + 1
End With

Dim ktjfly As WinForm.ComboBox = e.Form.Controls("课题经费来源信息")

ktjfly.text="请点击选择"
[此贴子已经被作者于2015-1-4 13:59:22编辑过]

--  作者:peterx
--  发布时间:2015/1/4 13:42:00
--  
着急呀?
[此贴子已经被作者于2015-1-4 13:58:45编辑过]

--  作者:Bin
--  发布时间:2015/1/4 14:13:00
--  
代码没有问题哦,如果你的控件是绑定了列的,那么你这样做是无效的.  要为绑定的单元格赋值才有用.
--  作者:有点甜
--  发布时间:2015/1/4 14:54:00
--  
这个意思?
 
With Tables("设备经费管理")
    .Position = .Position + 1
End With

Dim ktjfly As WinForm.ComboBox = e.Form.Controls("课题经费来源信息")

Tables("设备经费管理").Current("课题经费来源信息") = "请点击选择"

--  作者:peterx
--  发布时间:2015/1/4 19:37:00
--  
我的想法是:在进入窗口时,该控件通过属性设置的默认值为“请点击选择”,但进行点击查看且选择后,此值就为选定的值了。当用“下一条”按钮,进入下一条记录时,此值仍为上次选定的值,不会跟随变化。我是想,点击“下一条”后,此值又变为“请点击选择”。谢谢

[此贴子已经被作者于2015-1-4 19:48:43编辑过]

--  作者:程兴刚
--  发布时间:2015/1/4 19:41:00
--  

窗口AfterLoad事件代码:

 

e.Form.Controls("课题经费来源信息").text="请点击选择"


--  作者:有点甜
--  发布时间:2015/1/4 19:46:00
--  

 回复楼上。

 

 1、不要绑定表的里;

 

 2、直接赋值 e.Form.Controls("课题经费来源信息").text = "请点击选择"


--  作者:peterx
--  发布时间:2015/1/5 8:15:00
--  
出现错误提示:
未将对象引用设置到对象的实例。

发现错误与textchanged事件有关。改为:selectindexchanged后,可正常运行。但这两个个事件的差别大吗?
[此贴子已经被作者于2015-1-5 8:20:08编辑过]

--  作者:Bin
--  发布时间:2015/1/5 8:17:00
--  
你上例子吧
--  作者:有点甜
--  发布时间:2015/1/5 9:05:00
--  
以下是引用peterx在2015-1-5 8:15:00的发言:
出现错误提示:
未将对象引用设置到对象的实例。

发现错误与textchanged事件有关。改为:selectindexchanged后,可正常运行。但这两个个事件的差别大吗?
[此贴子已经被作者于2015-1-5 8:20:08编辑过]

 

那你就贴出你时间的代码。有可能是你TextChanged事件查找记录的时候没找到,所以空对象