VSFlexGrid¸´Ñ¡¶àÐУ¬ÈçºÎɾ³ý·Ç¸´Ñ¡µÄÐÐFor i = 0 to fg.SelectedRows – 1
Debug.Print "Row "; fg.SelectedRow(i); " is selected"
Next
ÎÒÏëÌáʾµ½Õâ¶ùÓ¦¸Ã¿ÉÒÔÁ˰ɡ£ ²¹³äÏ£¬Â¥ÉϵĴúÂëÖ»ÔÚSelectionMode = flexSelectionListBoxµÄÇé¿öϹ¤×÷¡£ ÆäËûµÄmode£¬²érow ºÍ rowsel VB code: With VSFlexGrid1 For i = .Rows - 1 To 0 Step -1 If .IsSelected(i) = False Then .RemoveItem (i) End If Next End With
»¹ÊÇлл¸÷λÁË ÎÊÌâ×òÌìÒѾ×Ô¼º½â¾ö
For i = 0 to fg.SelectedRows – 1
Debug.Print "Row "; fg.SelectedRow(i); " is selected"
Private Sub Form_Load() recs = Adodc1.Recordset.RecordCount 'Çóµ±Ç°¼Ç¼Êý If recs > 0 Then 'ÒÑÓп¼Éú Adodc1.Recordset.MoveLast 'ÒÆµ½×îºóÒ»Ìõ¼Ç¼ num = V ......