-2

我尝试使用以下代码将字符串划分为相等的艺术，每一个 2 个字母，但它没有用：

  Dim twoLetterWords = "The quick fox jumped over the lazy dog".
       Select(Function(c, i) New With {.Char = c, .Index = i}).
       GroupBy(Function(x) CInt(Math.Floor(x.Index / 2))).
       Select(Function(g) String.Join("", g.Select(Function(x) x.Char)))

我还尝试了以下方法：

       Dim n As Integer

    Dim sasa(69) As String

    For i As Integer = 0 To sasa.Length - 1
        sasa(i) = "das"

    Next

    For i As Integer = 0 To RichTextBox1.TextLength - 2 Step 2
        For x As Integer = 0 To sasa.Length - 1
            n = i + 2
            sasa(x) = RichTextBox1.Text.Substring(i, 2)


            For z As Integer = 1 To 3
                RichTextBox2.Text = RichTextBox2.Text
            Next z
       Next x
    Next i

但这也是徒劳的。那么，我误会了什么？或者还有其他方法可以做我想做的事情吗？

4

1 回答 1

1

在回答您关于为什么不应该开发自己的“加密”例程的评论时，简短的回答是：

密码学是困难的，是科学和艺术的平等部分。拥有计算机科学和数学学位、专攻密码学的人提出了糟糕的解决方案，他们有理论背景可以更好地了解。这应该是足够的谨慎和警告。

你甚至没有那个；你一无所知，而且无论你做什么最终都会变得可怕，这种可能性是压倒性的。那里已经有足够多可怕的加密代码了。

很抱歉直言不讳，但这就是现实。

有关更多信息，请查看http://www.schneier.com/blog/archives/2011/04/schneiers_law.html。

于 2013-02-01T21:27:51.207 回答