VB.Net实现字符范围转连续字符串：简化条件分支的方案问询

你完全不需要写一大堆If-Else分支，利用字母的ASCII码连续性就能轻松解决这个问题，步骤如下：

1. 解析输入字符串：把用户输入的A-C这类格式拆分成起始字母和结束字母
2. 生成连续字母序列：通过ASCII码的循环，从起始字母的ASCII值遍历到结束字母的ASCII值，逐个转成字符并拼接
3. 批量生成文件：在循环过程中直接创建对应的文本文件

具体VB.NET代码实现 #

' 假设用户输入的字符串存在input变量中
Dim input As String = "A-C"
Dim rangeParts() As String = input.Split("-"c)

' 先做输入格式验证（避免非法输入导致出错）
If rangeParts.Length <> 2 OrElse rangeParts(0).Length <> 1 OrElse rangeParts(1).Length <> 1 Then
    Console.WriteLine("输入格式错误，请使用类似A-C的大写字母范围格式")
    Exit Sub
End If

Dim startLetter As Char = rangeParts(0)(0)
Dim endLetter As Char = rangeParts(1)(0)

' 验证输入是否为合法的大写字母范围
If Not Char.IsUpper(startLetter) OrElse Not Char.IsUpper(endLetter) OrElse startLetter > endLetter Then
    Console.WriteLine("请输入有效的大写字母范围，且起始字母不能大于结束字母")
    Exit Sub
End If

' 生成连续字母串并创建文件
Dim resultBuilder As New StringBuilder()
For asciiCode As Integer = Asc(startLetter) To Asc(endLetter)
    Dim currentLetter As Char = Chr(asciiCode)
    resultBuilder.Append(currentLetter)
    ' 创建对应文本文件，这里可以自定义文件内容
    IO.File.WriteAllText($"File{currentLetter}.txt", $"文件{currentLetter}的内容")
Next

' 最终得到的连续字母串
Dim stringC As String = resultBuilder.ToString()

方案优势 #

• 无需硬编码所有可能的字母范围，支持任意合法的大写字母范围（比如B-E、F-J这类非A开头的范围也能处理）
• 代码简洁易维护，后续如果需要支持小写字母，只需要修改验证逻辑和ASCII码范围即可
• 循环过程中同时完成字母串拼接和文件生成，效率更高

内容的提问来源于stack exchange，提问作者LARC