Free Trial

Safari Books Online is a digital library providing on-demand subscription access to thousands of learning resources.


  • Create BookmarkCreate Bookmark
  • Create Note or TagCreate Note or Tag
  • PrintPrint
Share this Page URL
Help

Teil: 6 Anhang > A.1 Wie hänge ich ein Feld an eine Tabelle an?

A.1. A.1 Wie hänge ich ein Feld an eine Tabelle an?

Diese Frage soll programmtechnisch gelöst werden. Dabei wird an die Tabelle Personal ein zusätzliches Feld angehängt. Der Code für diese Aufgabe sieht wie folgt aus:

Listing A.1. Feld an eine Tabelle anhängen

Sub FeldAnhängen()
  Dim db As Database
  Dim tdf As TableDef
  Dim fld As Field

  Set db = CurrentDb
  Set tdf = db.TableDefs!Personal

  Set fld = tdf.CreateField("Alter")
  fld.Type = dbDouble
  tdf.Fields.Append fld
End Sub


  

You are currently reading a PREVIEW of this book.

                                                                                                                    

Get instant access to over $1 million worth of books and videos.

  

Start a Free 10-Day Trial


  
  • Safari Books Online
  • Create BookmarkCreate Bookmark
  • Create Note or TagCreate Note or Tag
  • PrintPrint