Bekijk de onderstaande video om te zien hoe je onze site als een web app op je startscherm installeert.
Opmerking: Deze functie is mogelijk niet beschikbaar in sommige browsers.
Private Sub cmdCopyRecord_Click()
Dim v1 As Variant
Dim v2 As Variant
Dim v3 As Variant
v1 = Me.Field1.Value
v2 = Me.Field2.Value
v3 = Me.Field3.Value
RunCommand acCmdRecordsGoToNew
Me.Field1 = v1
Me.Field2 = v2
Me.Field3 = v3
End Sub
Private Sub Naam_Change()
If Len(Me.Naam.Text) > 3 Then
If Me.Naam.Text = Left(v1, Len(Me.Naam.Text)) Then
Me.Naam.Text = v1
End If
End If
End Sub
We gebruiken essentiële cookies om deze site te laten werken, en optionele cookies om de ervaring te verbeteren.