access在報(bào)表中把符合條件的數(shù)據(jù)圈出來

在報(bào)表展示的數(shù)據(jù)中，我們有時(shí)希望突出顯示某些符合條件的數(shù)據(jù)。

對于數(shù)據(jù)高亮顯示，比較簡單的辦法可以通過條件格式?？梢栽O(shè)置各種突出的樣式

這里介紹一下在報(bào)表中，把指定范圍的數(shù)據(jù)集 用橢圓圈釋出來

通過下面代碼，把價(jià)錢小于等于5的價(jià)錢用紅色的橢圓圈出來

Private Sub 主體_Format(Cancel As Integer, FormatCount As Integer)
    Dim sH As Single
    Dim sV As Single
    Dim sW As Single
 
    If Me.價(jià)錢<= 5 Then 
     With Me.價(jià)錢 
       sH = .Left + .Width / 2 '橢圓的位置 
       sV = .Top + .Height / 2 sW = .Width / 2 '設(shè)置橢圓的寬度 
     End With 
     Me.Circle (sH, sV), sW, vbRed, , , 0.3 '畫橢圓 
    End If 
End Sub 

此代碼主要是通過定位到指定條件的位置，用Circle函數(shù)畫出指定大小的橢圓