using Access only, no VB or other front ends used in this app.
i would like to know how to add a new item to a listbox with two columns at the moment my code looks like this:
however this only writes the "("Date: " & txtDate)" to one column, i wish to have them split so "Date:" goes in the first and txtDate goes in the second.Code:If txtDate = "" Then MsgBox "You must enter a Date for the Operation First, and Click Add.", vbOKOnly, "Error - Missing Date" Exit Sub Else If txtTime = "" Then MsgBox "You must enter a Time for the Operation First, and Click Add.", vbOKOnly, "Error - Missing Time" Exit Sub Else lstOperationSummary.AddItem ("Date: " & txtDate) lstOperationSummary.AddItem ("Time: " & txtTime) End If End If
thanks




Reply With Quote