| |
こんにちは。
フォ-ムにリストボックスと、チェックボックスたちと、ボタンをつくりました。
tableの14番目の値をリストボックスに表示させ、
操作者の任意でチェックボックスにチェックをいれます。
と、ここまではできました。
いま、
チェック4という名前のチェックボックスがtureだっら
当該レコードの右から15番目のフィールドに"1"をたてる。
チェック5という名前のチェックボックスがtureだっら
当該レコードの右から16番目のフィールドに"1"をたてる。
そして次のレコードを表示する、、、、、、ということをしていきたいです。
Private Sub コマンド39_Click()
On Error GoTo Err_コマンド39_Click
'ここに
'「チェック4という名前のチェックボックスがtureだっら
'当該レコードの右から15番目のフィールドに"1"をたてる。
'
'チェック5という名前のチェックボックスがtureだっら
'当該レコードの右から16番目のフィールドに"1"をたてる。」というロジックが要るのはわかるのですが、
'これではうごきません。
If チェック4 = True Then Field15 = 1
If チェック5 = True Then Field16 = 1
DoCmd.GoToRecord , , acNext
Exit_コマンド39_Click:
Exit Sub
Err_コマンド39_Click:
MsgBox Err.Description
Resume Exit_コマンド39_Click
End Sub
どうすればいいでしょうか。
おばかですみません。
|
|
![[未読]](./data/access/image/read_icon.gif){kind=icon}
