First create solution

2017-03-08 11:21:27 +01:00
commit a2fb86bacf
5508 changed files with 1082238 additions and 0 deletions
@@ -0,0 +1,22 @@
+Public Class SpreadSimpleUserControl
+    Private _SpreadInfo As String
+    Public Sub New()
+        InitializeComponent()
+    End Sub
+    Property SpreadInfo As String
+        Get
+            Return _SpreadInfo
+        End Get
+        Set(value As String)
+            _SpreadInfo = value
+        End Set
+    End Property
+
+    Private Sub SpreadsheetControl1_CellEndEdit(sender As Object, e As DevExpress.XtraSpreadsheet.SpreadsheetCellValidatingEventArgs) Handles SpreadsheetControl1.CellEndEdit
+        If SpreadInfo <> "1" Then
+            SpreadInfo = "1"
+        Else
+            SpreadInfo = "0"
+        End If
+    End Sub
+End Class