Office中国论坛/Access中国论坛

标题: 怎么关闭窗体 [打印本页]

作者: wlltnt 时间: 2004-1-4 22:54
标题: 怎么关闭窗体
我在窗体1中的一个文本框的LostFocus事件中写了代码：：DoCmd.OpenForm "2", , , acFormReadonly,打开了窗体2后（窗体2中有一个列表框）在列表框中选择某条记录后，把值附给窗体1，附值完后那应该怎么样关闭窗体2呢？也就是应该把DoCmd.Close acForm, "2"写在哪呢
我写在Enter,click，要么不行要么不能对列表框进行选择？

作者: 李啸林 时间: 2004-1-4 23:42
选中之后，直接对窗体1中的一个文本框进行赋值，然后再关闭。

作者: wlltnt 时间: 2004-1-5 00:02
估计你还没懂我的意思，我知道赋值，也行了，就是赋值后不能关闭窗体
也就是DoCmd.Close acForm, "2"这句代码不知道放在哪好

作者: wlltnt 时间: 2004-1-5 00:12
我表达得不清楚，所以就把数据库上传了，这样一目了然
谢谢了[attach]2999[/attach]

作者: sea.er 时间: 2004-1-5 00:31
[attach]3000[/attach]

作者: wlltnt 时间: 2004-1-5 00:47
不是这样的啊，我知道放在那可以关闭，但不能对列表框进行选择啊，我想的是可以选择列表框中的内容又可以关闭这样的

作者: sea.er 时间: 2004-1-5 00:56
在关闭之前不是已经选择过了吗

作者: wlltnt 时间: 2004-1-5 01:48
我这个是模糊查询的

作者: sea.er 时间: 2004-1-5 02:40
不明白你的意思

作者: wlltnt 时间: 2004-1-5 02:44
就是在文本框输入的并没有选择，只是列表框包含的，所以打开窗体后还要进行选择选择完再关闭，不是在关闭之前就选择好了

作者: sea.er 时间: 2004-1-5 02:50
因为
[Forms]![弹出]![组合4] = Me.列表0.Column(0)
[Forms]![弹出]![文本6] = Me.列表0.Column(1)
[Forms]![弹出]![文本8] = Me.列表0.Column(2)
[Forms]![弹出]![文本10] = Me.列表0.Column(3)
[Forms]![弹出]![文本12] = Me.列表0.Column(4)
在
DoCmd.Close acForm, "材料"
前面，这不就是选择完再关闭吗

作者: wlltnt 时间: 2004-1-5 16:25
大侠，真的不好意思，我表达得不很清楚，估计我的这种想法一般不用这种方式体现吧，不过我还是要学会表达，是这样的意思：
列表框的数据源来自于查询，而查询中的条件就是弹出窗体里面的规格文本框，如果我在规格文本框中写“16”然后按回车键列表框就会弹出而且显示了多中如：16C57、16M等如果我想16M我不是还要在列表框中选择吗，你按我讲的意思操作一下，谢谢了

作者: sea.er 时间: 2004-1-6 05:18
你直接从“材料代码”组合框里选择不就行了，何必再在“规格”文本框里输入呢

作者: LYP6160 时间: 2004-1-6 05:46
我看了一整天都不知你们说什么，可能我太蠢了

作者: sea.er 时间: 2004-1-6 06:29
其实我也不大懂她的意思，只是一直在顺着她的大概意思往下猜，不知我13楼的意思猜对了没有，呵呵

作者: wewyhy 时间: 2004-1-6 08:05
真好玩

作者: zhuyiwen 时间: 2004-1-6 10:57

[em26]

作者: wlltnt 时间: 2004-1-6 19:02
你们也真是的没有怜香惜玉的，虽然我不是美女，但也不能有如此嘛
我才不管，我还是接着说，真麻烦，不是我自己，是真麻烦你们了，再看看：）
13楼的先生请听：是有原因的一般他们只记得规格的一部分，一般代码是不记得的（要是那样我还用这么罗嗦吗），比如他们记得规格大约是16开头的就敲入16，接着就弹出列表框，里面有很多16的，如：16C，16M等，在进行选择，理解了吗，

[此贴子已经被作者于2004-1-6 11:03:25编辑过]

作者: sea.er 时间: 2004-1-7 09:06
我还是搞不明白，谁看懂了，来帮一把

作者: zhengjialon 时间: 2004-1-7 16:58
[attach]3040[/attach]
双击或按回车都可以关闭。

作者: wlltnt 时间: 2004-1-7 17:15
真不好意思，我原先一直没说好，我说的不是用鼠标，是键盘，是我自己没说好，还怪大家
谢谢大家了，特别感谢 zhengjialon版主

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)