PowerBuilder數據窗口實現單選與多選

　　實現多項選擇

　　IF KeyDown（KeyControl!） THEN //按住ctrl鍵選擇實現多選

　　IF THISGetSelectedRow（row ） = row THEN

　　THISSelectRow（rowFALSE）

　　ELSE

　　THISSelectRow（rowTRUE）

　　END IF

　　ELSEIF KeyDown（KeyShift!） THEN //按住shift鍵實現連選

　　Long ll_selectrowll_row

　　Integer i

　　ll_selectrow = THISGetSelectedRow（）

　　If ll_selectrow <= row Then

　　For i = ll_selectrow to row

　　THISSelectRow（iTRUE）

　　Next

　　Else

　　For i = row to ll_selectrow

　　THISSelectRow（iTRUE）

　　Next

　　End If

　　Else

　　THISSelectRow（FALSE）

　　Thisselectrow（rowtrue）

　　END IF

　　對選擇的數據進行操作

　　Integer li_Selectrow

　　li_Selectrow = dw_GetSelectedRow（）

　　DO WHILE li_Selectrow <>

　　//處理內容li_selectrow就是當前選擇的行

　　li_Selectrow = dw_GetSelectedRow（li_Selectrow）

　　LOOP

      編輯推薦

       ASP NET開發培訓視頻教程

       Microsoft NET框架程序設計視頻教程

From:http://tw.wingwit.com/Article/program/PB/201311/24585.html