FarPoint.Win.SpreadJ アセンブリ > FarPoint.Win.Spread 名前空間 > FpSpread クラス : MoveActiveOnFocus プロパティ |
'Declaration Public Property MoveActiveOnFocus As Boolean
'使用法 Dim instance As FpSpread Dim value As Boolean instance.MoveActiveOnFocus = value value = instance.MoveActiveOnFocus
public bool MoveActiveOnFocus {get; set;}
FarPoint.Win.Spread.FpSpread fpSpread1 = new FarPoint.Win.Spread.FpSpread(); FarPoint.Win.Spread.SheetView shv = new FarPoint.Win.Spread.SheetView(); DialogResult dlg; fpSpread1.Location = new Point(10, 10); fpSpread1.Height = 200; fpSpread1.Width = 400; Controls.Add(fpSpread1); fpSpread1.Sheets.Add(shv); fpSpread1.ActiveSheet.SetActiveCell(3, 4); dlg = MessageBox.Show("Do you want the active cell to remain where it is??(Click back on the control when closing this dialog)", "MoveActiveOnFocus", MessageBoxButtons.YesNo); if (dlg == DialogResult.Yes) { fpSpread1.MoveActiveOnFocus = false; } else { fpSpread1.MoveActiveOnFocus = true; } }
Dim fpSpread1 As New FarPoint.Win.Spread.FpSpread() Dim shv As New FarPoint.Win.Spread.SheetView() Dim dlg As DialogResult fpSpread1.Location = New Point(10, 10) fpSpread1.Height = 200 fpSpread1.Width = 400 Controls.Add(fpSpread1) fpSpread1.Sheets.Add(shv) fpSpread1.ActiveSheet.SetActiveCell(3, 4) dlg = MessageBox.Show("Do you want the active cell to remain where it is??(Click back on the control when closing this dialog)", "MoveActiveOnFocus", MessageBoxButtons.YesNo) If dlg = DialogResult.Yes Then fpSpread1.MoveActiveOnFocus = False Else fpSpread1.MoveActiveOnFocus = True End If