Just after 10 hours of search and after typing this post I realised what to do.
For anyone else searching for this, the solution is:
What i had:
Dim model as ipfcdrawing
set model = session.currentmodel
Dim dimowner as ipfcmodelitemowner
set dimowner = model
dim dimensions as ipfcmodelitems
set dimensions = dimowner.listitems(epfcmodelitemtype.epfcITEM_DIMENSION)
dim dimension as ipfcdimension2D
set dimension = dimensions.item(i)
dim tolerance as ipfcdimtolerance <------------- Here was the problem as having it defined like this only gives you option "type"
set tolerance = dimension(i).gettolerance
What now gives me what i needed:
Dim model as ipfcdrawing
set model = session.currentmodel
Dim dimowner as ipfcmodelitemowner
set dimowner = model
dim dimensions as ipfcmodelitems
set dimensions = dimowner.listitems(epfcmodelitemtype.epfcITEM_DIMENSION)
dim dimension as ipfcdimension2D
set dimension = dimensions.item(i)
dim tolerance as ipfcdimtolplusminus <------------- Having it set like this now gives us options Minus and Plus
set tolerance = dimension(i).gettolerance