PDA

View Full Version : ايجاد دو شرط در ليست باكس در نمايش جدول



zzzzzza
سه شنبه 11 آبان 1389, 16:36 عصر
با سلام چطور ميشه شرط دومي براي نمايش جدول بر اساس ليست باكس تعريف كرد:
الان فيلتر فقط بر اساس MLINK است من ميخواهم يك فيلد ديگر مثلا PERSON را هم شرط نمايش تعريف كنم امكان دارد كد را براي من اصلاح كنيد



Private Sub List185_AfterUpdate()
' Find the record that matches the control.
Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst "[MLINK] = " & Str(Nz(Me![List185], 0))
If Not rs.EOF Then Me.Bookmark = rs.Bookmark
Command199.Enabled = True
End Sub

dadsara
سه شنبه 11 آبان 1389, 17:17 عصر
سلام
به اين ترتيب عمل كنيد

If ((Not rs.EOF Then Me.Bookmark = rs.Bookmark) and (شرط دوم))