全部

===== 一个很简单的问题! ======

sDuma 2004-11-27 10:22:12

假如一个变量如下:

abc = 123abc456def

(abc是随机生成的)

我想只保留里面的数字,删掉其它的字符(汉字、英文....)。

请问有没有这样的函数？如果没有能否提供一个？

...全文

51 点赞收藏 6

写回复

6 条回复

切换为时间正序

当前发帖距今超过3年，不再开放新的回复

发表回复

叮咚叮咚叮叮咚 2004-11-28

还可以用正则表达式
js
abc ="123abc456def"
abc=abc.replace(/\D/g,'')
document.write(abc)

回复赞

ygjwjj 2004-11-27

Dim abc,s,tmp
abc = "123abc456def"
for i = 0 to (len(abc)-1)
tmp= mid(abc,i+1,1)
if IsNumeric(tmp) Then s = s&tmp
next

Response.Write s

回复赞

ljupin 2004-11-27

Sorry

Dim abc,s,ss
abc = "123abc456def"
for i = 1 to (len(abc))
ss = mid(abc,i,1)
if IsNumeric(ss) Then s = s&ss
next
Response.Write s

回复赞

Drowning 2004-11-27

function getNum(str)
result=""
for i=1 to len(str)
s=mid(abc,i,1)
if isnumeric(s) then
result=result+s
end if
next
getNum=result
end function

abc="123abc456def"
getNum(abc)

回复赞

sdts 2004-11-27

没有
自己写一个吧

s=123abc456def
function prostr(stri)
dim r
r=""
for i=0 to 9
for k=1 to len(stri)
if strcomp(mid(stri,k,1),cstr(i),1) = 0 then
r=cstr(i)&r
end if
next
next
prostr=r
end function

没有实验应该差不多了

回复赞

ljupin 2004-11-27

abc是随机生成的?晕

笨方法,暂时没想到其他方式:
Dim abc,s
abc = "123abc456def"
for i = 0 to (len(abc)-1)
if IsNumeric(abc(i)) Then s = s&abc(i)
next

Response.Write s

回复赞

最速下降法C++源程序本文是关于最速下降法的C++源程序，希望能帮助大家。

高速串行serdes接口.zip JEDEC标准，JESD204C协议，还有ESIstream协议，JESD204B协议，有的我是下载的有的是买的，也是为了以后下载东西方便一点，希望各位谅解，本人研究高速串行接口，FPGA，希望能相互交流

Pearson相关系数 Pearson相关系数的原理方法和程序实现。

OpenGL 课程涵盖了OpenGL开发的方方面面,对开发中经常用到的开发知识点进行讲解,从实战的角度进行编码设计. 第1章-环境建立第2章-基础图元第3章-三维世界第4章-纹理多彩世界第5章-显存的分配-优化第6章-场景控制第7章-光照-真实世界第8章-模型第9章-UI制作第10章-场景编辑器制作第11章-地形第12章-脚本引入-lua 教程从最最本的固定管线开始,一节课一个知识点,从实战的角度出发,结合项目开发中经常用到的知识点作深入的讲解,以面向对象的编成方式对知识点进行封装,可以直接引入到项目中使用.通过课程的学习,掌握OpenGL图形编程技巧,并能学以致用.

PPT模板下载 PPT模板下载我只是想要点积分啊　

vue-devtools chrome 插件 chrome（谷歌浏览器）vue代码调试插件，已打包。解压后，通过chrome扩展程序加载即可使用。使用方法： 1、chrome浏览器输入地址“chrome://extensions/”进入扩展程序页面 2、勾选开发者模式 3、点击“加载已解压的扩展程序...”按钮，选择解压后的chrome文件夹，即可添加成功。 4、添加完vue-devtools扩展程序之后，我们在调试vue应用的时候，ch rome开发者工具中会看一个vue的一栏，点击之后就可以看见当前页面vue对象的一些信息

linux网络内核书合集06 本合集是本人搜集的关于linux网络内核的书籍，都是经典，包含：（1）Linux网络体系结构：Linux内核中网络协议的设计与实现.chm （2）Linux网络内核分析与开发.pdf （3）嵌入式Linux网络体系结构设计与TCP／IP协议栈.pdf （4）深入理解LINUX网络技术内幕.pdf 第一本是英文版chm格式，其余三本均为中文版，扫描清晰

tera term 4.72源代码 tera term 是一款开源的的串口通讯软件,功能强大,而且开源,是windows下连接linux设备的首选软件