Access VBA質問箱 IV

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

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


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

7042 / 9994

←次へ　｜　前へ→


	【6149】Re:レコードNo.を取得する方法

小僧 - 05/9/2(金) 15:25 -


	引用なし

	パスワード

▼きこさん：
こんにちは。

>「AbsolutePosition」プロパティってどこにあるのですか？

どこに…と言われると難しいんですが…。VBA で使う事ができます。

>フォーム上でレコードNo.が取得できればいいのですが・・・。

まずフォーム上に「txtレコード」という名前でテキストボックスを配置してみて下さい。

次にフォームのプロパティを開いて

[イベント] タブの　[レコード移動時] を選択して右側の「...」をクリック。

コードビルダを選択すると VBA を記述する画面が出てきまので、

Private Sub Form_Current()
　　Me.txtレコード = Me.Recordset.AbsolutePosition + 1
End Sub

と記述して画面を閉じます。(記述はコピー&ペーストで大丈夫です。)

フォームのレコードが変わるたびに「txtレコード」の値が変わると思うのですが
いかがでしょうか？

外していたらすみません。

266 hits

▼

【6145】レコードNo.を取得する方法 きこ 05/9/2(金) 14:39