Ændre Titel

prøv at trykke på den to gange efter hinanden...men jeg fortår ik helt hvad du mener ??

Højreklik og vælg henholdvis databaseegenskaber og for formularen højreklikker du bare og siger omdøb! (dette kommer også til at stå i titellinjen)

Her er en lille rutine, der klarer database spørgsmålet:

Function SetApplicationTitle()
  Const DBnavn = \"Min database\"
  Dim dbs As Database, prp As Property
  Const conPropNotFoundError = 3270
  On Error GoTo ErrorHandler
  Set dbs = CurrentDb
  dbs.Properties!AppTitle = DBnavn
  Application.RefreshTitleBar
  Exit Function

ErrorHandler:
  If Err.Number = conPropNotFoundError Then
    Set prp = dbs.CreateProperty(\"AppTitle\", dbText, DBnavn)
    dbs.Properties.Append prp
  Else
    MsgBox \"Error: \" & Err.Number & vbCrLf & Err.Description
  End If
  Resume Next
End Function


Med hensyn til formularer kan du f.eks. i Åben hændelsen udføre:
Me.Caption = \"Min formular\"