预览加载中,请您耐心等待几秒...
1/3
2/3
3/3

在线预览结束,喜欢就下载吧,查找使用更方便

如果您无法下载资料,请参考说明:

1、部分资料下载需要金币,请确保您的账户上有足够的金币

2、已购买过的文档,再次下载不重复扣费

3、资料包下载后请先用软件解压,在使用对应软件打开

实验目的熟悉.NET平台窗口和控件的基本编程方法掌握VB.NET与SQLService数据库的连接方法实验内容(实验题目+运行界面截图+实现代码)1、连接后显示的数据库university中student表的信息2、各表之间的转换1)form1代码(注:红色为输入的代码)PublicClassForm1PrivateSubStudentBindingNavigatorSaveItem_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesStudentBindingNavigatorSaveItem.ClickMe.Validate()Me.StudentBindingSource.EndEdit()Me.TableAdapterManager.UpdateAll(Me.UniversityDataSet)EndSubPrivateSubForm1_Load(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesMyBase.Load'TODO:这行代码将数据加载到表“UniversityDataSet.student”中。您可以根据需要移动或移除它。Me.StudentTableAdapter.Fill(Me.UniversityDataSet.student)EndSubPrivateSubForm2ToolStripMenuItem_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesForm2ToolStripMenuItem.ClickMe.Hide()Form2.Show()EndSubPrivateSubForm3ToolStripMenuItem_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesForm3ToolStripMenuItem.ClickMe.Hide()Form3.Show()EndSubEndClass2)form2代码PublicClassForm2PrivateSubForm1ToolStripMenuItem_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesForm1ToolStripMenuItem.ClickMe.Hide()Form1.Show()EndSubPrivateSubForm3ToolStripMenuItem_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesForm3ToolStripMenuItem.ClickMe.Hide()Form3.Show()EndSubEndClass3)form3代码PublicClassForm3PrivateSubForm1ToolStripMenuItem_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesForm1ToolStripMenuItem.ClickMe.Hide()Form1.Show()EndSubPrivateSubForm2ToolStripMenuItem_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesForm2ToolStripMenuItem.ClickMe.Hide()Form2.Show()EndSubEndClass