Access VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

9440 / 9994

←次へ　｜　前へ→


	【3693】Re:購入実績を検索するACCESSを作りたい

クロ - 04/10/13(水) 16:56 -


	引用なし

	パスワード

変数にするほどでないので直接書きました。

If IsNull(Me.一覧オートNO) Then
　MsgBox "実績ありません", vbQuestion + vbOKOnly
　DoCmd.OpenForm "詳細用フォーム", , , , acFormAdd
　DoCmd.GoToRecord , , acNewRec
Else
　DoCmd.OpenForm "詳細用フォーム", , , "[オートNO]=" & Me.一覧オートNO
End If

※半角カナは全角カナに変更してあります。

注意点
名称に半角カナを使うのはやめましょう。後々面倒なことになります。
早めに改名した方がいいと思います。
参照URL
http://ww3.tiki.ne.jp/~kaya/Ac_tips.html#Tips0_001

1,414 hits

▼

【3690】購入実績を検索するACCESSを作りたい えなりん 04/10/13(水) 14:30