很傻的问题

[llzzllllz]

问几个傻B类的问题
1。比如在一个可修改表中，若想当用户要修改时，弹出一个像messagebox(。。。）
一样的对话框，要求输入密码才能修改，要怎么实现？vfp里面好像没有dialogbox()
这东西？
2。grid刷新时为什么会是一片空白
程序如下
thisform.grid1.recordsource='abc'
thisform.grid1.refresh
3.如何在grid中显示满足条件的记录
如.查找x=2002的记录，且数据库已按代号排序？
最后问一下：网上有很多这样的问题的答案，可我用了一下都不管用，是不是呆呆虫太呆了？

[liuri璇玑]

1、inputbox()
2、不太明白，不过不改数据源的话，刷新就thisform.grid1.refresh就好了，
3、
1、 seek 2002(按X索引时)
2、loca for x=2002

[Louis819]

（1）对话框可以自己作，设置表单为WindowType为模式，就和Messagebox一样了。
（2）如果更改数据源的表结构，可能会出现上述情况。先设置recordsource＝“”，再改表结构，再设置回来即可。
（3）对数据源设置过滤条件
set filter to 条件

[流星尔]

1、第一个问题，先把表的readonly设为真。然后要修改表单，弹出一个小表单，提示输入密码
2、你肯定重新生成了acb这张表。举个例子
thisform.grid1.recordsource=''
select * from tablename into cursor abc
thisform.grid1.recordersource='abc'
3、sele tablename
set filt to xx=2002
go top

[llzzllllz]

很感谢朋友们的帮忙
我回去试过后又出现了新的问题
1。我的程序如下：
local x
x=thisform.text1.value(text1是查询输入框)
set filter to 序号=alltrim(x)
thisform.grid1.recordsource='xxx'(数据库名)
.......
结果是出来了，但当点击GRID中的滚动条时系统弹出一个对话框说是变量x没找到
按确定后整个xxx中的记录都出来了这时才可以拉动滚动条这是为什么?
我想知道set filter to ....时，系统具体的做法？
2。inputbox()不能用，打进去时颜色不变运行时系统说是变量inputbox不存在?
3。在code里面没有interactivechange事件，要用它在哪调用语法是什么?
4.在一个表单中用两个GRID
程序如下：
local x
x=thisform.text1.value(序号输入用以查询）
set filter to 序号=alltrim(x)
thisform.grid1.recordsource='xxx'
thisform.grid2.recordsource='yyy'(xxx,yyy为两个以相同序号排序的表)
....
thisform.refresh
为什么结果出来后只有第一个grid按序号要求显示而第二个GRID 则批整个表都显示出来了为什么？
请各位朋友们帮忙，十分感激！

[yqsman]

1.將local x 改成public x
2.inputbox()隻能在vfp 7.0以上使用，如果你是在6.0是不行的。
3。interactivechange事件隻有一部份控件才有這處事件。他是指輸入時觸發的事情。
4。請說清楚一點。如果你是兩個表的。你可以建立關聯.

[zb2001]

感觉这里的高手们真的是很热情，很耐心啊！！！！！