If Option3.Value = True Then
    If cmbSMName.ListIndex <> 0 Then sql = sql & " and tb_Record.smNum='" & smNum(cmbSMName.ListIndex - 1) & "'"
    End If麻烦写明白一点,初学者 嘿嘿

解决方案 »

  1.   

    忽然发现,如果只是按照字面上的意思去翻译这段语句,翻译出来的东西绝对要比语句本身啰嗦得多.
    If Option3.Value = True Then
      If cmbSMName.ListIndex <> 0 Then sql = sql & " and tb_Record.smNum='" & smNum(cmbSMName.ListIndex - 1) & "'"
      End IfIf Option3.Value = True Then
    当Option3被选中的时候则运行以下语句,至于Option3代表什么意思,还得看你前面的程序了
    If cmbSMName.ListIndex <> 0 Then 
    cmbSMName貌似是一个Combo控件,当这个cmbSMName被选中的项目不是第0个的时候运行后面的语句,至于这个控件每一项的内容是什么也得看你前面的程序如何定义了
    sql = sql & " and tb_Record.smNum='" & smNum(cmbSMName.ListIndex - 1) & "'"
    这一句么就是生成一个字符串
    并且看样子sql这个字符串在这之前已经有内容了,所以还是得看你之前的程序我说楼主,你还是从头开始好好学学VB吧,这都是很基础的东西了, 基础到我都没办法用简单的话来说明了.
    要是你真的不懂这些,即使把程序从头解释一遍,你也是很难掌握的,更何况也没人会把整个程序从头到底一句一句解释给你听吧
      

  2.   


    我不明白的是这个:开始ListIndex    后来又这个   ListIndex - 1;ListIndex - 1他们具体指的是什么东西啊?(这是combobox的控件地下的代码)  麻烦再解释一下,谢谢啦~~~
      

  3.   

    ListIndex是一个数值 为下拉列表中 值的个数
    比如拉列表中有3个值:
    A
    B
    C
    那么
    ListIndex - 1=3-1
    如果ListIndex=1
    cmbSMName.ListIndex - 1:A
    如果ListIndex=2
    cmbSMName.ListIndex - 1:B
    如果ListIndex=3
    cmbSMName.ListIndex - 1:C楼主再不看书,还问这种问题会受人鄙视的~