一个小问题

lldt2001

.版本 2
.支持库 internet

.程序集 窗口程序集1

.子程序 _按钮确定_被单击
.局部变量 数据返回, 文本型

数据返回 ＝ 到文本 (HTTP读文件 (“http://r.pengyou.com/fcg-bin/cgi_get_portrait.fcg?uins=” ＋ 编辑框账号.内容 ＋ “&get_nick=1&_=1438937421131”))
标签昵称.标题 ＝ 文本_取出中间文本 (数据返回, #引号, #引号, 倒找文本 (数据返回, 编辑框账号.内容, , 假) ＋ 取文本长度 (编辑框账号.内容) ＋ 10)
图片框QQ.图片 ＝ HTTP读文件 (“http://q.qlogo.cn/headimg_dl?dst_uin=” ＋ 编辑框账号.内容 ＋ “&spec=640&img_type=jpg”)

.子程序 文本_取出中间文本, 文本型
.参数 完整内容, 文本型
.参数 左边文本, 文本型, 可空
.参数 右边文本, 文本型, 可空
.参数 起始位置, 整数型, 可空
.局部变量 临时位置, 整数型
.局部变量 总长度, 整数型
.局部变量 临时文本, 文本型

.如果真 (起始位置 ≠ 0)
    完整内容 ＝ 取文本右边 (完整内容, 取文本长度 (完整内容) － 起始位置)
.如果真结束
总长度 ＝ 取文本长度 (完整内容)
.判断开始 (右边文本 ＝ “”)
    .如果真 (寻找文本 (完整内容, 左边文本, , 假) ＞ -1)
        临时位置 ＝ 寻找文本 (完整内容, 左边文本, , 假) ＋ 取文本长度 (左边文本)
        临时文本 ＝ 取文本中间 (完整内容, 临时位置, 总长度)
        返回 (临时文本)
    .如果真结束
    ' 本源码来自易语言资源网(www.5A5X.com)
.判断 (左边文本 ＝ “”)
    .如果真 (寻找文本 (完整内容, 右边文本, , 假) ＞ -1)
        临时位置 ＝ 寻找文本 (完整内容, 右边文本, , 假) － 1
        临时文本 ＝ 取文本左边 (完整内容, 临时位置)
        返回 (临时文本)
    .如果真结束

.判断 (左边文本 ＝ “” 且 右边文本 ＝ “ ”)
    返回 (“”)  ' 本源码来自易语言资源网(www.5A5X.com)
.默认
    .如果真 (寻找文本 (完整内容, 左边文本, , 假) ＞ -1)
        临时位置 ＝ 寻找文本 (完整内容, 左边文本, , 假) ＋ 取文本长度 (左边文本)
        临时文本 ＝ 取文本中间 (完整内容, 临时位置, 总长度)
        总长度 ＝ 取文本长度 (临时文本)
        临时位置 ＝ 寻找文本 (临时文本, 右边文本, , 假) － 1
        临时文本 ＝ 取文本中间 (临时文本, 1, 临时位置)
        返回 (临时文本)
    .如果真结束

.判断结束
返回 (“”)

.子程序 __启动窗口_创建完毕







' 怎样让编辑框的内容=指定的内容，如果对就让他载入新窗口不对就提示下然后结束        比如 编辑框里填写的的QQ是123456
' 如果编辑框填写的内容是123456，就让他载入窗口1，不对就用信息框提示说您填写的内容错误，然后结束
' 必须是获取到头像后再载入窗口1

282134

  

变量名	类 型	静态	数组	备 注
数据返回	文本型

如果真 (编辑框账号.内容 ≠ “123456”)
信息框 (“内容不对”, 0, , )
结束 ()
数据返回 ＝ 到文本 (HTTP读文件 (“http://r.pengyou.com/fcg-bin/cgi_get_portrait.fcg?uins=” ＋ 编辑框账号.内容 ＋ “&get_nick=1&_=1438937421131”))
标签昵称.标题 ＝ 文本_取出中间文本 (数据返回, #引号, #引号, 倒找文本 (数据返回, 编辑框账号.内容, , 假) ＋ 取文本长度 (编辑框账号.内容) ＋ 10)
图片框QQ.图片 ＝ HTTP读文件 (“http://q.qlogo.cn/headimg_dl?dst_uin=” ＋ 编辑框账号.内容 ＋ “&spec=640&img_type=jpg”)
载入 (窗口1, , 真)

i支持库列表	支持库注释
internet	互联网支持库

.版本 2<br /> .支持库 internet<br /> <br /> .局部变量 数据返回, 文本型<br /> <br /> .如果真 (编辑框账号.内容 ≠ “123456”)<br />     信息框 (“内容不对”, 0, , )<br />     结束 ()<br /> .如果真结束<br /> 数据返回 ＝ 到文本 (HTTP读文件 (“http://r.pengyou.com/fcg-bin/cgi_get_portrait.fcg?uins=” ＋ 编辑框账号.内容 ＋ “&get_nick=1&_=1438937421131”))<br /> 标签昵称.标题 ＝ 文本_取出中间文本 (数据返回, #引号, #引号, 倒找文本 (数据返回, 编辑框账号.内容, , 假) ＋ 取文本长度 (编辑框账号.内容) ＋ 10)<br /> 图片框QQ.图片 ＝ HTTP读文件 (“http://q.qlogo.cn/headimg_dl?dst_uin=” ＋ 编辑框账号.内容 ＋ “&spec=640&img_type=jpg”)<br /> 载入 (窗口1, , 真)

悟空科技

  

判断 (编辑框1.内容 ＝ “123456”)
载入 (窗口1, , 假)
信息框 (“提示提示提示提示提示”, 0, )
结束 ()

.版本 2<br /> <br /> .判断开始 (编辑框1.内容 ＝ “123456”)<br />     载入 (窗口1, , 假)<br /> .默认<br />     信息框 (“提示提示提示提示提示”, 0, )<br />     结束 ()<br /> .判断结束

lldt2001

中国熊 发表于 2016-3-25 22:23
[e=1].版本 2

.判断开始 (编辑框1.内容 ＝ “123456”)

我试过这样的，直接就载入窗口1了，根本没时间获取头像和昵称