翻譯|行業(yè)資訊|編輯:胡濤|2023-08-16 11:10:40.693|閱讀 132 次
概述:本指南說明如何將 TeeChart ActiveX 控件添加到 MS Access 表單并使用表中的數(shù)據(jù)填充它,歡迎查閱~
# 界面/圖表報(bào)表/文檔/IDE等千款熱門軟控件火熱銷售中 >>
TeeChart Pro ActiveX 圖表組件庫提供數(shù)百種2D和3D圖形樣式,54種運(yùn)算和統(tǒng)計(jì)函數(shù)以及無限數(shù)量的坐標(biāo)軸和14工具箱供你選擇。該圖表控件還可以有效地用于創(chuàng)建多任務(wù)的儀表板。
加入官方社群740060302,歡迎相互交流
本指南說明如何將 TeeChart ActiveX 控件添加到 MS Access 表單并使用表中的數(shù)據(jù)填充它。
我們的示例數(shù)據(jù)表如下所示:
我們?cè)?Access 空間的表單部分創(chuàng)建一個(gè)新表單并將其設(shè)置為設(shè)計(jì)。然后我們從表單設(shè)計(jì)面板中打開 ActiveX 控件選擇器:
在此示例中,有許多 TeeChart 控件可供選擇。我們將選擇 v2023 控件,在此示例中,我們還將選擇 TeeCommander Bar。
將圖表和 Commander 添加到表單中,并為表單添加按鈕并為其添加標(biāo)題。我們將把基本表中的數(shù)據(jù)加載到按鈕中的圖表中。不一定要使用按鈕,數(shù)據(jù)可以在表單加載中加載,但這里我們將通過按鈕進(jìn)行提示。
圖表編輯器
我們?cè)趫D表上單擊鼠標(biāo)右鍵打開圖表編輯器以添加系列并從主題選擇器中選擇圖表主題。
添加代碼
右鍵單擊表單上的按鈕并選擇“構(gòu)建事件”。這將我們帶到 VBA 代碼編輯器并創(chuàng)建一個(gè)按鈕單擊方法。這里我們添加圖表填充代碼:
我們?yōu)榘粹o添加的代碼是這樣的:
Private Sub Command2_Click() TChart1.Series(0).Clear strsql = "Select * From BasicTable" Set rs = CurrentDb.OpenRecordset(strsql) If Not (rs.EOF And rs.BOF) Then rs.MoveFirst 'Unnecessary in this case, but still a good habit Do Until rs.EOF = True 'vars are xvalue,yvalue,label and colour. 'Auto colour is clTeeColor = 536870912 as referenced here: '//github.com/Steema/TeeChart-ActiveX- 'Samples/blob/master/Visual%20C%2B%2B/TeeChartDefines.h TChart1.Series(0).AddXY rs!XValue, rs!YValue, "", 536870912 rs.MoveNext Loop Else MsgBox "There are no records in the recordset." End If rs.Close Set rs = Nothing End Sub
您會(huì)注意到,我們還在表單加載中添加了一條代碼行,以將 TeeCommander 欄連接到圖表。IE:
Private Sub Form_Load( TeeCommander0.ChartLink = TChart1.ChartLink End Sub
表單上生成的圖表如下所示:
請(qǐng)注意 AddXY 方法的參數(shù)。我們沒有添加標(biāo)簽,而是讓圖表根據(jù)主題選擇的調(diào)色板來決定顏色。如果我們選擇添加記錄的標(biāo)簽,請(qǐng)像這樣修改代碼行:
TChart1.Series(0).AddXY rs!XValue, rs!YValue, rs!Labels, 5368709
那么圖表將如下所示:
以上便是此次更新的主要內(nèi)容,歡迎下載最新版試用新版功能,如有其他問題,歡迎咨詢我們喲~
如果您有任何問題需了解詳情,請(qǐng)聯(lián)系
想要了解TeeChart for .NET 報(bào)價(jià)信息的朋友,歡迎咨詢。
本站文章除注明轉(zhuǎn)載外,均為本站原創(chuàng)或翻譯。歡迎任何形式的轉(zhuǎn)載,但請(qǐng)務(wù)必注明出處、不得修改原文相關(guān)鏈接,如果存在內(nèi)容上的異議請(qǐng)郵件反饋至chenjj@fc6vip.cn