Please convert and give me VBA to C# code.

chetan Allipur

Please convert and give me VBA to C#

Function sGetDocVar(ByVal sVName As String) As String

On Error GoTo sGetDocVar_ERROR

sGetDocVar = ActiveDocument.Variables(sVName).Value

Exit Function

sGetDocVar_ERROR:

Select Case Err.Number

Case 5825 'Variable does not exist

sGetDocVar = vbNullString

Case Else

Const sProcedure As String = "sGetDocVar"

End Select

End Function

6 Replies

Know the answer? Post it — somebody with the same question will find it here.

chetan Allipur9y ago
I too dont know that VBA Code. But I want same functionality in c# thats it
Abhilash J A9y ago
1) There is no translation for this you would have to rewrite it in C# from scratch. And whatever errors you received. So is not a code translation service.

2) What is that Case Else supposed to do? at the moment it does nothing. That procedure returns "" on any error thrown by ActiveDocument.Variables() so in C# you would just try {} it.
Rajkiran Swain9y ago
1. public string sGetDocVar(string sVName)
2. {
3. string functionReturnValue = null;
4. // ERROR: Not supported in C#: OnErrorStatement
6. functionReturnValue = ActiveDocument.Variables(sVName).Value;
7. return functionReturnValue;
8. sGetDocVar_ERROR:
9. switch (Err.Number) {
10. case 5825:
11. //Variable does not exist
12. functionReturnValue = Constants.vbNullString;
13. break;
14. default:
15. const string sProcedure = "sGetDocVar";
16. break;
17. }
18. return functionReturnValue;
19. }
21. //=======================================================
22. //Service provided by Telerik (www.telerik.com)
23. //Conversion powered by NRefactory.
24. //Twitter: @telerik
25. //Facebook: facebook.com/telerik
26. //=======================================================
http://converter.telerik.com/