有人可以帮忙吗?
我是一个绝对的初学者。但是我在网上搜了一下。在 VB 中显示的例子并不多。
我创建了一个包含 win 表单的测试项目。然后添加了另一个包含实体模型的项目,在构建模型后,我将这个引用添加到了 Win 表单项目。之后,我将模型对象添加为数据源。
我将数据源控件拖到表单中并添加了以下代码。
Private context As TestModelEntities
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
context = New TestModelEntities
Dim query = context.employees
EmployeeBindingSource.DataSource = query.ToList
End Sub
Private Sub DepartmentBindingNavigatorSaveItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles EmployeeBindingNavigatorSaveItem.Click
Try
context.SaveChanges()
MessageBox.Show("Changes saved to the database.")
Me.Refresh()
Catch ex As Exception
MessageBox.Show(ex.Message)
End Try
End Sub
我整天都在挠头。不知道我做错了什么。