2nd list box not writing to text box

Can you please help me?

I'm trying to provide default points for activities for students on a form,
and modify the points field in a form.

I have a form with 2 list boxes on them.
The first list box, lboFirstName,
correctly displays the student's Last Name in the tboLastName text box
field,
using the Row Source property to run a query to pull the first name & last
name from the tblStudents table,
setting the Column Count = 2,
Column Widths = '1";0"',
Bound Column = 1
and using an AfterUpdate function call.

The second list box, lboActivity,
correctly displays the student activities from the tblActivity table,
BUT does not display the default Grade (points) in the tboPoints text box
field.
Here's the code:
Field Name: lboActivity
Control Source: Using Expression Builder = [tblActivity]![Activity
Description]
Row Source Type: Table/Query
Row Source: SELECT tblActivity.[Activity Description], tblActivity.[Activity
Points] FROM tblActivity ORDER BY tblActivity.[Activity Nbr];
Column Count: 2
Column Widths: '1";0"'
Bound Column: 1

The tboPoints Text Box Field shows "#Name?" in the form view as an error.

Please tell me what I'm doing wrong.
Thank you,
mrzin

Hi,
try this for the Control Source of tblPoints
= Me.lboActivity.Column(1)

Jeanette Cunningham

"thezinman" wrote in message
...
Can you please help me?

I'm trying to provide default points for activities for students on a
form,
and modify the points field in a form.

I have a form with 2 list boxes on them.
The first list box, lboFirstName,
correctly displays the student's Last Name in the tboLastName text box
field,
using the Row Source property to run a query to pull the first name & last
name from the tblStudents table,
setting the Column Count = 2,
Column Widths = '1";0"',
Bound Column = 1
and using an AfterUpdate function call.

The second list box, lboActivity,
correctly displays the student activities from the tblActivity table,
BUT does not display the default Grade (points) in the tboPoints text box
field.
Here's the code:
Field Name: lboActivity
Control Source: Using Expression Builder = [tblActivity]![Activity
Description]
Row Source Type: Table/Query
Row Source: SELECT tblActivity.[Activity Description],
tblActivity.[Activity
Points] FROM tblActivity ORDER BY tblActivity.[Activity Nbr];
Column Count: 2
Column Widths: '1";0"'
Bound Column: 1

The tboPoints Text Box Field shows "#Name?" in the form view as an error.

Please tell me what I'm doing wrong.
Thank you,
mrzin