.版本 2 .子程序 _按钮1_被单击 .局部变量 分割, 文本型, , "0" 分割 ＝ 分割文本 (编辑框_地址.内容, “:”, ) .判断开始 (取数组成员数 (分割) ＝ 2) .判断开始 (客户1.连接 (分割 [1], 到整数 (分割 [2])) ＝ 真) 信息框 (“连接成功！”, 0, ) .默认 信息框 (“连接失败！”, 0, , ) .判断结束 .默认 信息框 (“地址格式错误！”, 0, , ) .判断结束 .子程序 _按钮2_被单击 客户1.发送数据 (到字节集 (“○|start|○”) ＋ 到字节集 (“text|○|”) ＋ 到字节集 (编辑框_文本.内容) ＋ 到字节集 (“○|over|○”)) .子程序 _按钮3_被单击 通用对话框1.打开 () 客户1.发送数据 (到字节集 (“○|start|○”) ＋ 到字节集 (“document|○|”) ＋ 读入文件 (通用对话框1.文件名) ＋ 到字节集 (“○|over|○”))