VB与sql server2008连接方法.docxVIP

一、在sql server2008中建立数据库和表如图1所示：图1二、配置ODBC数据源1、单击开始按钮，单击控制面板，在打开的窗口中右上角的查看方式选择大图标，双击管理工具，如图2所示。图22、打开如图3所示的窗口。双击数据源（ODBC）图标，打开ODBC数据源管理器对话框，如图4所示。图33、打开如图4所示的窗口。单击系统DSN选项卡，单击添加按钮，添加系统数据源。图44、在如图5所示的窗口中，通过右边的滑块，选择SQL Server数据源，单击完成。图55、建立一个数据源名为data，服务器：输入本机ip（10.2.6.60）。单击下一步按钮。如图6所示：图66、在打开的如图7所示的窗口中单击下一步按钮。图77、在如图8所示的窗口中，更改默认数据库为在图1中创建的数据库名 -- gl。单击下一步按钮。图88、在如图9所示的窗口中，单击完成按钮。图99、在如图10所示的窗口中，单击测试数据源按钮。图1010、如果显示如图11所示的“测试成功！”，表示数据源建立成功了。单击确定按钮，关闭图10的窗口。单击确定按钮，关闭图9的窗口。单击确定按钮，关闭图8的窗口。图11二、制作Visual Basic程序这里将结合配置好的数据源，制作Visual Basic连接SQL SERVER2008的例子。在本例中，需要在窗体中添加ADO Data 控件，以及相关的 Visual Basic 控件，并对控件属性进行配置。制作好的VB程序，界面如图12所示。图12在图12中，出现的控件有：A处为ADO远程数据控件，作用是：可以连接到数据源；B处为label控件，作用是：为标签，对显示的信息进行解释；C处为text控件，显示sql server2008中字段的值。制作步骤如下：1、如图13所示，单击开始按钮，单击所有程序，单击Microsoft Visual Basic6.0，打开VB程序。图132、打开Visual Basic，创建一个标准工程（standard exe）。如图14所示。图143、ADO Data 控件不是VB的标准控件，在使用时必须添加到工具箱中。如图15所示，在VB程序左边工具箱空白处，单击鼠标右键，选择部件命令。图154、在图16所示的部件对话框中，选择Microsoft ADO Data Control6.0（SP6），单击应用，最后单击确定。图165、在窗体中绘制ADODC控件对象：单击ADODC控件，如图17中A处所示，在窗体中拖动鼠标，绘制大小合适的矩形区域，松开鼠标，则在B处绘制了一个ADODC1对象。然后在右边属性窗口中，将标题属性（caption）改为：姓名VB程序。如C处所示。本例中为古丽VB程序。图17将ADODC1与数据源连接到一起，还需要设置ConnectionString属性的值。如表1所示。ADO Data控件属性设置：属性属性值ConnectionStringDSN=dsCommandType8-adCmdUnknownRecordSourceSELECT * FROM Department 表1（1）设置ConnectionString属性如图18所示，在属性窗口中，单击ConnectionString属性右边的方块，打开属性页窗口，选择使用ODBC数据资源名称，在下拉列表中选择在一、配置ODBC数据源中配置的数据源data，单击应用按钮。图18在图19单击应用按钮后，会显示身份验证、记录源、颜色、字体四个选项夹。单击记录源选项夹，在命令文本中输入查询命令：select * from gl22department 。单击应用按钮。最后单击确定按钮。图19（2）设置CommandType和RecordSource属性在属性窗口中找到相关属性，设置成如表1的值即可。6、在窗口中绘制label控件对象：如图20所示。在工具箱中，单击label控件，如A处所示，在窗体中拖动鼠标，绘制大小合适的矩形区域，松开鼠标，则在B处绘制了一个label对象。然后在右边属性窗口中，将标题属性（caption）改为：院系名称：。如C处所示。图20同样的步骤绘制好程序所需的四个label控件，如图21所示。图217、在窗体上绘制文本框（text）控件对象：如图22所示。在工具箱中，单击text控件，如A处所示，在窗体中拖动鼠标，绘制大小合适的矩形区域，松开鼠标，则在B处绘制了一个text对象。然后在右边属性窗口中，修改三个属性：（1）将text属性值删除，如C处所示；（2）单击DataSource属性，在右边单击下拉列表，选择值为ADODC1，如D处所示；（2）单击DataField属性，在右边单击下拉列表，选择学院名称对应的字段名：DEPARTMENT。如E处所示。图22同样的步骤绘制好程序所需的四个