数据库联接问题

我现在用VB写一段C/S结构的程序.我把程序写到模块中,但是如何在程序中读取数据库中的东西了?联接代码如下:

public con as new connect....

Sub main()
    Dim str As String
    connact=server.CreateObject("adodb.connection")
   connact.ConnectionString = "provider=sqloledb.1;data source=huacai12.;initial catalog=test;user id=sa;password=sa；database=数据库名"
    '这是SQL的连接方式

    Con.Open
    frmLogin.Show
End Sub

我现在要用一个文本框实现查询数据库功能.是用一个什么样的语句来执行这个功能.