请高手看看这段程序有什么问题？ - VFP论坛

编程论坛 → 数据库技术 → 『 VFP论坛』 → 请高手看看这段程序有什么问题？

标题：请高手看看这段程序有什么问题？

只看楼主

danwu

等　级：新手上路
帖　子：10
专家分：0
注　册：2011-6-17
结帖率：100%

楼主

已结贴√ 问题点数：20 回复次数：9

请高手看看这段程序有什么问题？

if len(allt(thisform.text1.机型.value))=0 then
  go bottom
  dele
  pack
  wait window"机型不能为空" timeout 1
endif
append blank
thisform.refresh

搜索更多相关主题的帖子: window　

2011-06-17 15:44

danwu

等　级：新手上路
帖　子：10
专家分：0
注　册：2011-6-17

第 2 楼

得分:0

很急呀！！！高手快快现身吧

2011-06-17 15:45

xmlz

等　级：蜘蛛侠
威　望：5
帖　子：294
专家分：1392
注　册：2010-8-29

第 3 楼

得分:8

如果text1是个文本框的话，显然是有问题的。
只能thisform.text1.value
活着thisform.机型.value

2011-06-17 16:09

xmlz

等　级：蜘蛛侠
威　望：5
帖　子：294
专家分：1392
注　册：2010-8-29

第 4 楼

得分:2

其实判断一个文本框是否为空，不要这么复杂，直接if empty(thisform.text1.value)

2011-06-17 16:10

muyubo

来　自：山东莱芜
等　级：蜘蛛侠
威　望：3
帖　子：471
专家分：1017
注　册：2011-3-6

第 5 楼

得分:6

3楼已经指出问题了.
if len(allt(thisform.text1.机型.value))=0 then   &&红\绿二者取一.
  go bottom
  dele
  pack
  wait window"机型不能为空" timeout 1
endif
append blank
thisform.refresh

2011-06-17 16:55

hu9jj

来　自：红土地
等　级：贵宾
威　望：396
帖　子：11713
专家分：43267
注　册：2006-5-13

第 6 楼

得分:2

楼上：
不是红\绿二者取一，而是删除蓝色的“机型”。

活到老，学到老！ http://www. E-mail:hu-jj@

2011-06-17 16:59

danwu

等　级：新手上路
帖　子：10
专家分：0
注　册：2011-6-17

第 7 楼

得分:0

回复 5楼 muyubo

我已经按照你的意见修改了，但是执行这个命令的时候出现了“不能识别的成员text1”的错误提示。这又是什么原因呢？

2011-06-17 17:27

danwu

等　级：新手上路
帖　子：10
专家分：0
注　册：2011-6-17

第 8 楼

得分:0

谢谢各位高手的指点，这个问题已经解决了。还有个问题就是表单里的文本框输入不了内容的？小弟菜鸟不懂

2011-06-17 17:38

tand_yang

等　级：新手上路
帖　子：4
专家分：2
注　册：2011-6-17

第 9 楼

得分:2

只能thisform.text1.value
活着thisform.机型.value

2011-06-17 20:18

danwu

等　级：新手上路
帖　子：10
专家分：0
注　册：2011-6-17

第 10 楼

得分:0

回复 9楼 tand_yang

问题已解决，谢谢

2011-06-17 21:05

参与讨论请移步原网站贴子：https://bbs.bccn.net/thread-343188-1-1.html