标题：如何禁止窗口位置的移动

1楼

chenwuwenyu 发表于：2009/8/23 11:32:00

这个可以实现吗？
属性中有个初始位置设置
我想设置好以后，打开窗口不可移动

2楼

yangming 发表于：2009/8/23 11:52:00

只有独立窗口才能移动,独立了,移动又何妨呢?

3楼

chenwuwenyu 发表于：2009/8/23 12:00:00

模式窗口也可以移动呀，
我打开窗口的时候利用了一个表视图显示全部列
我不想让移动窗口就能看到原表
所以要求窗口只能关闭，不能移动在屏幕中的位置

4楼

yangming 发表于：2009/8/23 12:06:00

你说的我不明白,如果不想看到原表,你为何不用主窗口呢?

5楼

czy 发表于：2009/8/23 17:36:00

如果一定要这样做,就在AfterLoad事件中设置代码：

For Each c As Col In Tables("表A").Cols
Tables("表A").Cols(c.Name).Visible = False
Next

然后在BeforeClose事件中设置代码：

For Each c As Col In Tables("表A").Cols
Tables("表A").Cols(c.Name).Visible = True
Next

6楼

chenwuwenyu 发表于：2009/8/23 18:29:00

以下是引用czy在2009-8-23 17:36:00的发言：
如果一定要这样做,就在AfterLoad事件中设置代码：

For Each c As Col In Tables("表A").Cols
Tables("表A").Cols(c.Name).Visible = False
Next

然后在BeforeClose事件中设置代码：

For Each c As Col In Tables("表A").Cols
Tables("表A").Cols(c.Name).Visible = True
Next

跟我设置的正好相反，呵呵
我的意思是打开窗口的时候，显示全部列
但是
我不想让别人看到这些列（虽然窗口挡住看不见，但移动一下窗口就可以看到）
我想如果可以禁止移动窗口就好了

共6 条记录, 每页显示 10 条, 页签: [1]