1: Private Sub FLXGrid_SlipDetail_SelChange() 2: ' ユーザーが別のセルを選択したとき 3: ' そのセルをカレント行に合わせる 4: g_objRec.MoveFirst 5: g_objRec.Find "ID=" & _ FLXGrid_SlipDetail.RowData(FLXGrid_SlipDetail.row),_ 0, adSearchForward 6: End Sub