实现多项选择
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框架程序设计视频教程
