'宣言 Public Sub GroupMoveUp( _ ByVal group As OutlookBarGroup _ )
public void GroupMoveUp( OutlookBarGroup group )
using Infragistics.Windows.OutlookBar; private void ButtonDown_Click(object sender, RoutedEventArgs e) { OutlookBarGroup group = xamOutlookBar1.SelectedGroup; if (group == null) return; xamOutlookBar1.GroupMoveDown(group); } private void ButtonUp_Click(object sender, RoutedEventArgs e) { OutlookBarGroup group = xamOutlookBar1.SelectedGroup; if (group == null) return; xamOutlookBar1.GroupMoveUp(group); }
Imports Infragistics.Windows.OutlookBar Private Sub ButtonDown_Click(ByVal sender As Object, ByVal e As RoutedEventArgs) Dim group As OutlookBarGroup = xamOutlookBar1.SelectedGroup If group Is Nothing Then Return End If xamOutlookBar1.GroupMoveDown(group) End Sub Private Sub ButtonUp_Click(ByVal sender As Object, ByVal e As RoutedEventArgs) Dim group As OutlookBarGroup = xamOutlookBar1.SelectedGroup If group Is Nothing Then Return End If xamOutlookBar1.GroupMoveUp(group) End Sub