Question

VS8中的VB似乎不支持/转换带有语句体的lambda表达式。我在我的C＃应用程序中使用它们，但现在必须将其转换为VB。

我正在动态创建一大堆控件，我希望能够动态地为它们提供事件处理程序。这样我就可以从数据库构建动态用户界面。在下面的代码中，我将创建一个表单和一个复选框，使复选框控制表单的可见性，向表单添加一些方法处理程序，然后将新创建的复选框添加到预先存在的表单/面板/等。例如，表单的处理程序会影响复选框：

  // Inside some loop creating a lot of these forms and matching checkboxes
      Form frmTemp = frmTestPanels[i];  // New form in array
      CheckBox chkSelectPanel;          // New checkbox that selects this panel
      chkSelectPanel = new CheckBox();
      chkSelectPanel.Text = SomeName;   // Give checkbox a label
      chkSelectPanel.Click += (ss, ee) =>  // When clicked
      {
          label1.Text = SomeName;       // Update a label
          if (chkSelectPanel.Checked)   // Show or hide the form
          {
              frmTemp.Show();
          }
          else
          {
              frmTemp.Hide();
          }
      };

      frmTemp.VisibleChanged += (ss, ee) =>  // When form visibility changes
      {
          chkSelectPanel.Checked = frmTemp.Visible;  // Reflect change to checkbox
          ConfigurationFileChanged = true;   // Update config file later
      };

      frmTemp.FormClosing += (ss, ee) =>     // When the form closes
      {   // We're only pretending to close the form - it'll sit around until needed
          chkSelectPanel.Checked = false;    // Update the checkbox
          frmTemp.Hide();                    // Hide the form
          ee.Cancel = true;                  // Cancel the close
      };

      flpSelectGroup.Controls.Add(chkSelectPanel); // Add checkbox to flow layout panel
  // End of loop creating a bunch of these matching forms/checkboxes

当然，我收到转换错误，“VB不支持带语句体的匿名方法/ lambda表达式”

我真的很喜欢动态创建所有内容的能力，然后让对象自己处理 - 我不需要添加任何特殊的函数来确定哪个表单提供了close事件，因此它可以搜索正确的复选框并更新复选框 - It Just Works（TM）。

不幸的是，它需要转换为VB。

将lambda / anonymous语句体转换为可在VB中工作的东西的最佳方法是什么，尤其是当需要创建其中许多时？

- 亚当

Answer 1

等待最近发布的.NET 4，它将在VB中支持这样的事情。别看其他选择。

丑陋的替代方案是：

这项工作，但您可以在函数中使用单个语句。

AddHandler Me.Click, Function(o, e) MessageBox.Show("text")

创建一些常规的Sub Foo

Public Sub Foo(ByVal o As Object, ByVal e As EventArgs)
     MessageBox.Show("text")
End Sub

并使用AddHandler将其绑定到事件

AddHandler Me.Click, AddressOf Foo

Answer 2

您是否可以创建一个接受构造函数中Form的新类，并将chkSelectPanel作为字段，允许您将实例方法用作事件处理程序？

将C＃语句体lambda转换为VB

2 个答案: