过程 检测() 变量 包名 为 文本型() 变量 计次 为 整数型 变量 全部包名 为 文本型 包名=取普通应用包名() 判断循环首 计次<取数组成员数(包名) 全部包名=全部包名 & 包名(计次) 计次=计次+1 判断循环尾 如果 寻找文本(全部包名,"com.taobao.taobao",0)=-1 则 ok工具类1.失败信息框(3,"太傻了","你都没装淘宝怎么做活动") 否则 启动应用("com.taobao.taobao") 结束 如果 结束 过程
过程 检测() 变量 包名 为 文本型() 变量 计次 为 整数型 变量 全部包名 为 文本型 包名=取普通应用包名() 判断循环首 计次<取数组成员数(包名) 全部包名=全部包名 & 包名(计次) 计次=计次+1 判断循环尾 如果 寻找文本(全部包名,"com.taobao.taobao",0)=-1 则 ok工具类1.失败信息框(3,"太傻了","你都没装淘宝怎么做活动") 否则 启动应用("com.taobao.taobao") 结束 如果 结束 过程