Почему чекбокс выдает в ответ статус mixed?

Question

[shokw0w]

Нужно чтобы в чекбоксах выдавало статус checked/unchecked. Написал запрос, но в ответ выдает статус mixed. Мне кажется все дело в типе данных myabsent. То тогда как переконвертировать в integer?
For i = 0 To 2
absent = Array(Me.fdsf1, Me.fdsf2)
myabsent = " Select absent from dbo_attendance where ([studentid] = " & Me.att_studentlist.Column(0, i) & " AND [am_day] = " & Me.att_day & " AND [am_month] = " & Me.att_month & ");"
absent(i).Value = myabsent
Next

Comments

[shokw0w]

DS28: да,да еще про экстрасенсов напишите))) главное на зарубежном stackoverflow вопрос поняли на моем ломаном, объяснили различия и адрес личной почты дали в случае чего.
Прошу, не трате время на наши тупые вопросы, вы чересчур умный для этого.

[h8nor]

Добавьте ссылку на файл

[shokw0w]

Дѣаволъ: https://www.dropbox.com/s/jfr2l5e2g1pqoo1/Attendan...

Answer 1

[h8nor]

Нужно чтобы в чекбоксах выдавало статус checked/unchecked

В примере по ссылке свойство myabsent.Value имеет тип boolean.

То тогда как переконвертировать в integer?

Для изменения типа на long необходимо изменить параметр на myabsent.TripleState = True ' Тройное состояние. Решение задачи.

Comments

[shokw0w]

во всех чекбоксах выводится состояние mixed (закрашенный квадратик)

[h8nor]

shokw0w: Может Access на вашем ПК глючит, или это обычный CheckBox для вашей ОСи?

Вставьте строку MsgBox i & ": " & absent(i).Value после absent(i).Value = myabsent.
Если значение типа boolean, - не может быть mixed. Вариантов не много.

[shokw0w]

Дѣаволъ:
выдает такое вот

[shokw0w]

Сделал через DLookup

[h8nor]

shokw0w: Пардонтис. В вашем примере перед строкой стояло:

If myabsent <> 0 Then
  myabsent = True
Else
  myabsent = False
End If

После исполнения этого кода хотел увидеть значение absent(i).Value

Answer 2

[Артём Каретников]

Всё дело в настройке самого чекбокса. Надо зайти в свойства-Data и убрать Triple Status

Comments

[shokw0w]

Тройной статус убран. Не срабатывает