怎么在SQL查询语句中加入VB里的某控件或者某变量

如何在SQL查询语句中加入VB里的某控件或者某变量。
如：

VB.NET code

  a = 3   GridView1.DataSource = sdb.get_dataset("select top a name as 姓名 ,                                          max(case subject when '语文' then grade else 0 end) 语文,                                          max(case subject when '数学' then grade else 0 end) 数学,                                          max(case subject when '英语' then grade else 0 end) 英语                                           from grades group by name")   GridView1.DataBind()