数据报

想学坏的小孩

.版本 2

.程序集 窗口程序集1

.子程序 _数据报1_数据到达

收到信息编辑框.加入文本 (取字节集数据 (数据报1.取回数据 (), #文本型) ＋ #换行符)

.子程序 _按钮1_被单击
.局部变量 端口号, 整数型

端口号 ＝ 到数值 (端口号编辑框.内容)
.如果真 (端口号 ≤ 0)
    信息框 (“请输入欲发送数据到端口号!”, 0, )
    返回 ()
.如果真结束
.如果真 (数据报1.发送数据 (主机地址编辑框.内容, 端口号, 发送编辑框.内容) ＝ 假)
    信息框 (“发送失败!”, 0, )
.如果真结束
发送编辑框.内容 ＝ “”
发送编辑框.获取焦点 ()

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

监听端口编辑框.内容 ＝ 到文本 (数据报1.端口)
发送编辑框.获取焦点 ()

.子程序 _改变监听端口按钮_被单击

数据报1.端口 ＝ 到数值 (监听端口编辑框.内容)

不死的白菜

谢谢楼主分享~

jj89

thanks~楼主分享！

631768417

看看是什么吧。。