UC知道VF的高手来,来看看吧！急需各位大侠拔刀相助...
来源：百度知道 编辑：UC知道 时间：2024/05/15 23:31:04
我在编制一个家庭理财系统！当中出现以下问题：
编制了一个“查找表单”
“查找”的Click代码：
&&直接跳转到指定的记录
if int(val(thisform.go.value))>=1
FindRecordNo=int(val(thisform.go.value))
thisform.go.value=""
thisform.release
else
messagebox("请正确输入要指向的记录号！",16,"错误")
thisform.go.value=""
thisform.go.setfocus
endif
在银行信息录入表中：
查找的Click的代码为：
do form [form\查找记录]
select 银行表
&&直接跳转到指定的记录
if FindRecordNo <= recco()
go FindRecordNo
thisform.moderead
else
messagebox("请正确输入要指向的记录号！",16,"错误")
endif
thisform.refresh
可我在运行的时候系统提示：字符数/字符类型不匹配！
可我关闭表，再运行时又可以，假如我第一次查找记录3的，他只显示记录1的。第二次查找记录2的，他则显示记录3的。第三次查找记录4的，他又显示2的。。。。。
其中findrecordno在主程序中是定义为全局变量的！
同时能结交一些计算机方面的高手，VF，C，C++，PS。。。的都可以：加QQ854050788
编制了一个“查找表单”
“查找”的Click代码：
&&直接跳转到指定的记录
if int(val(thisform.go.value))>=1
FindRecordNo=int(val(thisform.go.value))
thisform.go.value=""
thisform.release
else
messagebox("请正确输入要指向的记录号！",16,"错误")
thisform.go.value=""
thisform.go.setfocus
endif
在银行信息录入表中：
查找的Click的代码为：
do form [form\查找记录]
select 银行表
&&直接跳转到指定的记录
if FindRecordNo <= recco()
go FindRecordNo
thisform.moderead
else
messagebox("请正确输入要指向的记录号！",16,"错误")
endif
thisform.refresh
可我在运行的时候系统提示：字符数/字符类型不匹配！
可我关闭表，再运行时又可以，假如我第一次查找记录3的，他只显示记录1的。第二次查找记录2的，他则显示记录3的。第三次查找记录4的，他又显示2的。。。。。
其中findrecordno在主程序中是定义为全局变量的！
同时能结交一些计算机方面的高手，VF，C，C++，PS。。。的都可以：加QQ854050788
你是不是该用什么全局变量？
我建议：
不必整两个表单。只一个就可以了。
另外，你在前一个表单指定的记录号是否传来就变类型了。你不妨在第二表单上写成
val(FindRecordNo) <= recco()
go val(FindRecordNo)
哎，应该是逻辑问题