sql-server - 使用 SQL Server 2008 自动生成 VB.NET 表单

Question

我想使用 SQL Server 数据库中的表(一个表单/数据库表)自动生成 VB.NET 表单。为它编写自定义代码也许是可能的，但如果已经有一些功能可以完成这项工作，那就太好了(数据库有 40 多个表，手动执行这是一项乏味的任务)。

非常感谢任何答案、帮助、链接和提示。

问候，阿尤布

Answer 1

修复只需一分钟，所有功能都已存在于 Visual Studio 中。

启动 Visual Studio，单击添加新数据源... 以启动数据源配置向导:

选择数据库并按照向导操作:

连接到数据库后，选择您感兴趣的表并按芬兰语按钮:

现在，这将在您的解决方案中创建一个强命名的数据集，如果您双击 xsd 文件，您将在模式编辑器中看到您选择的表，但暂时保留它:

现在，从数据菜单中选择“显示数据源”，您将看到您在向导中选择的所有表。在每个字段的左侧都有一个图标，指示该字段在生成的表单上将由什么类型的控件表示:

现在您可以决定数据在表单上的显示方式，作为数据 GridView 或详细信息模式，只需使用表名上的下拉列表(仅在表单设计模式下)。

如果您在表格上选择了详细信息模式，那么您可以更改该字段将由什么控件表示(必须在表单设计模式下，而不是代码模式下):

然后只需将表从数据源 View 拖到一个空表单，它就会神奇地创建控件来编辑/添加/删除和移动数据。

如果选择了 DataGridView 模式，这是结果:

如果在表格中选择了详细信息:

在其背后的代码中，还神奇地添加了一些代码以在加载表单时将数据加载到适配器，以及一些保存/验证代码:

Private Sub AccountBindingNavigatorSaveItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles AccountBindingNavigatorSaveItem.Click
    Me.Validate()
    Me.AccountBindingSource.EndEdit()
    Me.AccountTableAdapter.Update(Me.MyDBDataSet.Account)

End Sub

Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
    'TODO: This line of code loads data into the 'MyDBDataSet.Account' table. You can move, or remove it, as needed.
    Me.AccountTableAdapter.Fill(Me.MyDBDataSet.Account)

End Sub