HelpFilePath Example |
Using Programming Languages other than VBA
Sub Example_HelpFilePath() ' This example returns the current setting of ' HelpFilePath. It then changes the value, and finally ' it resets the value back to the original setting. Dim preferences As AcadPreferences Dim currHelpFilePath As String Dim newHelpFilePath As String Set preferences = ThisDrawing.Application.preferences ' Retrieve the current HelpFilePath value currHelpFilePath = preferences.Files.HelpFilePath MsgBox "The current value for HelpFilePath is " & currHelpFilePath, vbInformation, "HelpFilePath Example" ' Change the value for HelpFilePath newHelpFilePath = "C:/AutoCAD/Help" preferences.Files.HelpFilePath = newHelpFilePath MsgBox "The new value for HelpFilePath is " & newHelpFilePath, vbInformation, "HelpFilePath Example" ' Reset HelpFilePath to its original value preferences.Files.HelpFilePath = currHelpFilePath MsgBox "The HelpFilePath value is reset to " & currHelpFilePath, vbInformation, "HelpFilePath Example" End Sub
Comments? |