简单几行代码让超级列表框透明

.如果真 (滑块条1.位置 ≥ 255)
滑块条1.位置 ＝ 0
.如果真结束
滑块条1.位置 ＝ 滑块条1.位置 ＋ 1
设置窗口透明度 (窗口1.取窗口句柄 (), 255 － 滑块条1.位置)