Re: Table decimal places

Doesn't the DecimalPlaces property give that?

Dim td As DAO.TableDef
Dim db As DAO.Database
Dim fd As DAO.Field
Set db = DBEngine(0)(0)
For Each td In db.TableDefs
For Each fd In td.Fields
If fd.Type = dbSingle Then
Debug.Print td.Name, fd.Name, _
fd.Properties("DecimalPlaces").Value
End If
Next fd
Next td

--
Roy-Vidar

Roy,
I tried your function and got "Property Not Found" for the
"DecimalPlaces" property. Actually it didn't recognize "Caption" or
other properties I thought should be there. I tried listing the
properties and found out that "DecimalPlaces" was number 23 but could
not get the value. I tried using fd.Properties(1) - (25) and got
values up to (8) but it would not recognize (9) and up.
As a test, I added a new table with singles in it and your
function reads it just fine. I tried to characterize the other tables
to see what the difference was but I could not find anything
significant.
Any ideas?
Hank

.

Relevant Pages

  • Re: Insert Matched Value
    ... Use Dim Long or Dim double for larger values. ... My data form will accept entries for ColA and/or ColB. ... I need someway of matching the columns that have ... my data range could end up looking like LISTING 2. ...
    (microsoft.public.excel.programming)
  • Need Help with List box and table relationship
    ... one listing those items and the other column contains the description of each ... Public Sub btnOK_Click ... Dim cn As ADODB.Connection ... Dim strField As String ...
    (microsoft.public.access.queries)
  • Directory listing & more
    ... I am listing a directory into a ListView Control using the following code, ... Is it possible to list the files of more than one extention say .jpg .gif and .png at the same time or must I use the routine 3 times once for each extention to get all the file for the 3 extentions ... Dim di As New DirectoryInfo ...
    (microsoft.public.dotnet.languages.vb)
  • Re: Directory listing & more
    ... I am listing a directory into a ListView Control using the following code, ... Is it possible to list the files of more than one extention say .jpg .gif and .png at the same time or must I use the routine 3 times once for each extention to get all the file for the 3 extentions ... Dim di As New DirectoryInfo ...
    (microsoft.public.dotnet.languages.vb)
  • Re: Directory listing & more
    ... I am listing a directory into a ListView Control using the following code, ... Is it possible to list the files of more than one extention say .jpg .gif ... Dim di As New DirectoryInfo ...
    (microsoft.public.dotnet.languages.vb)
Loading