I have set up a dimension style in vb .net, I am having rouble setting the suffix and the linear precision?
Here is what I currently have:
Dim acDimStyleTbl As DimStyleTable
acDimStyleTbl = acTrans.GetObject(acCurDb.DimStyleTableId, _ OpenMode.ForRead)
Dim sDimStyleName As String = "test"
Dim acDimStyleTblRec As DimStyleTableRecord = New DimStyleTableRecord()
acDimStyleTblRec.Dimscale = 20
acDimStyleTblRec.Dimtxt = 0.18
acDimStyleTblRec.Name = sDimStyleName
acDimStyleTbl.UpgradeOpen()
acDimStyleTbl.Add(acDimStyleTblRec)
acTrans.AddNewlyCreatedDBObject(acDimStyleTblRec, True)
acCurDb.Dimstyle = acDimStyleTblRec.ObjectId
I need to add a single quotation mark for the suffix ( " ie: inches ) and I want the precision at '.00' Any help or advice would be greatly appreciated!
Solved! Go to Solution.
Solved by Balaji_Ram. Go to Solution.
Hello,
Have you tried using the "DimStyleTableRecord.Dimpost" and "DimStyleTableRecord.Dimdec" properties ?
Hope it helps.
Thanks, this did work. The only problem I had was triny to get " to show up for inches and I got that to work by using:
DimStyleTableRecord.Dimpost = (Chr(34))