在窗体中标记复选框并以另一种形式查看结果

Question

我有2个窗体（Form1和Form2）。在Form1中，我有一个复选框，如果我标记它，在Form2中我想显示我的计算。可能吗？

谢谢

Answer 1

用最简单的方法，您可以添加代码到复选框的事件处理程序。我假设你的第二个对于被定义为窗口2并要结果显示在一个标签控件调用Label1

这个代码添加到Form1

Private Function MyCalculation() As Single 
    Dim x As Single = 50.4 
    Dim y As Single = 40.5 
    Return x + y 
End Function 

Private Sub CheckBox1_CheckedChanged(sender As Object, e As EventArgs) Handles CheckBox1.CheckedChanged 
    If CheckBox1.Checked Then 
     Form2.Label1.Text = MyCalculation.ToString 
    End If 
End Sub 

如果你想要做通数据形式而不是仅仅控制 - 如果你想处理数据（这不是一个好主意，直​​接处理存储在文本框和标签中的信息），你可以很容易地创建一个Public PropertyForm2 ..

Public Property ResultValue As Single 

并从Form1传递信息，以同样的方式如上，你可以做到这一点

Private Sub CheckBox1_CheckedChanged(sender As Object, e As EventArgs) Handles CheckBox1.CheckedChanged 
    If CheckBox1.Checked Then 
     Form2.ResultValue = MyCalculation() 
    End If 
End Sub 

然后，你可以写其他的代码，以该值进行操作，而不是浪费时间在控制使用值