请教大神，vbnet sql多条件查询并显示的问题，谢过！！！

Button1为查询按钮，我用以下代码为了实现多条件查询，并将查询结果显示在datagridview中，提示 “Parameters不是string成员” ，请教该怎么解决？谢谢！！！

Imports System.Data.SqlClient
 
Public Sub FilterAndDisplayData(ByVal connectionString As String, ByVal query As String)
    Using connection As New SqlConnection(connectionString)
        Dim adapter As New SqlDataAdapter(query, connection)
        Dim table As New DataTable()
        connection.Open()
        adapter.Fill(table)
        connection.Close()
        DataGridView1.DataSource = table
    End Using
End Sub

 Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim connectionString As String = "Data Source=XTZJ-20230713LX\COSBYVAL;Initial Catalog=SJBG;Integrated Security=True"

        Dim Value_AA, Value_AB, Value_B, Value_C, Value_D, Value_E, Value_F As String
        If Me.ComboBox1.Text <> "" Then
            Value_AA = Me.ComboBox1.Text
        Else
            Value_AA = "*"
        End If
        If Me.ComboBox3.Text <> "" Then
            Value_AB = Me.ComboBox3.Text
        Else
            Value_AB = "*"
        End If
        If Me.TextBox1.Text <> "" Then
            Value_B = Me.TextBox1.Text
        Else
            Value_B = "*"
        End If
        If Me.ComboBox16.Text <> "" Then
            Value_C = Me.ComboBox16.Text
        Else
            Value_C = "*"
        End If
        If Me.ComboBox4.Text <> "" Then
            Value_D = Me.ComboBox4.Text
        Else
            Value_D = "*"
        End If
        If Me.ComboBox8.Text <> "" Then
            Value_E = Me.ComboBox8.Text
        Else
            Value_E = "*"
        End If
        If Me.TextBox20.Text <> "" Then
            Value_F = Me.TextBox20.Text
        Else
            Value_F = "*"
        End If

Dim query As String = "SELECT * FROM KJS" & Strings.Left(Me.ComboBox2.Text, 4) & " WHERE zsaxm = @value1 AND zsbxm = @value2 AND bsdwmc = @value2 AND ywlx = @value2 AND zs = @value2 AND bgwh = @value2 AND bz = @value2"

        Dim parameters As SqlParameter() = {
            New SqlParameter("@value1", SqlDbType.VarChar, 100) With {.Value = Value_AA},
            New SqlParameter("@value2", SqlDbType.VarChar, 100) With {.Value = Value_AB},
            New SqlParameter("@value3", SqlDbType.VarChar, 100) With {.Value = Value_B},
            New SqlParameter("@value4", SqlDbType.VarChar, 100) With {.Value = Value_C},
            New SqlParameter("@value5", SqlDbType.VarChar, 100) With {.Value = Value_D},
            New SqlParameter("@value6", SqlDbType.VarChar, 100) With {.Value = Value_E},
            New SqlParameter("@value7", SqlDbType.VarChar, 100) With {.Value = Value_F}
        }

        For Each parameter In parameters
            Command.Parameters.Add(parameter)
        Next

        FilterAndDisplayData(connectionString, query)
    End Sub