类型：转载 责任编辑：asp.net 日期：2007/05/23
热门软件下载：
public class AddRemoveListBox : WebControl, INamingContainer {
ListBox target;
public event System.EventHandler SelectedIndexChanged;
protected override void CreateChildControls()
{
target.AutoPostBack = true;
// Wire up events
//
target.SelectedIndexChanged += new EventHandler(Target_SelectedIndexChanged);
}
private void Target_SelectedIndexChanged(Object sender, EventArgs e) {
if (null != SelectedIndexChanged)
SelectedIndexChanged(sender, e);
}
}
我转转成VB，主要问题出在 if (null != SelectedIndexChanged)上，
Public Event SelectedIndexChanged As System.EventHandler
Private Sub Target_SelectedIndexChanged(ByVal sender As Object, ByVal e As EventArgs)
If Not SelectedIndexChanged Is Nothing Then ‘//这里出错，提示事件不能直接调用，不知道相应的在VB里应该是怎么调用的
RaiseEvent SelectedIndexChanged(sender, e)
End If
End Sub
网友回答：
Private Sub Target_SelectedIndexChanged(ByVal sender As Object, ByVal e As EventArgs) Handles Target.SelectedIndexChanged
If Not SelectedIndexChanged Is Nothing Then ‘//这里出错，提示事件不能直接调用，不知道相应的在VB里应该是怎么调用的
RaiseEvent SelectedIndexChanged(sender, e)
End If
End Sub
AddRemoveListBox.SelectedIndexChanged is nothing