Question

我是一个爱好者，试图掌握一些简单的编程和放大器。聊天机器人学习，感谢帮助！

我正在尝试对列表框执行计数，从而在开头存在某个文本。

即。以下可能是列表框中的文本

你：嗨，你好吗？ ChatBot：嗨，我很好，谢谢你，你好吗？你：我猜对了。
ChatBot：你为什么好吗？你：我就是。

*请注意“You：”和“ChatBot：”都是包含在列表框中的文本。

有没有办法可以在列表框中执行计数（存储在变量中），这样每次读取“ChatBot：”这个词时我都会得到一个计数？

谢谢！

Answer 1

如果我理解正确，这将有效：

Dim chtb As Integer = 0
    For Each i As String In ListBox1.Items
        If i.StartsWith("ChatBot:") Then
            chtb += 1
        End If
    Next

chtb是ChatBot回复的次数

Answer 2

您可以使用以下内容：

Dim i As Integer = (From item As String In ListBox1.Items Where item.StartsWith("ChatBot:")).Count

在VB中计算列表框中的特定文本项

2 个答案: