Access交流中心

北京 | 上海 | 天津 | 重庆 | 广州 | 深圳 | 珠海 | 汕头 | 佛山 | 中山 | 东莞 | 南京 | 苏州 | 无锡 | 常州 | 南通 | 扬州 | 徐州 | 杭州 | 温州 | 宁波 | 台州 | 福州 | 厦门 | 泉州 | 龙岩 | 合肥 | 芜湖 | 成都 | 遂宁 | 长沙 | 株洲 | 湘潭 | 武汉 | 南昌 | 济南 | 青岛 | 烟台 | 潍坊 | 淄博 | 济宁 | 太原 | 郑州 | 石家庄 | 保定 | 唐山 | 西安 | 大连 | 沈阳 | 长春 | 昆明 | 兰州 | 哈尔滨 | 佳木斯 | 南宁 | 桂林 | 海口 | 贵阳 | 西宁 | 乌鲁木齐 | 包头 |

如何使用VBA对控件设置默认值

久石让的粉丝  发表于:2013-08-08 21:48:21  
复制

如何使用VBA对控件设置默认值

上传的附件点击下载此附件中有窗体

按下command按键后,当前的文本框里的内容就变成默认值

关闭access后再次打开就能看到文本框里之前输入的内容变成了默认值

求高手指点

 

Top
jj77 发表于:2013-08-09 08:11:51

增加下面的代码就好了


Private Sub Form_Load()

Me.Text0.DefaultValue = "1"
End Sub


久石让的粉丝 发表于:2013-08-10 18:07:42

补充一下,将文本框中目前的内容设置成文本框的默认值,jj77的代码是指定默认值为1

Me.Text0.DefaultValue = Me.Text0

设置默认值后,关闭文件再打开后还是达不到效果



蟹仔 发表于:2013-08-10 18:49:13
那些类似通过代码设置默认值的功能,例如设置字体大小,控件大小,窗体大小这些。改变的仅仅是内存中的数据。而软件本身的数值是不会改变的。所以你关闭在打开。还是以前那个值。你要永久保留这些数值,最后的办法是建立一个新表专门去储存他,接着在窗体的form_load或form_open调用。例如我所有软件都有个参数设置这个表,如软件版本号,软件名称,联系方式,字体大小,窗口位置,窗口的大小,控件的默认值等等

总记录:3篇  页次:1/1 9 1 :