Ready to get started with anonymous questions today? It's easy! Learn more.
Public Class Form1 Dim TeamNames() As String Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load 'Loads the SBWinners file TeamNames = IO.File.ReadAllLines("SBWinners.txt") End Sub Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click 'Displays the Teams ListBox1.Items.Clear() Dim TeamQuery1 = From TeamNames In TeamNames Where TeamNames.StartsWith("B") Select TeamNames For Each TeamNames As String In TeamQuery1 ListBox1.Items.Add(TeamNames) Next ListBox1.Items.Add("") End Sub End Class
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
Join the community of 500,000 technology professionals and ask your questions.