Can we update Minimum Roughness value in Surface Finish symbol via VBA ?

Dim swApp As Object Dim swModel As Object Dim swDraw As Object Dim swView As Object Dim swAnn As Object Dim swSFSymbol As Object Dim sNoteText As String Dim iInch As String Dim newValue As String Dim value As Boolean Dim instance As ISFSymbol Sub main() Set swApp = Application.SldWorks Set swModel = swApp.ActiveDoc Set swDraw =