"子程序 _选择列表框1_列表项被选择"鈈要这么复杂,只要下面一句就行,加入"天气"为程序集变量,加入"子程序 _超级列表框1_表头被单击".
在"选择列表框1"中选好"天气",点击"超级列表框1"中的"天氣1"或"天气2"的表头,就会替换.
.程序集 窗口程序集1
.程序集变量 天气, 文本型
.子程序 _选择列表框1_列表项被选择
天气 = 选择列表框1.取项目文本 (选择列表框1.现行选中项)
.子程序 _超级列表框1_表头被单击
.参数 被单击列索引, 整数型
.局部变量 i, 整数型
.如果真 (超级列表框1.取表项数 () = 0 或 天气 = “”)
.计次循环艏 (超级列表框1.取表项数 (), i)
超级列表框1.置标题 (i, 被单击列索引, 天气)
首先谢谢您!我试了下还是不行 我的意思是,选择列表框中的“天气后超級列表框中的字段自动替换成选择列表框中的“天气”,例如我选中选择列表框中的天气“晴天”后,自动替换选择列表框天气1中“多雲”
怎么不行呢?
"超级列表框1"的表头不能点击?如果是,请在"超级列表框"的属性中改"表头可单击"为真.