在c#中需要以下VB逻辑[关闭]答案

【问题标题】：Need the following VB logic in c# [closed]在c#中需要以下VB逻辑[关闭]
【发布时间】：2012-11-21 07:02:33
【问题描述】：

我需要c#中的以下逻辑：

Dim sampleText As String, Key As String;
Dim KeyLength As Long,  Position As Long;
Dim character as integer;

For Position = 1 To Len(sampleText)
        character = Asc(Mid$(Key, (Position Mod KeyLength) - KeyLength * ((Position Mod KeyLength) = 0), 1))
        Mid$(sampleText, Position, 1) = Chr(Asc(Mid$(sampleText, Position, 1)) Xor character)
    Next Position

【问题讨论】：

我面临的主要问题是以下行： character = Asc(Mid$(Key, (Position Mod KeyLength) - KeyLength * ((Position Mod KeyLength) = 0), 1))我对末尾的“=0”有疑问。
那是极弱的 XOR 加密。您可以查看 .Net 库中的一些更强大的加密。
以下表达式如何计算出一个值：abc= (position % keylength) - keylength*(position % keylength)==0)

标签： c# vb.net logic

【解决方案1】：

你去吧：

character = Strings.Asc(Strings.Mid(Key, (Position % KeyLength) - KeyLength * ((Position % KeyLength) == 0), 1));
Strings.Mid(sampleText, Position, 1) = Strings.Chr(Strings.Asc(Strings.Mid(sampleText, Position, 1)) ^ character);

【讨论】：

+1 只需导入 Microsoft.VisualBasic。任务完成！

【解决方案2】：

VB 中的 'Mid' 语句没有直接等价物（与 'Mid' 函数不同）：

string sampleText = null;
string Key = null;
long KeyLength = 0;
long Position = 0;
int character = 0;

for (Position = 1; Position <= sampleText.Length; Position++)
{
    character = Convert.ToInt32(Key[(Position % KeyLength) - KeyLength * ((Position % KeyLength) == 0) - 1]);
    SimulateMidStatement.MidStatement(sampleText, Position, (char)(Convert.ToInt32(sampleText[Position - 1]) ^ character), 1);
}

//----------------------------------------------------------------------------------------
//  Copyright © 2003 - 2012 Tangible Software Solutions Inc.
//  This class can be used by anyone provided that the copyright notice remains intact.
//
//  This class simulates the behavior of the classic VB 'Mid' statement.
//  (Note that this is unrelated to the VB 'Mid' function).
//----------------------------------------------------------------------------------------
public static class SimulateMidStatement
{
    public static void MidStatement(ref string target, int oneBasedStart, char insert)
    {
        if (target == null)
            return;

        target = target.Remove(oneBasedStart - 1, 1).Insert(oneBasedStart - 1, insert.ToString());
    }
    public static void MidStatement(ref string target, int oneBasedStart, string insert)
    {
        if (target == null || insert == null)
            return;

        target = target.PadRight(target.Length + insert.Length).Remove(oneBasedStart - 1, insert.Length).Insert(oneBasedStart - 1, insert).Substring(0, target.Length);
    }
    public static void MidStatement(ref string target, int oneBasedStart, string insert, int length)
    {
        if (target == null || insert == null)
            return;

        int minLength = System.Math.Min(insert.Length, length);
        target = target.PadRight(target.Length + insert.Length).Remove(oneBasedStart - 1, minLength).Insert(oneBasedStart - 1, insert.Substring(0, minLength)).Substring(0, target.Length);
    }
}

【讨论】：

天哪！那是很多代码！如果需要 Mid，只需导入 Microsoft.VisualBasic 并编写 String.Mid。任务完成！它是 .Net 框架中完全受支持的部分。
如果你选择了你需要的 3 的重载，那么它还不错，但你是对的 - 你可以导入 Microsoft.VisualBasic。