//以下陳述句是創建一個動態資料視窗
//動態資料視窗dw_1創建實體
string lserr,lsSQLstr,lsDWsyntax,lserrC
//下面3條陳述句即為關鍵，若dw_1為滑鼠點建請洗掉這3條陳述句，否則會出錯。
DataWindow dw_1 //若采用資料視窗用戶物件u_d_sample，則可改為：u_d_sample dw_1
dw_1=Create DataWindow //若采用資料視窗用戶物件u_d_sample，此句應去除。
OpenUserObject(dw_1)
//Select…As…的As可將列標題顯示為As之后的字符，較為靈活方便。
//可根據實際情況設計生成Select陳述句及Where子句的可視化界面
lsSQLstr="Select 姓名,產品名稱,單價,包數,金額,日期,備注 from cp order by 姓名,日期 asc"
st_2.text="Select * from cp sum(金額)"
lsDwsyntax=SQLCA.SyntaxFromSQL(lsSQLstr,"style(type=Grid)",lserr) //構造SyntaxFromSQL()函式
If Len(lserr)>0 Then
//如果構造SyntaxFromSQL()函式失敗，則顯示錯誤資訊并退出
messagebox("錯誤資訊!",lserr)
Return
end if
dw_1.Create(lsDwsyntax,lserrC) //創建動態資料視窗dw_1
If Len(lserrC)>0 Then
//如果創建動態資料視窗dw_1失敗，則顯示錯誤資訊并退出
messagebox("錯誤資訊!",lserrC)
Return
end if
//以下設定dw_1的一些屬性，可根據實際需要設定。
//dw_1.X=5
//dw_1.Y=5
//dw_1.width=5000
//dw_1.height=1200
//dw_1.Visible=True
//dw_1.Enabled=True
//dw_1.HScrollBar=True
//dw_1.VScrollBar=True
//為dw_1分配事務物件SQLCA
dw_1.SetTransObject(SQLCA)
//提取資料
dw_1.Retrieve()
uj5u.com熱心網友回復：
得用語法生成吧uj5u.com熱心網友回復：
找個有計算列的DW,生成其語法,然后對應的照著改就行了.uj5u.com熱心網友回復：
為什么搞這么麻煩。你可以根據你的陳述句條件預先畫一個資料視窗啊，帶上你要的金額合計。uj5u.com熱心網友回復：
大哥，我不要PB內置的那種，我要用陳述句那種，該怎么表達uj5u.com熱心網友回復：
好像沒那么簡單,呵呵.轉載請註明出處，本文鏈接：https://www.uj5u.com/shujuku/110668.html
標籤：數據庫相關
上一篇：如何將SQLSERVER資料庫中存放的圖片資料匯出至EXCEL表格中
下一篇：DB2洗掉存盤程序問題