select * from 表 where 客户编号=thisfrom.text1.value into cursor ls
thisfrom.grid1.recordsource=""
thisfrom.grid1.recordsource="ls"
thisform.refresh追问
输入你给的代码后 点击查询按钮 提示找不到thisfrom 请指教 谢谢
追答唉！thisform
追问呵呵 点运行后 还没点查询 表格里就已经显示出数据了 点查询后 表格里的数据消失 ，是不是表格没设置好呢
追答在thisform的refresh里写
thisfrom.grid1.recordsource=""
还是不行哎
追答在thisform的refresh里写with thisorm.grid1 .recordsource="" .column1.header1.caption="姓名" .column1.Width=50 .column2.header1.caption="编号" .column2.Width=40 … … … … …endwith
本回答被网友采纳vfp如何用命令代码打开表、表单、查询、菜单?
一、我们找到桌面上的vfp软件打开。新建一个菜单；具体步骤；文件---新建---菜单。二、下面是开始设置，菜单的具体内容和一些代码等，我们在此随便做两个菜单内容做演示。菜单内容分不重要，重要的是设置一些属性等。三、在 “显示”选项中，选择“常规选项”在“顶层表单”前面打勾。保存菜单，路径和...
vfp如何用命令代码打开表、表单、查询、菜单
不是执行“do 菜单文件名.mpx”你照着一下的方法看看行不行1.新建菜单（若已有，可以直接打开菜单）2.“显示”---“常规选项”---选中“顶层表单”3.若是新建菜单则需要进行本步：“菜单”---“生成”4.新建表单（若已有，可以直接打开表单）5.设置表单属性“showwindow”---“2-作为顶层表单...
怎么查看VFP表单向导的源代码?
运行VFP后，选择“文件”——“打开”——“文件类型”——“可视类库( *.VCX)”，到VFP安装目录下找到“Wizards”文件夹——“wizbtns.vcx”——选择左边的 “txtbtns”，就打开这些按钮的编辑方式，点击对应的按钮，属性中是对应的代码了。
我想用VFP做一个下拉查询的表单,请问这一部分要怎么编辑?
用sql命令。比如你有三个组合框分别为combo1,combo2,combo3；有自由表，表名为表1，有三个字段，地区，面积，年份。设置其rowsourcetype属性为3-sql语句。表单form1的init事件代码如下：thisform.combo1.rowsource="select 地区 from 表1 into temp1"thisform.combo2.rowsource="select 面积 from 表1 ...
visualfoxpro如何设计表单
Visual FoxPro设计表单的方法主要有三种：使用表单向导、表单设计器以及快速表单。表单向导是一种交互式设计工具，它通过向用户提出一系列问题，并基于用户的回答自动创建表单。用户只需按照向导的提示选择数据库、表以及表单上要显示的字段，然后选择表单的样式和按钮类型等，最后输入表单标题并保存即可。这种...
vfp中菜单中的菜单项要设置运行表单的命令,该怎么设置
1、首先点击打开左上角文件中的“新建”选项。2、在弹出的新界面，依次操作：勾选【项目】选项，点击【新建】按钮；3、在弹出的新窗口，选择保存路径，设置项目文件名称，回车确定。4、在出现的界面中，点击打开“其他”设置选项。5、然后在弹出来的界面中，打开菜单级，选择新建一个菜单级。6、然后在...
vfp表单设计中如何用代码编写对象的事件程序?
如果你的vfp版本是9.0 你可以使用 bindevent() 函数把 timer 事件的代码 绑定到另一个方法上 form.init thisform.addobject('timer2','timer')thisform.timer2.Interval=2000BINDEVENT(thisform.timer2,'timer',thisform,"tttt")form.tttt=MESSAGEBOX("时间到",0,"tips")thisform.timer2.interval...
求VFP表单代码
你就一个表吗?很简单啊,关键是你text2里要按什么格式显示? 仅显示一个字段,还是多个字段?查询时使用locate for语句定位, 找到记录就可以根据你的要求输出了 select 物流单号详询 locate alltrim(快递单号)=alltrim(thisform.text1.value)if found()thisform.text2.value=寄件人 else thisform.text2....
vfp编程制作表单
在输出按钮中添加如下代码：string=allt(thisform.text1.value)n=len(string)reversed=""i=0 do while i<=n reversed=allt(reversed+substr(string,n-i,1))i=i+1 enddo thisform.text1.value=allt(reversed)第二个题解释起来比较麻烦，你的意思可能要设计成windows附件的计算器一样吧？你可以设置...
vfp表单代码
values (thisform.combo1.value , '计算机基础')endif if check4.value = 1 insert into 选课表（学号，已选课程） values (thisform.combo1.value , '程序设计')endif 这样 就把已经勾选的 课程 记录到了 选课表 根据你的 初始情况 checkX.value = 1 可能需要改为 checkX.value = .T.
