VB6.0用掲示板の過去のログ(No.1)−VBレスキュー(花ちゃん)
[記事リスト]
[新規投稿]
[新着記事]
[ワード検索]
[過去ログ]
[管理用]
| 投稿日 | ： 2004/06/23(Wed) 11:22 |
| 投稿者 | ： Rs |
| Ｅメール | ： |
| ＵＲＬ | ： |
| タイトル | ： MSFlexGridでの複雑なソート |
いつもお世話になっております。
現在MSFlexGridを使用して売上表を作っているのですが、ソートで
わからない点が発生しましてアドバイス頂ければと思っております。
コードで見てもらった方がわかりやすいと思いますので載せます。
'MSFlexGrid の初期設定
With MSFlexGrid1
.Rows = 2 '行の総数（固定行含む）
.Cols = 7 '列の総数（固定列含む）
.FixedRows = 1 '固定行の数
.FixedCols = 1 '固定列の数
.Row = 0
.ColWidth(0) = 500
.ColWidth(1) = 3310
.ColWidth(2) = 1385
.ColWidth(3) = 3310
.ColWidth(4) = 1385
.ColWidth(5) = 3310
.ColWidth(6) = 1385
.RowHeight(0) = 350 '行の高さ
.Col = 1: .Text = "Ａ社"
.CellAlignment = flexAlignCenterCenter
.Col = 2: .Text = "売上金額"
.CellAlignment = flexAlignCenterCenter
.Col = 3: .Text = "Ｂ社"
.CellAlignment = flexAlignCenterCenter
.Col = 4: .Text = "売上金額"
.CellAlignment = flexAlignCenterCenter
.Col = 5: .Text = "Ｃ社"
.CellAlignment = flexAlignCenterCenter
.Col = 6: .Text = "売上金額"
.CellAlignment = flexAlignCenterCenter
.Col = 0
For lngCountI = 1 To .Rows - 1
.RowHeight(lngCountI) = 350 '行の高さ
.Row = lngCountI
Next lngCountI
End with
1,3,5列目には商品名、2,4,6には売上金額が表示されている状況です。
1つのMSFlexGridで3社の料金を表示している為、通常のソートを
使用すると指定した一社の「商品名」と「金額」はソートされますが
他の2社の順番がめちゃくちゃにソートされてしまいます。
そこで1,2列目のみでソート、3,4列目のみでソートと列を指定して
ソートすることは可能でしょうか？他にもなにかいい方法がありましたら
ご指導頂きたいのですが、宜しくお願いします。
- 関連一覧ツリー
（★ をクリックするとツリー全体を一括表示します）
- 返信フォーム
（この記事に返信する場合は下記フォームから投稿して下さい）