タイトル | : SSTabの表示の切り替えについて |
記事No | : 12138 |
投稿日 | : 2008/04/28(Mon) 13:41 |
投稿者 | : tea |
ユーザーコントロール上にSSTab(SSTabStats、Tab2つ)を配置して 、Tab1の上にMSFlexGrid(grdStats)を置き、Tab2には何も配置してい ません。 Tab1はAチーム、Tab2はBチーム用で、各チームの内容をTab1に配置し たMSFlexGridをTabの切り替えでTab2にもTab1同様のMSFlexGridとそ の結果を表示できるようにするにはどうしたら良いのでしょうか? Aチームを0、Bチームは1です。 どうか教えてください。 よろしくお願いします。
下記は現段階のコードです。
Private Sub SStabStats_Click(PreviousTab As Integer)
On Error GoTo ErrHandle 'grdStatsコントロールの表示。 grdStats.Left = 120 '印刷ボタンの表示' cmdStatsPrint.Left = 8280 'MSFlexGrid(grdStats)の表示。 PanelStats_ShowContents Exit Sub ErrHandle: CommanErrMsg Exit Sub End Sub
Private Function PanelStats_ShowContents() Dim ixTeam As Integer
ixTeam = SStabStats.Tab End Function
|