回复:求一VBS 算法

有谁共鸣

  • 帖子

    2153
  • 精华

    21
  • 被关注

    6

论坛等级:侠圣

注册时间:2005-05-07

普通 普通 如何晋级?

发布于 2006-07-17 14:27:12

0楼

楼主:
你所谓的M(1)---M(8)这几个是不是只表示数字!???
下面这个就判断是不是数字?不是的话就不合并,是数字就合并.
Dim Index(8),i
Index(1)=7
Index(2)=8
Index(3)=5
Index(4)=6
Index(5)=3
Index(6)=4
Index(7)=1
Index(8)=2
for i=1 to 8
if (Asc(M(i))>48 and Asc(M(i))<57) then
M(0)=M(0)+M(Index(i))
endif
next i
雄关漫道真如铁,而今迈步从头越!
评论
编辑推荐: 关闭

请填写推广理由:

本版热门话题

SIMATIC WinCC / Panel

共有32569条技术帖

相关推荐

热门标签

相关帖子推荐

guzhang

恭喜,你发布的帖子

评为精华帖!

快扫描右侧二维码晒一晒吧!

再发帖或跟帖交流2条,就能晋升VIP啦!开启更多专属权限!

  • 分享

  • 只看
    楼主

top
您收到0封站内信:
×
×
信息提示
很抱歉!您所访问的页面不存在,或网址发生了变化,请稍后再试。