.计次循环首 (AdapterInfo [i].AddressLength, 计次)
addr ＝ 取十六进制文本 (AdapterInfo [i].Address [计次])
.如果真 (取文本长度 (addr) ＝ 1)
addr ＝ “0” ＋ addr
.如果真结束
.如果真 (计次 ≠ 0 且 计次 ≠ AdapterInfo [i].AddressLength)
addr ＝ addr ＋ “-”
.如果真结束
编辑框1.加入文本 (addr)
处理事件 ()
.计次循环尾 ()
上一篇 程序控件大小调整和移动
下一篇 比较完整的定时关机软件