回答編集履歴
1
追記
test
CHANGED
@@ -3,6 +3,8 @@
|
|
3
3
|
```vba
|
4
4
|
|
5
5
|
Private Sub CommandButton1_Click()
|
6
|
+
|
7
|
+
TextBox1.MultiLine = True
|
6
8
|
|
7
9
|
TextBox1.Value = ""
|
8
10
|
|
@@ -21,3 +23,11 @@
|
|
21
23
|
End Sub
|
22
24
|
|
23
25
|
```
|
26
|
+
|
27
|
+
|
28
|
+
|
29
|
+
---
|
30
|
+
|
31
|
+
|
32
|
+
|
33
|
+
TextBox1.MultiLine = Trueを追記してください。
|