看內(nèi)容會很失望，讓人hurt的易語言，沒辦法幫別人看一個易語言的程序，要添加這個東西，其實這是我第一次接觸，然后修改和寫易語言的程序。

創(chuàng)新互聯(lián)建站是一家專注于網(wǎng)站設(shè)計制作、網(wǎng)站設(shè)計與策劃設(shè)計,若羌網(wǎng)站建設(shè)哪家好?創(chuàng)新互聯(lián)建站做網(wǎng)站,專注于網(wǎng)站建設(shè)十載,網(wǎng)設(shè)計領(lǐng)域的專業(yè)建站公司;建站業(yè)務(wù)涵蓋:若羌等地區(qū)。若羌做網(wǎng)站價格咨詢:18980820575

代碼如下：

.版本 2

.子程序 取外網(wǎng)IP, 文本型, 公開, 取外網(wǎng)IP
.局部變量 原文, 文本型
.局部變量 過度, 文本型, , "0"
.局部變量 IP, 文本型

原文 ＝ 到文本 (彗星HTTP讀文件 (“http://www.ip138.com/ip2city.asp”))
過度 ＝ 分割文本 (原文, “您的IP地址是：[”, )
.如果 (取數(shù)組成員數(shù) (過度) ＜ 2)
  返回 (“”)
.否則

.如果結(jié)束
IP ＝ 子文本替換 (過度 [2], “] ”, “”, , , 假)
返回 (IP)

以上就是本次知識點的全部內(nèi)容，感謝大家對創(chuàng)新互聯(lián)的支持。