Follow along with the video below to see how to install our site as a web app on your home screen.
Note: This feature may not be available in some browsers.
Dim tdf As DAO.TableDef
Dim fld As Field
Set DB = CurrentDb
Set tdf = DB.TableDefs("Table1")
'Debug.Print tdf.Fields("Field1").Properties("InputMask")
tdf.Fields("Field1").Properties("InputMask") = 101
'Debug.Print tdf.Fields("Field1").Properties("InputMask")