VB to C#

[Nikolay Petrov]

Please, can someone convert the following C# code to VB .NET
As far as I can see there are some errors in it, but I am not sure.


if (WTSEnumerateSessions(IntPtr.Zero, 0, 1, ref buffer, ref count))
{
WTS_SESSION_INFO[] sessionInfo = new WTS_SESSION_INFO[count];
for (int index = 0; index < count; index++)
sessionInfo[index] = Marshal.PtrToStructure(buffer +
(sizeof(WTS_SESSION_INFO) * index), typeof(WTS_SESSION_INFO));



TIA

 

[Herfried K. Wagner [MVP]]

Please, can someone convert the following C# code to VB .NET
As far as I can see there are some errors in it, but I am not sure.

if (WTSEnumerateSessions(IntPtr.Zero, 0, 1, ref buffer, ref count))
{
WTS_SESSION_INFO[] sessionInfo = new WTS_SESSION_INFO[count];
for (int index = 0; index < count; index++)
sessionInfo[index] = Marshal.PtrToStructure(buffer +
(sizeof(WTS_SESSION_INFO) * index), typeof(WTS_SESSION_INFO));

\\\
If WTSEnumerateSessions(IntPtr.Zero, 0, 1, Buffer, count) Then
Dim sessionInfo(count - 1) As WTS_SESSION_INFO
For index As Integer = 0 To count - 1
sessionInfo(index) = Marshal.PtrToStructure(New IntPtr(buffer +
(Marshal.SizeOf(GetType(WTS_SESSION_INFO)) * index)),
GetType(WTS_SESSION_INFO))
Next index
End If
///

For a good C# to VB.NET converter take a look here:

Instant VB
<URL:http://www.tangiblesoftwaresolutions.com/Product_Details/Instant_VB/Instant_VB.htm>

 

[Nikolay Petrov]

What about converting code with errors?

Please, can someone convert the following C# code to VB .NET
As far as I can see there are some errors in it, but I am not sure.

if (WTSEnumerateSessions(IntPtr.Zero, 0, 1, ref buffer, ref count))
{
WTS_SESSION_INFO[] sessionInfo = new WTS_SESSION_INFO[count];
for (int index = 0; index < count; index++)
sessionInfo[index] = Marshal.PtrToStructure(buffer +
(sizeof(WTS_SESSION_INFO) * index), typeof(WTS_SESSION_INFO));

\\\
If WTSEnumerateSessions(IntPtr.Zero, 0, 1, Buffer, count) Then
Dim sessionInfo(count - 1) As WTS_SESSION_INFO
For index As Integer = 0 To count - 1
sessionInfo(index) = Marshal.PtrToStructure(New IntPtr(buffer +
(Marshal.SizeOf(GetType(WTS_SESSION_INFO)) * index)),
GetType(WTS_SESSION_INFO))
Next index
End If
///

For a good C# to VB.NET converter take a look here:

Instant VB
<URL:http://www.tangiblesoftwaresolutions.com/Product_Details/Instant_VB/Instant_VB.htm>

 

[Guest]

Our converters (Instant C# and Instant VB) are able to convert incomplete
code with a high success rate - i.e., code snippets with variables or methods
defined elsewhere. However, if you have code which has errors in syntax,
then we make no predictions - it may convert, or fail miserably. Correct
syntax is necessary to allow parsing to succeed.

David Anton
Tangible Software Solutions Inc.
www.tangiblesoftwaresolutions.com

What about converting code with errors?

Please, can someone convert the following C# code to VB .NET
As far as I can see there are some errors in it, but I am not sure.

if (WTSEnumerateSessions(IntPtr.Zero, 0, 1, ref buffer, ref count))
{
WTS_SESSION_INFO[] sessionInfo = new WTS_SESSION_INFO[count];
for (int index = 0; index < count; index++)
sessionInfo[index] = Marshal.PtrToStructure(buffer +
(sizeof(WTS_SESSION_INFO) * index), typeof(WTS_SESSION_INFO));

\\\
If WTSEnumerateSessions(IntPtr.Zero, 0, 1, Buffer, count) Then
Dim sessionInfo(count - 1) As WTS_SESSION_INFO
For index As Integer = 0 To count - 1
sessionInfo(index) = Marshal.PtrToStructure(New IntPtr(buffer +
(Marshal.SizeOf(GetType(WTS_SESSION_INFO)) * index)),
GetType(WTS_SESSION_INFO))
Next index
End If
///

For a good C# to VB.NET converter take a look here:

Instant VB
<URL:http://www.tangiblesoftwaresolutions.com/Product_Details/Instant_VB/Instant_VB.htm>