データ検証の使用 (UltraSpreadsheet)

Me.UltraSpreadsheet1.EditModeValidationError += EditModeValidationError_Handler
Public Sub EditModeValidationError_Handler(sender As Object, _
            e As SpreadsheetEditModeValidationErrorEventArgs)
    Dim obj = Me.UltraSpreadsheet1.ActiveWorksheet.Rows(e.Cell.Row).Cells(e.Cell.Column).Value
    Dim number As Integer
    If Integer.TryParse(obj.ToString(), number) Then
        e.Action = SpreadsheetEditModeValidationErrorAction.AcceptChange
    Else
        e.Action = SpreadsheetEditModeValidationErrorAction.StayInEditMode
    End If
End Sub

this.UltraSpreadsheet1.EditModeValidationError += EditModeValidationError_Handler;
public void EditModeValidationError_Handler(
    object sender,
    SpreadsheetEditModeValidationErrorEventArgs e)
{
    var obj = this.UltraSpreadsheet1.ActiveWorksheet.Rows[e.Cell.Row].Cells[e.Cell.Column].Value;
    int number;
    if (int.TryParse(obj.ToString(), out number))
    {
        e.Action = SpreadsheetEditModeValidationErrorAction.AcceptChange;
    }
    else
    {
        e.Action = SpreadsheetEditModeValidationErrorAction.StayInEditMode;
    }
}

private void ultraButton1_Click(object sender, EventArgs e)
 {
   ultraSpreadsheet1.PerformAction(UltraSpreadsheetAction.CircleInvalidData);
 }

Private Sub ultraButton1_Click(sender As Object, e As EventArgs)
 ultraSpreadsheet1.PerformAction(UltraSpreadsheetAction.CircleInvalidData)
End Sub

private void ultraButton1_Click(object sender, EventArgs e)
 {
   ultraSpreadsheet1.PerformAction(UltraSpreadsheetAction.ClearValidationCircles);
 }

Private Sub ultraButton1_Click(sender As Object, e As EventArgs)
 ultraSpreadsheet1.PerformAction(UltraSpreadsheetAction.ClearValidationCircles)
End Sub