你是不是想把数据帮定到文本筐里面去?
如果是的话 我有一些这样的代码:
     Dim ds2 As DataSet  //定义一个数据集
     Dim sql As String = "你的sql语句"
     ds0 = createdatads(sql, "临时表表名")  //把数据填充到你的临时表
    Label1.Text = ds.Tables("临时表表名").Rows(具体数据所在临时表的列)(具体数据所在临时表的列)  //把临时表里面的具体值填充到label控件的text属性值里面去