Я не очень хорошо разбираюсь в vb.net, но столкнулся с проблемой. Мне нужно преобразовать строку в двоичную (то, что я сделал), но после этого мне нужно зашифровать строку, объединив ее с другой строкой, также преобразованной в двоичную.
Проблема: я просматриваю этот результат с помощью строки y(), но результат имеет размерность больше 32 бит, и я получаю сообщение об ошибке: {"Индекс был за пределами массива."}
как я могу это решить? Спасибо
Dim preluare As String = TextBox5.Text ' the binary text i have to encrypt
Dim inter() As Char = preluare.ToCharArray
Dim b As Integer = TextBox5.Text.Count
Dim x As String = TextBox15.Text ' the key of encryption
Dim y() As Char = x.ToCharArray
Dim bb As Integer = TextBox15.Text.Count
' ключ должен быть той же длины, что и исходный текст
If b > x.Count Then
While x.Count < b
x = x + x
End While
End If
If x.Count > b Then
Dim w As Integer = x.Count
x = x.Trim().Substring(w - b)
End If
' операция xor
For i As Integer = 0 To b - 1
If inter(i) = "0" Then
'MsgBox(i)
If y(i) = "0" Then ' THIS IS WHERE I GET THE ERROR
TextBox10.Text = TextBox10.Text + "0"
Else
TextBox10.Text = TextBox10.Text + "1"
End If
Else
If inter(i) = "1" Then
If y(i) = "0" Then
TextBox10.Text = TextBox10.Text + "1"
Else
TextBox10.Text = TextBox10.Text + "0"
End If
End If
End If
Next
