ButtonCellType コンストラクタ(String,ButtonType)

コマンドとボタンの種類を指定して、新しいコマンドボタン型セルを作成します。

構文

Visual Basic
C#

'Declaration
 
Public Function New( _
   ByVal cmd As String, _
   ByVal type As ButtonType _
)

public ButtonCellType( 
   string cmd,
   ButtonType type
)

パラメータ

cmd: ユーザーがボタンをクリックしたときに実行するコマンドの文字列
type: ボタンの種類

例

この例では、スプレッドシートを作成し、セルの最初の２列をコマンドボタン型セルに設定し、「MyRed」と「MyBlue」というCommandNamesのボタンを構築して、このコンストラクタの使い方を示します（ButtonCommandイベントで、CommandNamesを問い合わせ、CommandNameに応じてスプレッドシートの背景色を変更します）。

C#
Visual Basic

FarPoint.Web.Spread.ButtonCellType btn = new FarPoint.Web.Spread.ButtonCellType("MyRed", ButtonType.PushButton);
FarPoint.Web.Spread.ButtonCellType btn1 = new FarPoint.Web.Spread.ButtonCellType("MyBlue", ButtonType.PushButton);
FarPoint.Web.Spread.StyleInfo style = new FarPoint.Web.Spread.StyleInfo();
FarPoint.Web.Spread.StyleInfo style1 = new FarPoint.Web.Spread.StyleInfo();
FpSpread1.Sheets[0].ColumnCount = 7;
FpSpread1.Sheets[0].RowCount = 50;
style.CellType = btn;
style1.CellType = btn1;
FpSpread1.Sheets[0].SetStyleInfo(-1, 0, style);
FpSpread1.Sheets[0].SetStyleInfo(-1, 1, style1);

private void FpSpread1_ButtonCommand(object sender, FarPoint.Web.Spread.SpreadCommandEventArgs e)
{
    if (e.CommandName == "MyRed")
    {
        FpSpread1.Sheets[0].BackColor = Color.Red;
    }
    else if (e.CommandName == "MyBlue")
    {
        FpSpread1.Sheets[0].BackColor = Color.Blue;
    }
}

Dim btn As New FarPoint.Web.Spread.ButtonCellType("MyRed", ButtonType.PushButton)
Dim btn1 As New FarPoint.Web.Spread.ButtonCellType("MyBlue", ButtonType.PushButton)
Dim style As New FarPoint.Web.Spread.StyleInfo()
Dim style1 As New FarPoint.Web.Spread.StyleInfo()
FpSpread1.Sheets(0).ColumnCount = 7
FpSpread1.Sheets(0).RowCount = 50
style.CellType = btn
style1.CellType = btn1
FpSpread1.Sheets(0).SetStyleInfo(-1, 0, style)
FpSpread1.Sheets(0).SetStyleInfo(-1, 1, style1)

Private Sub FpSpread1_ButtonCommand(ByVal sender As Object, ByVal e As FarPoint.Web.Spread.SpreadCommandEventArgs) Handles FpSpread1.ButtonCommand
    If e.CommandName = "MyRed" Then
        FpSpread1.Sheets(0).BackColor = Color.Red
    Else If e.CommandName="MyBlue" Then
        FpSpread1.Sheets(0).BackColor = Color.Blue
    End If
End Sub

参照

ButtonCellType クラス
 ButtonCellType メンバ
 オーバーロード一覧
 CommandName プロパティ
 ButtonType プロパティ