'Using this as your sample input
Dim trigger date as string
trigger date = "06/10/2019"
'Use these to set a date only true date field value without the time.
Dim dtmTemp As New NotesDateTime(triggerdate)
Call dtmTemp.setAnyTime 'sets a wildcard for time, thus leaving it the time out
Dim item As NotesItem
Set item = doc.ReplaceItemValue("EntryDate",dtmTemp)