我不知道如何连接SQL SERVER?

潮流兴使用ADO进行连接，就用它吧，只要把ConnectionString设置好就OK！
例：
dim adoCn as New ADODB.Connection
adoCn.ConnectionString = "Provider=SQLOLEDB.1;Persist Security Info=False;Use ID=sa;Data Source=计算机名称;"