Question

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

谢谢

Answer 1

以最简单的方式，您可以将代码添加到复选框的事件处理程序中。我假设您的第二个被定义为Form2，并且您希望在名为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 Property中创建Form2 ..

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

然后你可以编写其他代码来对该值执行操作，而不是使用控件中的值

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

1 个答案: