取文本右边

我的爱情365

域名 ＝ “1yyy.yyye.3uuuu6.com”

' 我要取到  3uuuu6.com   

域名 是个随机变化
可以 随机变化 ，比如域名 ＝“ werf.1yyy.yyye.3uuuu6.com”  等等

半夏时光

  

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
文本	文本型
文本数组	文本型		0
域名	文本型

文本 ＝ “1yyy.yyye.3uuuu6.com”
文本数组 ＝ 分割文本 (文本, “.”, )
如果真 (取数组成员数 (文本数组) ≥ 2)
域名 ＝ 文本数组 [取数组成员数 (文本数组) － 1] ＋ “.” ＋ 文本数组 [取数组成员数 (文本数组)]
调试输出 (域名)

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 文本, 文本型<br /> .局部变量 文本数组, 文本型, , "0"<br /> .局部变量 域名, 文本型<br /> <br /> 文本 ＝ “1yyy.yyye.3uuuu6.com”<br /> 文本数组 ＝ 分割文本 (文本, “.”, )<br /> .如果真 (取数组成员数 (文本数组) ≥ 2)<br />     域名 ＝ 文本数组 [取数组成员数 (文本数组) － 1] ＋ “.” ＋ 文本数组 [取数组成员数 (文本数组)]<br />     调试输出 (域名)<br /> .如果真结束

御风软件

  

变量名	类 型	静态	数组	备 注
URL	文本型
点位置	整数型

URL ＝ “werf.1yyy.yyye.3uuuu6.com”
点位置 ＝ 倒找文本 (URL, “.”, , 假)
点位置 ＝ 倒找文本 (URL, “.”, 点位置 － 1, 假)
URL ＝ 取文本右边 (URL, 取文本长度 (URL) － 点位置)
调试输出 (URL)

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .局部变量 URL, 文本型<br /> .局部变量 点位置, 整数型<br /> <br /> URL ＝ “werf.1yyy.yyye.3uuuu6.com”<br /> 点位置 ＝ 倒找文本 (URL, “.”, , 假)<br /> 点位置 ＝ 倒找文本 (URL, “.”, 点位置 － 1, 假)<br /> URL ＝ 取文本右边 (URL, 取文本长度 (URL) － 点位置)<br /> 调试输出 (URL)

虚vs伪

  

子程序名	返回值类型	公开	备 注
_启动子程序	整数型		本子程序在程序启动后最先执行

变量名	类 型	静态	数组	备 注
ret	文本型
i	整数型
a	整数型
b	文本型
c	文本型

ret ＝ “werf.1yyy.yyye.3uuuu6.com”
a ＝ 寻找文本 (ret, “.com”, , 假)
b ＝ 取文本左边 (ret, a － 1)
计次循环首 (a － 1, i)
如果 (取文本中间 (b, a － i, 1) ≠ “.”)
c ＝ 取文本中间 (b, a － i, 1) ＋ c
跳出循环 ()

计次循环尾 ()
调试输出 (c ＋ “.com”)
返回 (0)  ' 可以根据您的需要返回任意数值

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 _启动子程序, 整数型, , 本子程序在程序启动后最先执行<br /> .局部变量 ret, 文本型<br /> .局部变量 i, 整数型<br /> .局部变量 a, 整数型<br /> .局部变量 b, 文本型<br /> .局部变量 c, 文本型<br /> <br /> ret ＝ “werf.1yyy.yyye.3uuuu6.com”<br /> a ＝ 寻找文本 (ret, “.com”, , 假)<br /> b ＝ 取文本左边 (ret, a － 1)<br /> .计次循环首 (a － 1, i)<br />     .如果 (取文本中间 (b, a － i, 1) ≠ “.”)<br />         c ＝ 取文本中间 (b, a － i, 1) ＋ c<br />     .否则<br />         跳出循环 ()<br />     .如果结束<br /> <br /> .计次循环尾 ()<br /> 调试输出 (c ＋ “.com”)<br /> 返回 (0)  ' 可以根据您的需要返回任意数值

请采纳

调试输出结果：
* ***************************************
* “3uuuu6.com”
被调试易程序运行完毕

给你改了下，直接调用就好使了。你可以自己加入自己的模块里面使用

  

子程序名	返回值类型	公开	备 注
_启动子程序	整数型		本子程序在程序启动后最先执行

调试输出 (找域名 (“werf.1yyy.yyye.3uuuu6.com”, “.com”))
返回 (0)  ' 可以根据您的需要返回任意数值

子程序名	返回值类型	公开	备 注
找域名	文本型
参数名	类 型	参考	可空	数组	备 注
完整域名	文本型
域名后缀	文本型

变量名	类 型	静态	数组	备 注
i	整数型
a	整数型
b	文本型
c	文本型

a ＝ 寻找文本 (完整域名, 域名后缀, , 假)
b ＝ 取文本左边 (完整域名, a － 1)
计次循环首 (a － 1, i)
如果 (取文本中间 (b, a － i, 1) ≠ “.”)
c ＝ 取文本中间 (b, a － i, 1) ＋ c
跳出循环 ()

计次循环尾 ()
返回 (c ＋ 域名后缀)

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 _启动子程序, 整数型, , 本子程序在程序启动后最先执行<br /> <br /> 调试输出 (找域名 (“werf.1yyy.yyye.3uuuu6.com”, “.com”))<br /> 返回 (0)  ' 可以根据您的需要返回任意数值<br /> <br /> .子程序 找域名, 文本型<br /> .参数 完整域名, 文本型<br /> .参数 域名后缀, 文本型<br /> .局部变量 i, 整数型<br /> .局部变量 a, 整数型<br /> .局部变量 b, 文本型<br /> .局部变量 c, 文本型<br /> <br /> a ＝ 寻找文本 (完整域名, 域名后缀, , 假)<br /> b ＝ 取文本左边 (完整域名, a － 1)<br /> .计次循环首 (a － 1, i)<br />     .如果 (取文本中间 (b, a － i, 1) ≠ “.”)<br />         c ＝ 取文本中间 (b, a － i, 1) ＋ c<br />     .否则<br />         跳出循环 ()<br />     .如果结束<br /> <br /> .计次循环尾 ()<br /> 返回 (c ＋ 域名后缀)

附源码：
找域名.zip (13.9 KB, 下载次数: 5)

2014-9-14 19:07 上传

点击文件名下载附件

汉族

  

子程序名	返回值类型	公开	备 注
专门给你做的模块	文本型		汉族制作
参数名	类 型	参考	可空	数组	备 注
域名地址	文本型

返回 (取文本右边 (域名地址, 取文本长度 (域名地址) － 倒找文本 (域名地址, “.”, 倒找文本 (域名地址, “.”, , 假), 假)))

.版本 2<br /> <br /> .子程序 专门给你做的模块, 文本型, , 汉族制作<br /> .参数 域名地址, 文本型<br /> <br /> 返回 (取文本右边 (域名地址, 取文本长度 (域名地址) － 倒找文本 (域名地址, “.”, 倒找文本 (域名地址, “.”, , 假), 假)))

汉族

地址： 你要的取（域名）.zip (1.11 KB, 下载次数: 7)

2014-9-14 19:13 上传

点击文件名下载附件
演示图片：

半夏时光

汉族 发表于 2014-9-14 19:14
地址：
演示图片：

头像好好看。

南风轩雨

  

变量名	类 型	静态	数组	备 注
域名	文本型

域名 ＝ “1yyy.yyye.3uuuu6.com”
调试输出 (取文本右边 (域名, 取文本长度 (域名) － 取文本长度 (“3uuuu6.com”)))

i支持库列表	支持库注释
Krnlnex	(未知支持库)

.版本 2<br /> .支持库 Krnlnex<br /> <br /> .局部变量 域名, 文本型<br /> <br /> 域名 ＝ “1yyy.yyye.3uuuu6.com”<br /> <br /> <br /> 调试输出 (取文本右边 (域名, 取文本长度 (域名) － 取文本长度 (“3uuuu6.com”)))

注：无论域名前面怎么变化你都可以取到想要的了