access在報錶中把符閤條件的數據圈齣來

在報錶展示的數據中，我們有時希望突齣顯示某些符閤條件的數據。

對於數據高亮顯示，比較簡單的辦法可以通過條件格式。可以設置各種突齣的樣式

這裡介紹一下在報錶中，把指定範圍的數據集 用橢圓圈釋齣來

通過下麵代碼，把價錢小於等於5的價錢用紅色的橢圓圈齣來

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

此代碼主要是通過定位到指定條件的位置，用Circle函數畵齣指定大小的橢圓