[已解决]列表双重显示问题

hytsky

我在调出来的窗体中选完选项后点击了一次查询会正常的显示结果,但是当我把选项改了以后在点击查询时后面又会列出设定的标题栏,请问这个代码该怎么改动,请高手帮忙改改,谢谢

最佳答案

月排行榜 / 总排行榜

zjdh

2011-11-22 08:47

显示问题.rar (17.28 KB, 下载次数: 18)

2011-11-22 08:47 上传

点击文件名下载附件

跳转到最佳答案楼层

zjdh

显示问题.rar (17.28 KB, 下载次数: 18)

2011-11-22 08:47 上传

点击文件名下载附件

hytsky

zjdh 发表于 2011-11-22 08:47

嘿嘿，我也是这么改的，只是如果我换成销售查询的时候那个时间还是显示生产时间不能自动换成销售时间，不知道这个能不能解决呵

zjdh

你这一段宏里没有设定“销售查询”，当然时间内容不会变啦！
Private Sub CommandButton1_Click()
    If ComboBox1.Value = "产量查询" And ComboBox2.Value = "第三生产线" And ComboBox3.Value = "普通白玻" Then
        i = "三线白玻"
        j = "生产时间"
        UserForm1.Caption = "玻璃产销存系统--" + ComboBox2.Value + "--" + ComboBox3.Value + "查询界面"
        list
    ElseIf ComboBox1.Value = "产量查询" And ComboBox2.Value = "第三生产线" And ComboBox3.Value = "超白" Then
        i = "三线超白"
        j = "生产时间"
        UserForm1.Caption = "玻璃产销存系统--" + ComboBox2.Value + "--" + ComboBox3.Value + "查询界面"
        list
    ElseIf ComboBox1.Value = "产量查询" And ComboBox2.Value = "第四生产线" And ComboBox3.Value = "普通白玻" Then
        i = "四线白玻"
        j = "生产时间"
        UserForm1.Caption = "玻璃产销存系统--" + ComboBox2.Value + "--" + ComboBox3.Value + "查询界面"
        list
    End If
End Sub
应该设置新的 j 值！