DevExpress TabPages - 获取当前标签页
DevExpress TabPages - Getting Current Tab Page
我一直在网上寻找这个问题的答案,但我似乎无法弄清楚。我需要知道哪个标签页是当前选定的页面。但是DevExpress的文档一直让我很困惑,在visual basic中也没有相关的答案。
我知道我需要使用标签页更改事件,如下所示,但我不确定检查标签页 2 是否为当前 selected/open 页面的语法。任何帮助将不胜感激。
Private Sub XtraTabControl1_SelectedPageChanging(ByVal sender As System.Object, ByVal e As DevExpress.XtraTab.TabPageChangingEventArgs) Handles XtraTabControl1.SelectedPageChanging
'If Current tabpage = tabpage 2 Then
'Do something
'end if
End Sub
我相信 e.Page 应该会让您知道哪个页面调用了该事件。
您可以使用XtraTabControl.SelectedTabPage
属性获取当前标签页。
If xtraTabControl1.SelectedTabPage Is XtraTabPage2 Then
'Do something
End If
但是如果你想在XtraTabControl.SelectedPageChanging
事件中获取当前标签页那么你可以使用e.PrevPage
属性.
这是示例:
Private Sub XtraTabControl1_SelectedPageChanging(ByVal sender As System.Object, ByVal e As DevExpress.XtraTab.TabPageChangingEventArgs) Handles XtraTabControl1.SelectedPageChanging
If e.PrevPage Is XtraTabPage2 Then
'Do something
End If
End Sub
我最终不得不使用它,出于某种原因,建议只有在放置在 IF 语句中时才会出现错误 - 关于“=”符号不是 XtraTabControl1 的成员。但这有效:
If XtraTabControl1.SelectedTabPage.Equals(XtraTabPage2) Then
'Do something
MsgBox("Tabpage2")
End If
我一直在网上寻找这个问题的答案,但我似乎无法弄清楚。我需要知道哪个标签页是当前选定的页面。但是DevExpress的文档一直让我很困惑,在visual basic中也没有相关的答案。
我知道我需要使用标签页更改事件,如下所示,但我不确定检查标签页 2 是否为当前 selected/open 页面的语法。任何帮助将不胜感激。
Private Sub XtraTabControl1_SelectedPageChanging(ByVal sender As System.Object, ByVal e As DevExpress.XtraTab.TabPageChangingEventArgs) Handles XtraTabControl1.SelectedPageChanging
'If Current tabpage = tabpage 2 Then
'Do something
'end if
End Sub
我相信 e.Page 应该会让您知道哪个页面调用了该事件。
您可以使用XtraTabControl.SelectedTabPage
属性获取当前标签页。
If xtraTabControl1.SelectedTabPage Is XtraTabPage2 Then
'Do something
End If
但是如果你想在XtraTabControl.SelectedPageChanging
事件中获取当前标签页那么你可以使用e.PrevPage
属性.
这是示例:
Private Sub XtraTabControl1_SelectedPageChanging(ByVal sender As System.Object, ByVal e As DevExpress.XtraTab.TabPageChangingEventArgs) Handles XtraTabControl1.SelectedPageChanging
If e.PrevPage Is XtraTabPage2 Then
'Do something
End If
End Sub
我最终不得不使用它,出于某种原因,建议只有在放置在 IF 语句中时才会出现错误 - 关于“=”符号不是 XtraTabControl1 的成员。但这有效:
If XtraTabControl1.SelectedTabPage.Equals(XtraTabPage2) Then
'Do something
MsgBox("Tabpage2")
End If