Convert C to VB

[suplado]

Please help me,how can i convert this c++ code to vb.

LPSTR lpszComparison;

CHAR szzMethod[] = "1000\0" "2000\0" "3000\0";
pcnd.lpszComparison = szzMethod;


lpszComparison
Set a pointer to the buffer containing multiple null-terminated comparison strings. The last string in the buffer must be terminated by two NULL characters

please show me the convertion of this to VB 6.0

thank you

[firoz.raj]

Set a pointer to the buffer containing multiple null-terminated comparison strings. The last string in the buffer must be terminated by two NULL characters

as much as i know .there is no any concept of pointer in neither in vb nor in vb.net .it is very hard to convert c code in vb .better why don't you write code in vb.net .it is
much easier language then c ,c++.

[dglienna]

Pretty hard, if you didn't write the DLL, isn't it?

[GremlinSA]

LPSTR lpszComparison;

Search CG for DLL Calling 'Declare Function XXX lib "YYY" (parameters)'

CHAR szzMethod[] = "1000\0" "2000\0" "3000\0";

hmm this should be something like

Dim szzMethod(2) as String
szzMethod(0) = "1000\0"
szzMethod(1) = "2000\0" 
szzMethod(2) = "3000\0"

And finaly

pcnd.lpszComparison = szzMethod;

Look up Calling conventions...
there are different methods to call this.. one been

Output = lpszComparison (szzMethod())

[Eri523]

CHAR szzMethod[] = "1000\0" "2000\0" "3000\0";

hmm this should be something like

Dim szzMethod(2) as String
szzMethod(0) = "1000\0"
szzMethod(1) = "2000\0" 
szzMethod(2) = "3000\0"

I'd say it's rather like

  Dim szzMethod As String
  szzMethod = "1000" & Chr(0) & "2000" & Chr(0) & "3000" & Chr(0)

However, of course this doesn't solve the OP's overall problem...

[GremlinSA]

I'd say it's rather like

  Dim szzMethod As String
  szzMethod = "1000" & Chr(0) & "2000" & Chr(0) & "3000" & Chr(0)

However, of course this doesn't solve the OP's overall problem...

Ahh okay ...

My C is rusty at best ... And looking at it again your correct.. Array of Char = String...

[suplado]

this is the whole codes from c


typedef struct tagSORTMETHOD {
DWORD cbSize; /* Size of SORTMETHOD structure */
INT32 nPocket;
INT32 nSortMethod;
LONG lUseStartPosChar;
LONG lPos;
CHAR cStartPos;
LONG lUseEndPosChar;
LONG lLen;
CHAR cEndPos;
LPSTR lpszComparison;
BOOL bPolarity;
} SORTMETHOD, *LPSORTMETHOD;

pcnd.cbSize = sizeof(SORTMETHOD);
pcnd.nSortMethod =1;
pcnd.nPocket=1;
pcnd.lPos = 0;
pcnd.lLen = 4;
CHAR szzMethod[] = "1000\0" "2000\0" "3000\0";
pcnd.lpszComparison = szzMethod;
pcnd. bPolarity = TRUE;

CsdParSet( CSDP_SORT_METHOD, (LPARAM) &pcnd );

could anyone help me please...

tnx

[dglienna]

You can't really use that, as VB6 doesn't know what a POINTER is, and your code uses one.

CHAR cStartPos;

[suplado]

Guys this is the code from C.NET,please convert it to VB.NET hope this would help.

Tnx

public struct SORTMETHOD
{
/// <summary>sizeof SORTMETHOD structure</summary>
public int cbSize;
/// <summary></summary>
public int nPocket;
/// <summary></summary>
public int nSortMethod;
/// <summary></summary>
public int lUseStartPosChar;
/// <summary></summary>
public int lPos;
/// <summary></summary>
public char cStartPos;
/// <summary></summary>
public int lUseEndPosChar;
/// <summary></summary>
public int lLen;
/// <summary></summary>
public char cEndPos;
/// <summary></summary>
[MarshalAs(UnmanagedType.LPStr)]
public string lpszComparison;
/// <summary></summary>
[MarshalAs(UnmanagedType.Bool)]
public bool bPolarity;
}

[dglienna]

Here's the first line, so you can see the SYNTAX

Public cbSize as Integer ' or whatever TYPE it is

Also, please use CODE TAGS