要在where後面下DISTINCT可以ㄇ?
Adodc3.RecordSource = "select * from 學生上課記錄 where 老師姓名='" & (Adodc1.Recordset("老師姓名")) & "'and 上課日期 like '" & (Text1.Text) & "%' DISTINCT'上課班別' order by 上課班別"
Adodc3.Refresh
'要adodc3顯示的班別不重復
arrow
arrow
    全站熱搜

    vbqa 發表在 痞客邦 留言(0) 人氣()