我需要将值传递给 form1 的文本框,所以我需要首先检查 form1 是否为空。
如果为空,则值转到form1,如果不是,则值将转到 form2
我已经尝试了几个代码。它不起作用。
当 form1 中的文本框不为空时,该值未转到 form2
主窗体
Dim OpenForm1 As New Form2
Dim OpenForm2 As New Form4
If String.IsNullOrEmpty(OpenForm1.tbOrderReceived1.Text) Then
OpenForm1.PassOrderKitchen1 = rbTable1.Text + ":" + cbSpagethi.Text + "-" + tbSpagehti.Text
ElseIf (OpenForm1.tbOrderReceived1.Text > 0) Then
OpenForm2.PassOrderKitchen2 = rbTable1.Text + ":" + cbSpagethi.Text + "-" + tbSpagehti.Text
End If
我认为您只需要对已经编码的内容进行少量更改。 删除 ElseIf 并改用 Else:
Dim OpenForm1 As New Form2
Dim OpenForm2 As New Form4
If String.IsNullOrEmpty(OpenForm1.tbOrderReceived1.Text) Then
OpenForm1.PassOrderKitchen1 = rbTable1.Text + ":" + cbSpagethi.Text + "-" + tbSpagehti.Text
Else
OpenForm2.PassOrderKitchen2 = rbTable1.Text + ":" + cbSpagethi.Text + "-" + tbSpagehti.Text
End If