为什么会运行时报错?!
载入_启动窗口的时候都不会报错,窗口4创建完毕后关闭窗口4就会出现:指定窗口或窗口组件不存在或未载入代码:
.版本 2
.子程序 _服务器1_客户进入
.局部变量 项目数
.局部变量 变量3
.局部变量 收到数据, 字节集
' 当某客户连接进来时,将其加入在线列表。
收到数据 = 服务器1.取回数据 ()
项目数 = 窗口4.列表框1.取项目数 ()
窗口4.列表框1.加入项目 (服务器1.取回客户 (), )
.计次循环首 (项目数, 变量3)
服务器1.发送数据 (窗口4.列表框1.取项目文本 (变量3 - 1), “有人上线了!”, 1)
.计次循环尾 ()
.子程序 _服务器1_客户离开
.局部变量 客户, 文本型
.局部变量 项目数
.局部变量 变量3
' 当某客户断开连接时,将其从在线列表中删除。
客户 = 服务器1.取回客户 ()
项目数 = 窗口4.列表框1.取项目数 ()
.计次循环首 (项目数, 变量3)
.如果真 (窗口4.列表框1.取项目文本 (变量3 - 1) = 客户)
窗口4.列表框1.删除项目 (变量3 - 1)
服务器1.发送数据 (窗口4.列表框1.取项目文本 (变量3 - 0), “有人离开了!”, 1)
跳出循环 ()
.如果真结束
.计次循环尾 ()
.子程序 _服务器1_数据到达
.局部变量 项目数
.局部变量 变量3
.局部变量 收到数据, 字节集
' 将所收到的信息转发给所有在线客户。
收到数据 = 服务器1.取回数据 ()
项目数 = 窗口4.列表框1.取项目数 ()
.计次循环首 (项目数, 变量3)
服务器1.发送数据 (窗口4.列表框1.取项目文本 (变量3 - 1), 收到数据, 1)
.计次循环尾 ()
页:
[1]