| 投稿日 | ： 2006/11/28(Tue) 12:34 |
| 投稿者 | ： マユサマンサ |
| Ｅメール | ： |
| ＵＲＬ | ： |
| タイトル | ： Re^2: 可変フォームの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