Visual Basic

xbiplav wrote:

MaskedTextBox1.Text+="1"

phoopwint wrote:

please tell me detail message about this.Now I can't find more information about this error code.Please help me.

Private Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) _
Handles Button1.Click
    If RadioButton1.Checked = True Then
        DataGridView1.Sort(New RowComparer(SortOrder.Ascending))
    ElseIf RadioButton2.Checked = True Then
        DataGridView1.Sort(New RowComparer(SortOrder.Descending))
    End If
End Sub

Private Class RowComparer
    Implements System.Collections.IComparer

    Private sortOrderModifier As Integer = 1

    Public Sub New(ByVal sortOrder As SortOrder)
        If sortOrder = sortOrder.Descending Then
            sortOrderModifier = -1
        ElseIf sortOrder = sortOrder.Ascending Then

            sortOrderModifier = 1
        End If
    End Sub

    Public Function Compare(ByVal x As Object, ByVal y As Object) As Integer _
        Implements System.Collections.IComparer.Compare

        Dim DataGridViewRow1 As DataGridViewRow = CType(x, DataGridViewRow)
        Dim DataGridViewRow2 As DataGridViewRow = CType(y, DataGridViewRow)

        ' Try to sort based on the Last Name column.
        Dim CompareResult As Integer = System.String.Compare( _
            DataGridViewRow1.Cells(1).Value.ToString(), _
            DataGridViewRow2.Cells(1).Value.ToString())

        ' If the Last Names are equal, sort based on the First Name.
        If CompareResult = 0 Then
            CompareResult = System.String.Compare( _
                DataGridViewRow1.Cells(0).Value.ToString(), _
                DataGridViewRow2.Cells(0).Value.ToString())
        End If
        Return CompareResult * sortOrderModifier
    End Function
End Class

shaynoy wrote:

Thanks but I don't understand how it is related to my problem.

shaynoy wrote:

I understand but what I need is to know if I can sort 2 columns as I showed before. Is it possible?

Ahamed Azeem wrote:

"C:\Inv\Imp.txt"

Ahamed Azeem wrote:

While Not parser.EndOfData
For i = 0 To parser.EndOfData

XCOPY C:\Software\Zimbabwe\*.* C:\Program Files\Zimbabwe\*.* /Y

Dave Kreskowiak wrote:

XCOPY C:\Software\Zimbabwe\*.* C:\Program Files\Zimbabwe\*.* /Y

XCOPY C:\Software\Zimbabwe\*.* "C:\Program Files\Zimbabwe\*.*" /Y