|
.版本 2
.程序集 窗口程序集1
.子程序 __启动窗口_创建完毕
编辑框1.内容 = “Windows IP Configuration” + #换行符 + “Ethernet adapter 无线网络连接:” + #换行符 + “Connection-specific DNS Suffix .:” + #换行符 + “IP 地址 . . . . . . . . . . . . :192.168.0.45” + #换行符 + “子网掩码 . . . . . . . . . . . . :255.255.255.0” + #换行符 + “默认网关 . . . . . . . . . . . . :192.168.0.1”
.子程序 _按钮1_被单击
.局部变量 文本位置, 整数型
.局部变量 文本位置2, 整数型
.局部变量 取出的文本长度, 整数型
文本位置 = 寻找文本 (编辑框1.内容, “:”, 1, 假)
文本位置 = 寻找文本 (编辑框1.内容, “:”, 文本位置 + 1, 假)
编辑框1.内容 = 文本替换 (编辑框1.内容, 文本位置 + 2, 13, “192.168.0.255”)
文本位置2 = 寻找文本 (编辑框1.内容, “子”, 1, 假)
取出的文本长度 = 文本位置2 - (文本位置 + 2)
信息框 (“IP地址已被更换为:” + 取文本中间 (编辑框1.内容, 文本位置 + 2, 取出的文本长度), 0, ) |
-
-
文本替换.e
3.12 KB, 下载次数: 77, 下载积分: 精币 -2 枚
|