vb version of cell by cell validation

[jaYPee]

i have downloaded the sample of cell by cell validation from this site
http://www.syncfusion.com/faq/winforms/search/773.asp but it is a c
sharp.

anyone have a vb version of this sample program?

[Jos]

jaYPee wrote:

i have downloaded the sample of cell by cell validation from this site
http://www.syncfusion.com/faq/winforms/search/773.asp but it is a c
sharp.

anyone have a vb version of this sample program?

The ASP.NET Resource Kit contains a C# to VB converter:
(Microsoft Visual C# to VB .NET Converter)
http://msdn.microsoft.com/asp.net/asprk/

It's a little bit overkill to download 130 MB for just a 949 kB
utility, but I haven't found it available anywhere else.

There's an online conversion utility at:
http://www.kamalpatel.net/ConvertCSharp2VB.aspx
I haven't tested it yet.

--

Jos

[Herfried K. Wagner [MVP]]

* jaYPee <hi******@yahoo.com> scripsit:

i have downloaded the sample of cell by cell validation from this site
http://www.syncfusion.com/faq/winforms/search/773.asp but it is a c
sharp.

C# -> VB.NET Converters:

<URL:http://www.aspalliance.com/aldotnet/examples/translate.aspx>
<URL:http://www.kamalpatel.net/ConvertCSharp2VB.aspx>
<URL:http://csharpconverter.claritycon.com/>
<URL:http://www.ragingsmurf.com/vbcsharpconverter.aspx>
<URL:http://www.gotdotnet.com/Community/UserSamples/Details.aspx?SampleGuid=c622348b-18a9-47d6-8687-979975d5957d>

<URL:http://www.remotesoft.com/>
-> "Octopus"

--
Herfried K. Wagner [MVP]
<URL:http://dotnet.mvps.org/>

[Ken Tucker [MVP]]

Hi,

http://www.onteorasoftware.com/downl...validation.zip

Ken
----------------
"jaYPee" <hi******@yahoo.com> wrote in message
news:o4********************************@4ax.com...

i have downloaded the sample of cell by cell validation from this site
http://www.syncfusion.com/faq/winforms/search/773.asp but it is a c
sharp.

anyone have a vb version of this sample program?

[jaYPee]

thanks for the code. however the problem is that when i navigate to
the new row and don't enter any data and click to the other row (in
your example from any of the row from 1st row to 3rd row) it returns
an error No value at index 3.

and how can i make sure that when they add new record in this datagrid
they have to enter 1st from the 1st cell then 2nd,3rd and so on..

thanks once again..

On Sun, 25 Apr 2004 19:08:46 -0400, "Ken Tucker [MVP]"
<vb***@bellsouth.net> wrote:

Hi,

http://www.onteorasoftware.com/downl...validation.zip

Ken
----------------
"jaYPee" <hi******@yahoo.com> wrote in message
news:o4********************************@4ax.com.. .

i have downloaded the sample of cell by cell validation from this site
http://www.syncfusion.com/faq/winforms/search/773.asp but it is a c
sharp.

anyone have a vb version of this sample program?

[Ken Tucker [MVP]]

Hi,

Change the DataGrid1_CurrentCellChanged procedure to this.

Private Sub DataGrid1_CurrentCellChanged(ByVal sender As Object, ByVal e
As System.EventArgs) Handles DataGrid1.CurrentCellChanged
newCurrentRow = DataGrid1.CurrentCell.RowNumber
newCurrentCol = DataGrid1.CurrentCell.ColumnNumber
Dim newText As String

Try
newText = DataGrid1(oldCurrentRow, oldCurrentCol).ToString()
If newCurrentRow <> oldCurrentRow Then
Dim x As Integer

For x = 0 To 2
Dim strTemp As String = DataGrid1(oldCurrentRow,
x).ToString
If strTemp = "" Then
DataGrid1.CurrentCell = New
DataGridCell(oldCurrentRow, x)
Return
End If
Next
End If
Catch
newText = ""
End Try

If okToValidate And Not IsValidValue(oldCurrentRow, oldCurrentCol,
newText) Then
MessageBox.Show("Entry Error")
okToValidate = False
DataGrid1.CurrentCell = New DataGridCell(oldCurrentRow,
oldCurrentCol)
okToValidate = True
Else

oldCurrentRow = newCurrentRow
oldCurrentCol = newCurrentCol
End If
End Sub

Ken
-------------------
"jaYPee" <hi******@yahoo.com> wrote in message
news:j6********************************@4ax.com...

thanks for the code. however the problem is that when i navigate to
the new row and don't enter any data and click to the other row (in
your example from any of the row from 1st row to 3rd row) it returns
an error No value at index 3.

and how can i make sure that when they add new record in this datagrid
they have to enter 1st from the 1st cell then 2nd,3rd and so on..

thanks once again..

On Sun, 25 Apr 2004 19:08:46 -0400, "Ken Tucker [MVP]"
<vb***@bellsouth.net> wrote:

Hi,

http://www.onteorasoftware.com/downl...validation.zip

Ken
----------------
"jaYPee" <hi******@yahoo.com> wrote in message
news:o4********************************@4ax.com. ..

i have downloaded the sample of cell by cell validation from this site
http://www.syncfusion.com/faq/winforms/search/773.asp but it is a c
sharp.

anyone have a vb version of this sample program?

[jaYPee]

Thank you thank you very much for you help.

one more question and i'm done. in my datagrid i have checkbox located
in column 6. how can i prevent the user to encode to this checkbox if
the column 1 to 5 is not yet encoded?

i really really appreciate your help.

thanks once again...

On Mon, 26 Apr 2004 07:35:53 -0400, "Ken Tucker [MVP]"
<vb***@bellsouth.net> wrote:

Hi,

Change the DataGrid1_CurrentCellChanged procedure to this.

Private Sub DataGrid1_CurrentCellChanged(ByVal sender As Object, ByVal e
As System.EventArgs) Handles DataGrid1.CurrentCellChanged
newCurrentRow = DataGrid1.CurrentCell.RowNumber
newCurrentCol = DataGrid1.CurrentCell.ColumnNumber
Dim newText As String

Try
newText = DataGrid1(oldCurrentRow, oldCurrentCol).ToString()
If newCurrentRow <> oldCurrentRow Then
Dim x As Integer

For x = 0 To 2
Dim strTemp As String = DataGrid1(oldCurrentRow,
x).ToString
If strTemp = "" Then
DataGrid1.CurrentCell = New
DataGridCell(oldCurrentRow, x)
Return
End If
Next
End If
Catch
newText = ""
End Try

If okToValidate And Not IsValidValue(oldCurrentRow, oldCurrentCol,
newText) Then
MessageBox.Show("Entry Error")
okToValidate = False
DataGrid1.CurrentCell = New DataGridCell(oldCurrentRow,
oldCurrentCol)
okToValidate = True
Else

oldCurrentRow = newCurrentRow
oldCurrentCol = newCurrentCol
End If
End Sub

Ken
-------------------
"jaYPee" <hi******@yahoo.com> wrote in message
news:j6********************************@4ax.com.. .

thanks for the code. however the problem is that when i navigate to
the new row and don't enter any data and click to the other row (in
your example from any of the row from 1st row to 3rd row) it returns
an error No value at index 3.

and how can i make sure that when they add new record in this datagrid
they have to enter 1st from the 1st cell then 2nd,3rd and so on..

thanks once again..

On Sun, 25 Apr 2004 19:08:46 -0400, "Ken Tucker [MVP]"
<vb***@bellsouth.net> wrote:

Hi,

http://www.onteorasoftware.com/downl...validation.zip

Ken
----------------
"jaYPee" <hi******@yahoo.com> wrote in message
news:o4********************************@4ax.com ...
i have downloaded the sample of cell by cell validation from this site
http://www.syncfusion.com/faq/winforms/search/773.asp but it is a c
sharp.

anyone have a vb version of this sample program?

[Ken Tucker [MVP]]

Hi,

Try something like this

Private Sub DataGrid1_CurrentCellChanged(ByVal sender As Object, ByVal e
As System.EventArgs) Handles DataGrid1.CurrentCellChanged
newCurrentRow = DataGrid1.CurrentCell.RowNumber
newCurrentCol = DataGrid1.CurrentCell.ColumnNumber
Dim newText As String

Try
newText = DataGrid1(oldCurrentRow, oldCurrentCol).ToString()
If newCurrentRow <> oldCurrentRow Then
Dim x As Integer

For x = 0 To 2
Dim strTemp As String = DataGrid1(oldCurrentRow,
x).ToString
If strTemp = "" Then
DataGrid1.CurrentCell = New
DataGridCell(oldCurrentRow, x)
Return
End If
Next
End If
Catch
newText = ""
End Try

If newCurrentCol = 2 Then
For x As Integer = 0 To 1
Dim strTemp As String = DataGrid1(newCurrentRow, x).ToString
If strTemp = "" Then
MessageBox.Show("Please enter this value here first")
DataGrid1.CurrentCell = New DataGridCell(newCurrentRow,
x)
Return
End If
Next
End If

If okToValidate And Not IsValidValue(oldCurrentRow, oldCurrentCol,
newText) Then
MessageBox.Show("Entry Error")
okToValidate = False
DataGrid1.CurrentCell = New DataGridCell(oldCurrentRow,
oldCurrentCol)
okToValidate = True
Else
oldCurrentRow = newCurrentRow
oldCurrentCol = newCurrentCol
End If
End Sub

Ken
----------------------------------
"jaYPee" <hi******@yahoo.com> wrote in message
news:40********************************@4ax.com...

Thank you thank you very much for you help.

one more question and i'm done. in my datagrid i have checkbox located
in column 6. how can i prevent the user to encode to this checkbox if
the column 1 to 5 is not yet encoded?

i really really appreciate your help.

thanks once again...

On Mon, 26 Apr 2004 07:35:53 -0400, "Ken Tucker [MVP]"
<vb***@bellsouth.net> wrote:

Hi,

Change the DataGrid1_CurrentCellChanged procedure to this.

Private Sub DataGrid1_CurrentCellChanged(ByVal sender As Object, ByVal
e
As System.EventArgs) Handles DataGrid1.CurrentCellChanged
newCurrentRow = DataGrid1.CurrentCell.RowNumber
newCurrentCol = DataGrid1.CurrentCell.ColumnNumber
Dim newText As String

Try
newText = DataGrid1(oldCurrentRow, oldCurrentCol).ToString()
If newCurrentRow <> oldCurrentRow Then
Dim x As Integer

For x = 0 To 2
Dim strTemp As String = DataGrid1(oldCurrentRow,
x).ToString
If strTemp = "" Then
DataGrid1.CurrentCell = New
DataGridCell(oldCurrentRow, x)
Return
End If
Next
End If
Catch
newText = ""
End Try

If okToValidate And Not IsValidValue(oldCurrentRow, oldCurrentCol,
newText) Then
MessageBox.Show("Entry Error")
okToValidate = False
DataGrid1.CurrentCell = New DataGridCell(oldCurrentRow,
oldCurrentCol)
okToValidate = True
Else

oldCurrentRow = newCurrentRow
oldCurrentCol = newCurrentCol
End If
End Sub

Ken
-------------------
"jaYPee" <hi******@yahoo.com> wrote in message
news:j6********************************@4ax.com. ..

thanks for the code. however the problem is that when i navigate to
the new row and don't enter any data and click to the other row (in
your example from any of the row from 1st row to 3rd row) it returns
an error No value at index 3.

and how can i make sure that when they add new record in this datagrid
they have to enter 1st from the 1st cell then 2nd,3rd and so on..

thanks once again..

On Sun, 25 Apr 2004 19:08:46 -0400, "Ken Tucker [MVP]"
<vb***@bellsouth.net> wrote:

Hi,

http://www.onteorasoftware.com/downl...validation.zip

Ken
----------------
"jaYPee" <hi******@yahoo.com> wrote in message
news:o4********************************@4ax.co m...
>i have downloaded the sample of cell by cell validation from this site
> http://www.syncfusion.com/faq/winforms/search/773.asp but it is a c
> sharp.
>
> anyone have a vb version of this sample program?

[jaYPee]

thank you thank you once again...

this is really what i need.

:)

jaYPee

On Mon, 26 Apr 2004 08:13:18 -0400, "Ken Tucker [MVP]"
<vb***@bellsouth.net> wrote:

Hi,

Try something like this

Private Sub DataGrid1_CurrentCellChanged(ByVal sender As Object, ByVal e
As System.EventArgs) Handles DataGrid1.CurrentCellChanged
newCurrentRow = DataGrid1.CurrentCell.RowNumber
newCurrentCol = DataGrid1.CurrentCell.ColumnNumber
Dim newText As String

Try
newText = DataGrid1(oldCurrentRow, oldCurrentCol).ToString()
If newCurrentRow <> oldCurrentRow Then
Dim x As Integer

For x = 0 To 2
Dim strTemp As String = DataGrid1(oldCurrentRow,
x).ToString
If strTemp = "" Then
DataGrid1.CurrentCell = New
DataGridCell(oldCurrentRow, x)
Return
End If
Next
End If
Catch
newText = ""
End Try

If newCurrentCol = 2 Then
For x As Integer = 0 To 1
Dim strTemp As String = DataGrid1(newCurrentRow, x).ToString
If strTemp = "" Then
MessageBox.Show("Please enter this value here first")
DataGrid1.CurrentCell = New DataGridCell(newCurrentRow,
x)
Return
End If
Next
End If

If okToValidate And Not IsValidValue(oldCurrentRow, oldCurrentCol,
newText) Then
MessageBox.Show("Entry Error")
okToValidate = False
DataGrid1.CurrentCell = New DataGridCell(oldCurrentRow,
oldCurrentCol)
okToValidate = True
Else
oldCurrentRow = newCurrentRow
oldCurrentCol = newCurrentCol
End If
End Sub

Ken
----------------------------------
"jaYPee" <hi******@yahoo.com> wrote in message
news:40********************************@4ax.com.. .

Thank you thank you very much for you help.

one more question and i'm done. in my datagrid i have checkbox located
in column 6. how can i prevent the user to encode to this checkbox if
the column 1 to 5 is not yet encoded?

i really really appreciate your help.

thanks once again...

On Mon, 26 Apr 2004 07:35:53 -0400, "Ken Tucker [MVP]"
<vb***@bellsouth.net> wrote:

Hi,

Change the DataGrid1_CurrentCellChanged procedure to this.

Private Sub DataGrid1_CurrentCellChanged(ByVal sender As Object, ByVal
e
As System.EventArgs) Handles DataGrid1.CurrentCellChanged
newCurrentRow = DataGrid1.CurrentCell.RowNumber
newCurrentCol = DataGrid1.CurrentCell.ColumnNumber
Dim newText As String

Try
newText = DataGrid1(oldCurrentRow, oldCurrentCol).ToString()
If newCurrentRow <> oldCurrentRow Then
Dim x As Integer

For x = 0 To 2
Dim strTemp As String = DataGrid1(oldCurrentRow,
x).ToString
If strTemp = "" Then
DataGrid1.CurrentCell = New
DataGridCell(oldCurrentRow, x)
Return
End If
Next
End If
Catch
newText = ""
End Try

If okToValidate And Not IsValidValue(oldCurrentRow, oldCurrentCol,
newText) Then
MessageBox.Show("Entry Error")
okToValidate = False
DataGrid1.CurrentCell = New DataGridCell(oldCurrentRow,
oldCurrentCol)
okToValidate = True
Else

oldCurrentRow = newCurrentRow
oldCurrentCol = newCurrentCol
End If
End Sub

Ken
-------------------
"jaYPee" <hi******@yahoo.com> wrote in message
news:j6********************************@4ax.com ...
thanks for the code. however the problem is that when i navigate to
the new row and don't enter any data and click to the other row (in
your example from any of the row from 1st row to 3rd row) it returns
an error No value at index 3.

and how can i make sure that when they add new record in this datagrid
they have to enter 1st from the 1st cell then 2nd,3rd and so on..

thanks once again..

On Sun, 25 Apr 2004 19:08:46 -0400, "Ken Tucker [MVP]"
<vb***@bellsouth.net> wrote:

>Hi,
>
>http://www.onteorasoftware.com/downl...validation.zip
>
>Ken
>----------------
>"jaYPee" <hi******@yahoo.com> wrote in message
>news:o4********************************@4ax.c om...
>>i have downloaded the sample of cell by cell validation from this site
>> http://www.syncfusion.com/faq/winforms/search/773.asp but it is a c
>> sharp.
>>
>> anyone have a vb version of this sample program?
>