To gddd:你的问题在这儿

Amoon 2001-12-02 05:24:26
呵呵,不好意思,一不小心把帖子转到Linux去了。
如果你要在HTML中用在VB中得到的颜色,把DAC6FB换成FBC6DA就好了。
也就是把前两位和后两位对换位置颜色就好了。
...全文
158 8 打赏 收藏 转发到动态 举报
写回复
用AI写文章
8 条回复
切换为时间正序
请发表友善的回复…
发表回复
gddd 2001-12-02
  • 打赏
  • 举报
回复
.呵呵..色彩很对了~~嘻嘻谢谢~~
Amoon 2001-12-02
  • 打赏
  • 举报
回复
我平时要用到的软件还没有装完,所以就没有睡啊。你也是个典型的夜猫子哦!:)
这个问题,我真的是没法了。呵呵,我网页方面的用得极少,抱歉了!
gddd 2001-12-02
  • 打赏
  • 举报
回复
呵。你怎么这么晚还不睡呀?....这个问题解决了...呵呵不知道还有一个问题你答不答得上来.
IE4浏览器接受不了这句.
sStr = Web1.Document.body.innerhtml
只有IE5才可以用到body.innerhtml的参数..
有没有什么办法代替?
inet控件去请求,不过取回来的东西好像和web控件取回来的不同...
IE4接受不了...可不可以换种写法让IE4可接受?
呵呵.解决不了也没关系.反正现在很少人用IE4的了~~嘻嘻
Amoon 2001-12-02
  • 打赏
  • 举报
回复
:),好了吗?颜色还对吧?:)
gddd 2001-12-02
  • 打赏
  • 举报
回复
呵。。我用了这个笨方法。。结果把d和b的位置搞错了。后来用了这个OK了
a = Hex(CommonDialog1.color)
b = Left(a, 2)
c = Right(a, 2)
d = Right(Left(a, 4), 2)
e = c & d & b
Amoon 2001-12-02
  • 打赏
  • 举报
回复
:),就以"DAC6FB"为例吧。
dim strResult as string
strResult=mid("DAC6FB",3,2) '取到中间两位
strResult=Right("DAC6FB",2) & strResult & Left("DAC6FB",2) 'Right得到右边两位,Left得到左边两位。换换位置就是你需要的了。:)
gddd 2001-12-02
  • 打赏
  • 举报
回复
a=dac6fb
b=left(a,2) '得到最左两位
c=right(a,2)‘得到最右两位
d=right(left(a,4),2)得到中间两位
e=c&b&d'最右两位,中间两位,最左两位?
gddd 2001-12-02
  • 打赏
  • 举报
回复
呵呵....我对含数转换很不熟~~~....你帮我写段代码吧?
left(123456,?????????????

7,762

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧