Skip to main content

hi, does anyone know how to convert VB code below in to cobol?

ChrW(&HF0A0)

where ChrW = 

https://msdn.microsoft.com/en-us/library/microsoft.visualbasic.strings.chrw(v=vs.110).aspx

and &HF0A0 = 

https://msdn.microsoft.com/en-gb/library/ms819564.aspx

Thanks in advance.

Kind regards

Neil.

hi, does anyone know how to convert VB code below in to cobol?

ChrW(&HF0A0)

where ChrW = 

https://msdn.microsoft.com/en-us/library/microsoft.visualbasic.strings.chrw(v=vs.110).aspx

and &HF0A0 = 

https://msdn.microsoft.com/en-gb/library/ms819564.aspx

Thanks in advance.

Kind regards

Neil.

Something like this should do it:

     $set ilusing"Microsoft.VisualBasic"

          declare mychar as type Char = type Strings::ChrW(h"F0A0")
          display mychar

hi, does anyone know how to convert VB code below in to cobol?

ChrW(&HF0A0)

where ChrW = 

https://msdn.microsoft.com/en-us/library/microsoft.visualbasic.strings.chrw(v=vs.110).aspx

and &HF0A0 = 

https://msdn.microsoft.com/en-gb/library/ms819564.aspx

Thanks in advance.

Kind regards

Neil.

hi chris,

ive done it long hand because i couldnt get your way to work.

so ive ended up with

declare mychar as type System.Char = type Microsoft.VisualBasic.Strings::ChrW(h"F0A0")

however it errors on the Microsoft.VisualBasic.Strings bit with

COBCH0845 : unknown type 'Microsoft.VisualBasic.Strings'

Can you pla advise

hi, does anyone know how to convert VB code below in to cobol?

ChrW(&HF0A0)

where ChrW = 

https://msdn.microsoft.com/en-us/library/microsoft.visualbasic.strings.chrw(v=vs.110).aspx

and &HF0A0 = 

https://msdn.microsoft.com/en-gb/library/ms819564.aspx

Thanks in advance.

Kind regards

Neil.

Sorry, forgot to add one piece of information. You need to add a reference in your project to the Microsoft.VisualBasic.dll assembly and then my example should work.

hi, does anyone know how to convert VB code below in to cobol?

ChrW(&HF0A0)

where ChrW = 

https://msdn.microsoft.com/en-us/library/microsoft.visualbasic.strings.chrw(v=vs.110).aspx

and &HF0A0 = 

https://msdn.microsoft.com/en-gb/library/ms819564.aspx

Thanks in advance.

Kind regards

Neil.

yep thats it many thanks chris

Terms & ConditionsAccessibility statement