Please do the follow Add-in to delete it

Dim utils As ASFUtility
Set utils = args.ArgAsObject(kArgUtility)

Dim result As Boolean

result = utils.Remove(prodTask, AsLib.kASBOrder_Comment, 4)