回答編集履歴
1
コード追記
test
CHANGED
|
@@ -14,7 +14,7 @@
|
|
|
14
14
|
|
|
15
15
|
Private Sub Form_Load()
|
|
16
16
|
|
|
17
|
-
|
|
17
|
+
'フォームを10行分の高さに設定
|
|
18
18
|
|
|
19
19
|
Me.InsideHeight = Me.フォームフッター.Height + Me.詳細.Height * 10
|
|
20
20
|
|