Posted on: 5/7/2012 4:22:26 PM | Views : 280

I've create a function that search the datas fom a txtbox,however don't know how to check the input type of txtBox
vInput = txtRecherche.Text NbCol = dt.Columns.Count NbRow = dt.Rows.Count For iVar As Integer = 0 To NbCol - 1 Dim type As String = dt.Columns(iVar).DataType.Name If IsNumeric(vInput) Then 'here I want to check on vInput if is Integer ' Try Dim a As Integer = Integer.Parse(vInput) SearchExpression &= dt.Columns(iVar).ColumnName & " = " & vInput & " or " Catch ex As Exception MsgBox(ex.Message) End Try Else 'checking on vInput if is decimal ' End If


...

Go to the complete details ...