我正在制作一个程序,生成sql Server代码,以便在我的VB.NET程序中使用它.
我有第一个包含连接的表单,如下图所示:
连接工作100%,但在第二种形式我有两个DataGridViews,一个用于表,一个用于字段.
所以当我点击任何DataGridView1 =>表时DataGridView2显示它的字段:
当我单击DataGridView1从Form1获取ComboBox的值以在Form2中使用它时,我有以下错误:
Failed to connect to server.
码:
Dim frm As New Form2 prd.ServerConnection = New ServerConnection(frm.ComboServer.Text) ' here the error prd.DGVField(MetroGridTables,MetroGridField)
我使用Form1进行连接,使用Form2进行操作.
将值从一个表单传递到另一个表单的最简单方法是在要将值传递给的表单上实现New方法:
Form1中:
Public Class Form1 Private Sub btnPass_Click(sender As Object,e As EventArgs) Handles btnPass.Click Dim form As New Form2(TextBox1.Text) form.Show() End Sub End Class
窗体2:
Public Class Form2 Public Sub New(ByVal value As String) ' This call is required by the designer. InitializeComponent() Label1.Text = value End Sub End Class
截图: