真心求教。请问各位高手，菜单中的过程里能不能写这些代码

SELECT DISTINCT bsc号 FROM zongku INTO CURSOR ab1
thisform.pageframe1.page2.list1.RowSource=2
thisform.pageframe1.page2.list1.rowSource="ab1"
thisform.pageframe1.page2.list1.Value=""
thisform.pageframe1.page2.list2.rowSource=""
thisform.pageframe1.page2.label10.Caption="待查询"
thisform.pageframe1.page2.label11.Caption="待查询"
thisform.pageframe1.page2.label12.Caption="待查询"
thisform.pageframe1.page2.label13.Caption="待查询"
thisform.pageframe1.page2.label14.Caption="待查询"
thisform.pageframe1.page2.label15.Caption="待查询"
thisform.pageframe1.page2.label16.Caption="待查询"
thisform.pageframe1.page2.label17.Caption="待查询"
thisform.pageframe1.ActivePage=2

如果不能，那怎么样才能实现点击菜单后像按键一样执行以上代码。真心求教！

可以将这些代码写在菜单的过程文件中，但是要注意其中的对象不能用thisform。

[ 本帖最后由 hu9jj 于 2012-11-30 07:35 编辑 ]

当然可以写在菜单的过程中
vfp并不对此进行错误检测，即使是最基本的语法错误
所以你完全可以想在txt文本中写内容一样写东西

如果想在菜单中调用表单中的内容
可以使用一个公用变量
两种方法
1.. 在调用含菜单的表单之前
do form 表单 name gps &&这里gps就是一个公用变量了，不够用提前声明是公用变量
2.. 在含菜单的表单的init事件中
在执行调用菜单的代码之前
public gps
gps = this

然后就可以在菜单中使用
gps.pageframe1.page2.label17.Caption="待查询"

谢谢高手指教，可是我按照你说的改了后，在测试和连编之后，点击菜单，没有反应是怎么回事呢！

谢谢各位高手，问题已经解决了