| 网站首页 | 业界新闻 | 小组 | 交易 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
ADSL如何秒变专线,公网IP盒子了解一下千里之行 始于足下
共有 278 人关注过本帖
标题:字段格式是字符型的,这命令怎么保存不了
只看楼主 加入收藏
铠甲一号
Rank: 1
等 级:新手上路
帖 子:23
专家分:0
注 册:2014-12-17
结帖率:60%
  已结贴   问题点数:20  回复次数:7   
字段格式是字符型的,这命令怎么保存不了
if empty()
=messagebox("学校不能为空,请重新输入!",48+0+0,"警告")

ELSE
this.enabled=.t.
thisform.list1.enabled=.t.
thisform.list1.rowsource="sele MAX(学籍辅号) from xjk where allt(学籍辅号)='2'+SUBSTR((),7,2)+ALLTRIM(thisform.CD2.value).and.allt()='初中'into cursor t"
ENDIF

thisform.Text15.Value = INT(val(SUBSTR((this.VALUE),1,11))+1)

REPL 学籍辅号 WITH ALLTRIM(str(thisform.TEXT15.value))
搜索更多相关主题的帖子: 字段 字符型 保存 thisform value 
2019-05-08 09:58
wengjl
Rank: 11Rank: 11Rank: 11Rank: 11
等 级:贵宾
威 望:77
帖 子:1679
专家分:2982
注 册:2007-4-27
  得分:10 
代码是按顺序执行的。空,给出提示,设置焦点后,并不停下来…… 后面与combo6无关的

最好是上传附件

只求每天有一丁点儿的进步就可以了
2019-05-08 10:27
xuminxz
Rank: 8Rank: 8
等 级:贵宾
威 望:10
帖 子:307
专家分:879
注 册:2011-5-8
  得分:10 
错误出现在哪?
似乎应该要加
return

[此贴子已经被作者于2019-5-8 11:08编辑过]


dBase有人接盘了。
2019-05-08 11:06
铠甲一号
Rank: 1
等 级:新手上路
帖 子:23
专家分:0
注 册:2014-12-17
  得分:0 
回复 2楼 wengjl

if empty()
=messagebox("学校不能为空,请重新输入!",48+0+0,"警告")

ELSE
this.enabled=.t.
thisform.list1.enabled=.t.
thisform.list1.rowsource="sele MAX(学籍辅号) from xjk where allt(学籍辅号)='2'+SUBSTR((),7,2)+ALLTRIM(thisform.CD2.value).and.allt()='初中'into cursor t"
ENDIF
上面是通过combo6组合框,取最大学籍辅号显示到list1列表框,显示正常

thisform.Text15.Value = INT(val(SUBSTR((this.VALUE),1,11))+1)
通过list1列表框转换数字数据到test15文本框(在原最大值的基础上加1)显示,显示正常

REPL 学籍辅号 WITH ALLTRIM(str(thisform.TEXT15.value))
这个命令是保存,但在表对应的学籍辅号里就出现2.177E+10  这个代码,求版主帮助解决下,自己设计个小的学籍管理软件工作上使用方便,谢谢主!
2019-05-08 15:06
铠甲一号
Rank: 1
等 级:新手上路
帖 子:23
专家分:0
注 册:2014-12-17
  得分:0 
回复 2楼 wengjl
附件: 您没有浏览附件的权限,请 登录注册
2019-05-08 15:11
xuminxz
Rank: 8Rank: 8
等 级:贵宾
威 望:10
帖 子:307
专家分:879
注 册:2011-5-8
  得分:0 
没有代码,没有数据结构。无法回答呀。

dBase有人接盘了。
2019-05-08 16:23
xuminxz
Rank: 8Rank: 8
等 级:贵宾
威 望:10
帖 子:307
专家分:879
注 册:2011-5-8
  得分:0 
你试过,在和ELSE之间加上return了吗?

dBase有人接盘了。
2019-05-08 16:26
铠甲一号
Rank: 1
等 级:新手上路
帖 子:23
专家分:0
注 册:2014-12-17
  得分:0 
回复 7楼 xuminxz
谢谢各位大佬,问题已经解决,再次感谢!

[此贴子已经被作者于2019-5-8 16:49编辑过]

附件: 您没有浏览附件的权限,请 登录注册
2019-05-08 16:41







关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.017936 second(s), 8 queries.
Copyright©2004-2019, BCCN.NET, All Rights Reserved