搜索
编程论坛
→
数据库技术
→
『 VFP论坛 』
→ 求一个简单的问题!
标题:
求一个简单的问题!
只看楼主
zygyhj
等 级:
新手上路
帖 子:23
专家分:0
注 册:2008-8-30
楼主
问题点数:0 回复次数:7
求一个简单的问题!
我写了一个过程softInit()在过程中我求出一个值rootPath,但在屏幕上输出时却发现多出一些字符'PROCEDURE SOFTINIT',怎么才能只得PROCEDURE SOFTINIT之后的字符呢?可以复制下面的代码并运行一下看看
softInit()
PROCEDURE softInit
rootPath=SYS(16)
?rootPath
ENDPROC
搜索更多相关主题的帖子:
procedure
2008-09-25 17:11
zygyhj
等 级:
新手上路
帖 子:23
专家分:0
注 册:2008-8-30
第
2
楼
得分:0
补充一下,我用的VFP9
2008-09-25 17:26
szy345
来 自:江苏——南京
等 级:
贵宾
威 望:
14
帖 子:336
专家分:14
注 册:2008-8-6
第
3
楼
得分:0
softInit()
PROCEDURE softInit
rootPath=right(SYS(16),len(sys(16))-rat(sys(5),sys(16))+1)
?rootPath
ENDPROC
VFP技术交流,QQ群:20452307
欢迎您!
2008-09-25 17:32
zygyhj
等 级:
新手上路
帖 子:23
专家分:0
注 册:2008-8-30
第
4
楼
得分:0
三楼的朋友,sys(16)及其它的SYS()函数究竟返回的是什么类型的数据,Type()返回的类型是U,但VarType返回的类型是C
2008-09-25 20:33
szy345
来 自:江苏——南京
等 级:
贵宾
威 望:
14
帖 子:336
专家分:14
注 册:2008-8-6
第
5
楼
得分:0
可以说SYS()返回的是字符串,
TYPE()、VarType()里面的参数是字符串,则都返回C
如果参数是变量,则都返回U
VFP技术交流,QQ群:20452307
欢迎您!
2008-09-25 20:55
zygyhj
等 级:
新手上路
帖 子:23
专家分:0
注 册:2008-8-30
第
6
楼
得分:0
你测试一下
?VARTYPE(SYS(16)) &&返回的是C
?TYPE(sys(16)) &&返回的是U
2008-09-26 07:49
szy345
来 自:江苏——南京
等 级:
贵宾
威 望:
14
帖 子:336
专家分:14
注 册:2008-8-6
第
7
楼
得分:0
首先,对于type()函数的参数是要加引号的。vartype()则不需要。
其次,2个函数在获取其参数的类型之前,(他们的参数相当于一个变量)
先要对这个变量求值,再判断这个值的类型。U是未知或未定义。
VARTYPE(SYS(16)),其中SYS(16)返回的是一个路径字符串,
所以VARTYPE(SYS(16))返回的是C
TYPE(sys(16)),我们假如sys(16)返回的是这样一个字符串“D:\”
那么TYPE(sys(16))就相当于 TYPE(“D:\”),
这个时候,TYPE()函数会把 D:\ 当作一个变量来处理,对其求值,再判断值的类型,但是,我们事先根本就没有定义 D:\ 这个变量,
所以TYPE(sys(16)) 返回的是 U(未定义的类型)
如果改成TYPE(”sys(16)“)返回的就是C 。
VFP技术交流,QQ群:20452307
欢迎您!
2008-09-26 10:16
szy345
来 自:江苏——南京
等 级:
贵宾
威 望:
14
帖 子:336
专家分:14
注 册:2008-8-6
第
8
楼
得分:0
[bo][un]szy345[/un] 在 2008/9/25 20:55 的发言:[/bo]
可以说SYS()返回的是字符串,
TYPE()、VarType()里面的参数是字符串,则都返回C
如果参数是变量,则都返回U
这里描述的不准确!
VFP技术交流,QQ群:20452307
欢迎您!
2008-09-26 10:51
8
1/1页
1
参与讨论请移步原网站贴子:
https://bbs.bccn.net/thread-235154-1-1.html
关于我们
|
广告合作
|
编程中国
|
清除Cookies
|
TOP
|
手机版
编程中国
版权所有,并保留所有权利。
Powered by
Discuz
, Processed in 0.753750 second(s), 7 queries.
Copyright©2004-2025, BCCN.NET, All Rights Reserved