|
网站首页
|
业界新闻
|
小组
|
威客
|
人才
|
下载频道
|
博客
|
代码贴
|
在线编程
|
编程论坛
|
登录
注册
短消息
我发表的主题
我参与的主题
我收藏的贴子
我上传的附件
我下过的附件
编辑个人资料
我的博客
用户控制面板
搜索
道具
恢复默认风格
碧海青天
秋意盎然
棕红预览
粉色回忆
蓝雅绿
紫色淡雅
青青河草
e点小镇
橘子红了
红红夜思
水晶紫色
雪花飘飘
新年快乐
风格
短消息
论坛展区
帮助
编程论坛
→
数据库技术
→
『 VFP论坛 』
→ 求助一句VFP9代码转VB6.0代码
我的收件箱(0)
欢迎加入我们,一同切磋技术
用户名:
密 码:
共有
521
人关注过本帖
标题:
求助一句VFP9代码转VB6.0代码
只看楼主
加入收藏
杜非
等 级:
论坛游民
帖 子:15
专家分:10
注 册:2007-4-19
结帖率:
100%
楼主
收藏
已结贴
√
问题点数:14 回复次数:7
求助一句VFP9代码转VB6.0代码
请问老师:
如何将这段VFP9代码:
Right(Transform(Asc(Substr(行字节串, 20, 1)), '@0'), 2)
转换成VB6的代码。。另外请解释一下VFP语句中'@0'是什么意思。。先谢了。。
搜索更多相关主题的帖子:
VB6
转换
VFP9
VB6.0
代码
2023-07-18 19:02
举报帖子
使用道具
赠送鲜花
sdta
来 自:江苏省连云港市
等 级:
版主
威 望:
335
帖 子:9844
专家分:27213
注 册:2012-2-5
第
2
楼
收藏
得分:7
@0
将货币型值或数值型值转化为等价的十六进制格式。货币型值或数值型值必须是正的,并且小于 4,294,967,296。
坚守VFP最后的阵地
2023-07-18 22:15
举报帖子
使用道具
赠送鲜花
杜非
等 级:
论坛游民
帖 子:15
专家分:10
注 册:2007-4-19
第
3
楼
收藏
得分:0
刚刚看到。。谢了。。意思我理解了。。但在VB6中这个'@0'要什么替代或此处该怎么处理我还是搞不定。。希望版主帮忙译成VB6或告诉我怎么处理该处的'@0'。。非常感谢。。
2023-07-18 23:59
举报帖子
使用道具
赠送鲜花
杜非
等 级:
论坛游民
帖 子:15
专家分:10
注 册:2007-4-19
第
4
楼
收藏
得分:0
请问是不是可以这样处理
在VFP中:
Right(Transform(Asc(Substr(行字节串, 20, 1)), '@0'), 2)
在VB6中:
1、x = Substr(行字节串, 20, 1)
2、y = Asc(X)
3、z = 把y转换成16进制
4、Right(z, 2)就是结果
不知道这样处理对不对。。我试一试看。。
2023-07-19 00:20
举报帖子
使用道具
赠送鲜花
杜非
等 级:
论坛游民
帖 子:15
专家分:10
注 册:2007-4-19
第
5
楼
收藏
得分:0
愚钝。。没搞定。。
2023-07-19 00:44
举报帖子
使用道具
赠送鲜花
吹水佬
等 级:
版主
威 望:
451
帖 子:10608
专家分:43190
注 册:2014-5-20
第
6
楼
收藏
得分:7
HEX()
2023-07-19 05:07
举报帖子
使用道具
赠送鲜花
杜非
等 级:
论坛游民
帖 子:15
专家分:10
注 册:2007-4-19
第
7
楼
收藏
得分:0
感谢版主的回复。。我还在搞。。再次感谢。。
2023-07-19 16:57
举报帖子
使用道具
赠送鲜花
杜非
等 级:
论坛游民
帖 子:15
专家分:10
注 册:2007-4-19
第
8
楼
收藏
得分:0
问题解决了。。开心。。再次感谢两位版主的帮助。。
2023-07-20 22:33
举报帖子
使用道具
赠送鲜花
8
1/1页
1
快速回复:
求助一句VFP9代码转VB6.0代码
数据加载中...
关于我们
|
广告合作
|
编程中国
|
清除Cookies
|
TOP
|
手机版
编程中国
版权所有,并保留所有权利。
Powered by
Discuz
, Processed in 0.023545 second(s), 9 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved