将文本框值发送到另一种形式的标签

Question

我有4个表单：input，form1，form2，form3

输入有3个输入：a，b，c
form1 label1需要form1.a
form2 label1需要form1.b
form3 label1需要form1.c

在我点击输入中的一个按钮后，form1显示并在几次第二次更改为表单2，这也发生在form2中，它更改为form3，而form3更改为form1。它循环变化的beetwen形式

我尝试使用此代码发送值

Form1.label1.Text = a.Text
Form2.label1.Text = b.Text
Form3.label1.Text = c.Text

我尝试使用此代码创建循环beetwen表单
在form1

form2.show()
me.close  

in form2

form3.show()
me.close  

in form3

form1.show()
me.close  

问题是价值有时会丢失，形式不再像我想要的那样循环了 请帮忙

Answer 1

将Private MyInput As String = ""定义为您的班级名称。

将此sub添加到所有表单

    Public Sub ContinueInit(ByVal input as string)
    Me.MyInput = input
    Me.Label1.Text = input
    End Sub

然后，在Button Clicks中添加这取决于您要调用的表单：

form1.show()
form1.ContinueInit(a.text)
me.close

form2.show()
form2.ContinueInit(b.text)
me.close

form3.show()
form3.ContinueInit(c.text)
me.close  

我希望这有助于您解决问题。有一种更简单的方法，但这是我正在做的事情，因为我习惯了这种方法。