DataReportでフォントを変更するには？

riki 2006-07-31 23:03:21 No: 132511

ＶＢを始めて間もない初心者です。
Accessからテーブルを読み、DataReportを使用して印刷するロジックを作成しているのですが、ある項目(1桁のみの項目）に対し、特定の文字(ＯとかＶ等）を判定してフォントを変更したいのですが、やり方が分からず苦慮しております。
何方かご指導頂けないでしょうか・・・下記のようなロジックで印刷しております。

mySQL$ = "select * FROM M_TEST "

    strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\TEST001.mdb;"
    Set cn = New ADODB.Connection
    cn.Open strConn

Set rs = New ADODB.Recordset

rs.Open mySQL$, cn, adOpenStatic

Set DataReport_001.DataSource = rs

DataReport_001.Show 1

rs.Close
cn.Close