SQL: соединение с базой и запросы к ней

Imports MySql.Data.MySqlClient
Public Class frmMain
 
    Dim ServerString As String = "Server=localhost;User Id=тут_свой_логин;Password=тут_свой_пароль;DataBase=тут_своё_имя_базы"
    Dim SQLConnection As MySqlConnection = New MySqlConnection
 
    Private Sub btnOnline_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnUserOnline.Click
 
        Dim MyCommand As New MySqlCommand
        Dim MyAdapter As New MySqlDataAdapter
        Dim MyDataSet As New DataSet
        Dim MyDataTable As DataTable
 
        Try
            'запрос сколько юзеров online где 1-online, 0-offline
            SQLConnection.ConnectionString = ServerString
            MyCommand = SQLConnection.CreateCommand
            MyCommand.CommandText = "SELECT * FROM players WHERE online = '1'"
            MyAdapter.SelectCommand = MyCommand
            MyAdapter.Fill(MyDataSet, "players")
            MyDataTable = MyDataSet.Tables("players")
            MsgBox("Online - " & (MyDataTable.Rows.Count))
        Catch ex As Exception
            MsgBox(ex.Message)
        End Try
 
    End Sub
 
End Class

MyCommand.CommandText = "SELECT * FROM players WHERE race = 'elyos'"