VB数据库开发-案例数据库服务器应用界面VB应用程序SQLServer数据库访问接口VB数据库访问控件数据库应用系统结构主要内容案例-一个教务管理系统的开发附录:数据库连接控件数据显示控件案例—教务管理系统的开发实例目标首先创建一个名为“教务”的数据库,然后使用Vb程序浏览和访问数据库
技术要点静态查询和SQL语言的使用;使用ToolBar和ImageList控件制作工具栏
实现步骤创建数据库创建主窗体添加工具栏按钮控件:ToolBar和ImageList控件添加数据库连接控件添加数据显示控件编写代码建立教务数据库创建登陆模块PrivateSubCommand1_Click()Ad1
RecordSource="team":Ad1
RefreshAd1
Recordset
MoveFirstAd1
Recordset
find"姓名='"+Text1
Text+"'"IfAd1
Recordset
EOFThenx=MsgBox("没有该用户,重新输入吗
",vbYesNo,"错误
")Ifx=vbYesThenExitSubElseEndEndIfIfAd1
Recordset
Fields(1)=Text2
TextThenUnloadForm1:Form2
Show:ExitSubx=MsgBox("密码错误,重新输入吗
",vbYesNo,"错误
")Ifx=vbYesThenExitSubElseEndEndSub创建主窗体首先添加ToolBar和ImageList控件到工具箱;步骤:1
工程/部件选“MicrosoftWindowsCommonControl6
ToolBar控件包含用来创建工具栏的按钮对象集合;ToolBar可以拥有文本和相关联的ImageList提供的图像;3