M
Mithrial via AccessMonster.com
I'm using VB to attempt to autopopulate a tabular form I created to maintain
track of my company's open projects. A friend of mine provided the code that
allows me to pull my information from my query. The problem is, is that my
query has over 20 columns and every time I attempt to use my code to pull
from any column past the 9th in my query nothing happens. Below is a snippet
of the code I'm using.
Private Sub Combo100_AfterUpdate()
Me.Text102 = Me.Combo100.Column(1)
Me.Text110 = Me.Combo100.Column(2)
Me.Text112 = Me.Combo100.Column(6)
Me.Text114 = Me.Combo100.Column(7)
Me.Text116 = Me.Combo100.Column(3)
Me.Text118 = Me.Combo100.Column(0)
Me.Project_1 = Me.Combo100.Column(5)
Me.Project_2 = Me.Combo100.Column(8)
End Sub
Me.Project_2 = Me.Combo100.Column(10) (Won't work or any number referenced
over 9 for that matter provides no results)
Am I missing syntax that causes this or is there a limitation with this
command?
track of my company's open projects. A friend of mine provided the code that
allows me to pull my information from my query. The problem is, is that my
query has over 20 columns and every time I attempt to use my code to pull
from any column past the 9th in my query nothing happens. Below is a snippet
of the code I'm using.
Private Sub Combo100_AfterUpdate()
Me.Text102 = Me.Combo100.Column(1)
Me.Text110 = Me.Combo100.Column(2)
Me.Text112 = Me.Combo100.Column(6)
Me.Text114 = Me.Combo100.Column(7)
Me.Text116 = Me.Combo100.Column(3)
Me.Text118 = Me.Combo100.Column(0)
Me.Project_1 = Me.Combo100.Column(5)
Me.Project_2 = Me.Combo100.Column(8)
End Sub
Me.Project_2 = Me.Combo100.Column(10) (Won't work or any number referenced
over 9 for that matter provides no results)
Am I missing syntax that causes this or is there a limitation with this
command?