Dim gridSelection As Selection = Me.WebDataGrid1.Behaviors.CreateBehavior(Of Selection)() gridSelection.CellClickAction = CellClickAction.Row gridSelection.RowSelectType = SelectType.Multiple ' 以下のコードは上記のコードと等価です ' 同じ名前のプロパティを使用して動作への参照を取得します Dim selectionBehavior As Selection = Me.WebDataGrid1.Behaviors.Selection ' 動作が存在するかをチェックします If selectionBehavior Is Nothing Then ' 動作を作成します Dim selection As New Selection() ' プロパティを設定する前にまず動作コレクションに追加します Me.WebDataGrid1.Behaviors.Add(selection) ' オプションを設定します selection.CellClickAction = CellClickAction.Row selection.RowSelectType = SelectType.Multiple End If