現在VB6.0にて開発をしています。

可変フォームの大きさの増減をMSHFlexGridの横幅に反映させる画面を開発していますが、
MSHFlexGridの横スクロールバーが消えてしまいます。
MSHFlexGridの大きさの増減に合わせてスクロールバーの再表示は行えるのでしょうか？

開発手順）
�@　MSHFlexGridを使用しているフォームを「可変」にする
�A　MSHFlexGridの横にスクロールバーを表示するようにする。
�B　フォームのresizeで、フォームの大きさ増減をMSHFlexGridの横(Width)
   の大きさに反映

GUIの動作）
�@　フォームを表示（→初期表示は縦横スクロールバーが表示された状態）
�A　フォームの横を延ばす（→MSHFlexGridも横に伸びるが、スクロールバーが消える）

　＃初期表示モード（スクロールバーが表示される）
　　セルA セルB ‖セルC　セルD
                ↑これ以降はスクロールバーを動かさないと表示されない

　#フォームを横に伸ばす（セルC表示まで伸ばす）
　　セルA セルB｜セルC ‖　セルD
    ☆MSHFlexGridの横スクロールバーが消えてしまう。　          　　    　  

>     ☆MSHFlexGridの横スクロールバーが消えてしまう。　          　　    　  

スクロールする画面がないからでは、でなければ、再現できる最低限のコードを
作って投稿して見て下さい。こちらでもテストしてみます。
又、その状態の画面を画像投稿用の掲示板に投稿して下さい。

> スクロールする画面がないからでは、でなければ、再現できる最低限のコードを
> 作って投稿して見て下さい。こちらでもテストしてみます。
> 又、その状態の画面を画像投稿用の掲示板に投稿して下さい。


再現できる最低限のコードを作ってみましたが、再現できませんでした。
以下の様にコードを作成しましたが、フォームの幅を変更してもスクロールバーは表示されます。

※　再現可能なサンプルが出来たら再度投稿します。
　　どうもありがとうございました。
フォーム名：From1
MSHFlexGrid名：MSHFlexGrid1

Private Sub Form_Load()
  Form1.Height = 1890
  Form1.Width = 3405
  Form1.BorderStyle = 2
  MSHFlexGrid1.Width = 2535
  MSHFlexGrid1.Height = 750
  MSHFlexGrid1.Cols = 15
End Sub

Private Sub Form_Resize()
  If (Form1.Width < 2535) Then
    Form1.Width = 2535
  Else
     MSHFlexGrid1.Width = 2535 + (Form1.Width - 2535)
  End If
  'Form1.Height = 1890
End Sub