hiroton
2023/04/28 (金) 08:59:10
72ebf@f966d
まぁそうですね。より正確には「x = x + 1
」は「xに1を加えた値でxを上書きする」となります
では、
x = 1
x = 2
x = 3
x = 4
x = 5
Debug.Print x
と、
x = x + 1
x = x + 2
x = x + 3
x = x + 4
x = x + 5
Debug.Print x
ではどうなるでしょうか?
質問のコードを見直してみましょう
For i = 1 To 5
Forms![F_test2]![txtテキスト_1] = Me.Controls("txt子テキスト_" & i) & vbNewLine
Next i
これは、実際にコードが実行される場合
(txtテキスト_1) = "C001" & vbNewLine
(txtテキスト_1) = "C002" & vbNewLine
(txtテキスト_1) = "C003" & vbNewLine
(txtテキスト_1) = "C004" & vbNewLine
(txtテキスト_1) = "C005" & vbNewLine
が実行されることになります。これでは一番最後の「"C005" & vbNewLine
で上書きする」が最終結果として残るのみです
「追記(元の値を残した上でさらに書き込む)」には、「(元の値)
と(転記する値) & vbNewLine
を連結して上書きする」ようにする必要があります
通報 ...