Private Sub RadioButton45_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RadioButton45.CheckedChanged
        If RadioButton45.Checked = True Then
            x7 = InputBox(" أدخل العنوان المراد تعديله")
            Dim s As String = InputBox("أدخل العنوان الجديد")
            b = Not x7
            b = s
        End If
        For ix As Integer = 0 To DataGridView1.Rows.Count - 2
            If DataGridView1.Rows(ix).Cells(0).Value.ToString.Contains(x7).ToString Then
                DataGridView1.Rows(ix).Cells(0).Value = b
            End If
        Next

    End Sub