Microsoft Access 掲示板

フォーム内容の転記について / 3

14 コメント
views
4 フォロー
3
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を連結して上書きする」ようにする必要があります

通報 ...