关于报表,急!!!!

Question

activereport支持中文呀，改一下字体就可以了

Answer 1

我的所有中文都是方框,英文字段就ok,不知在哪改请指教
(我是动态绑定的field哟)

Answer 2

可以用dll,在dll中可以随意编辑

Answer 3

Private Sub cmdPrint_Click()
Dim PurhcaseCon As ADODB.Connection
Dim str As String
Dim secDetail As Section
Dim rs As ADODB.Recordset
    With mPurchase
        str = .PrintStr
    End With
    Set rs = mPurchase.QueryPrint(str)
    Set secDetail = rptPurchase.Sections(3)
    Set rptPurchase.DataSource = rs
    secDetail.Controls("Text1").DataField = "PurchaseNo"
    secDetail.Controls("Text2").DataField = "SPID"
    secDetail.Controls("Text3").DataField = "SPName"
    secDetail.Controls("Text4").DataField = "BuyQuan"
    secDetail.Controls("Text5").DataField = "UnitTypeName"
    secDetail.Controls("Text6").DataField = "BuyPrice"
    secDetail.Controls("Text7").DataField = "BuyAmount"
    secDetail.Controls("Text8").DataField = "ProvideDate"
    secDetail.Controls("Text9").DataField = "ShipName"
    rptPurchase.ShowEnd Sub看看俺做的！！！
这样挺不错的试试看！！