Vb6 控制台：输入名称直到 Sub-Main（） Dim name1作为字符串 Dim NAME 2作为字符串 Console.WriteLine（“输入名称：”） name1=Console.ReadLine 而命名为“x” 名称2=名称1 Console.WriteLine（“输入名称：”） name1=Console.ReadLine 结束时 Console.WriteLine（名称2） Console.ReadLine（） 端接头

我只是一个基本的程序员，试图编写一个程序，允许用户输入一组名称，直到用户输入“x”。然而，我无法让程序在最后显示所有的名称，一旦用户输入“x”，我尝试了很多方法，但我仍然有非常基本的知识。

name2

不应该是一个

字符串，而应该是一个“字符串列表”。我将称之为
名称
，因为它更有意义：

Sub Main()
    Dim name1 As String
    Dim name2 As String

    Console.WriteLine("Enter name:")
    name1 = Console.ReadLine

    While name1 <> "x"

        name2 = name1

        Console.WriteLine("Enter name:")
        name1 = Console.ReadLine

    End While

    Console.WriteLine(name2)

    Console.ReadLine()

End Sub

然后在
name2=name1
行中，您应该将
name1
添加到
names
。使用
名称
列表的
添加
方法

最后，您必须迭代整个
名称
，以打印结果。对每个循环使用

我发现了一个很好的例子，展示了以下三个步骤：

我将此标记为VB6，但我有疑问。是VB6还是VB.NET？你知道吗？它是VB.NET，不是VB6。
Dim names As New List(Of String)