掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
AddNewによる登録 (ID：109465)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
テキストボックスがAccessと連結しているのでフィールド名を指定してません ちょっと変えまして 新規入力ボタンを押すとテキストボックスを空白にしてAddNewをセットしています Private Sub Command5_Click() For I = 0 To Controls.Count - 1 If Left(Controls(I).Name, 4) = "Text" Then Controls(I).Text = "" End If Next I Text1.SetFocus Buturyu.rs仕入先マスタ.AddNew End Sub 入力して登録ボタンでUpdateしているのですが Private Sub Command3_Click() Buturyu.rs仕入先マスタ.Update End Sub 先頭行が空白行に置き換わってしまいます（削除ではないようでした。すいません）が登録はできています。1回空白行ができると次回からはちゃんと登録できます
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.