C#->VB Snippet Translation Help Needed

[Phil C.]

Hi.
I'm having trouble translating a routine to alter validation at the client
and the server.

A portion of the C# code is:

>>>>>>>>>>> >>>>>>>>>>>>>>> >>>>>>>>>>>>>>> >>>>>>>>>>>>>>> >>>>>>>>> namespace Test.WebControl s
{

public class WebPage : System.Web.UI.P age
{
public WebPage()
{
validatorAssign ments = new NameValueCollec tion();
}

private void Page_Load( object sender, System.EventArg s e )
{
if( this.validatorA ssignments != null &&
this.validatorA ssignments.HasK eys() )
{
StringBuilder sb = new StringBuilder() ;
sb.Append("<scr ipt>");
sb.Append(Envir onment.NewLine) ;
sb.Append("Page _ValidatorAssig nments = true;");
sb.Append(Envir onment.NewLine) ;
for( int i = 0; i < this.validatorA ssignments.Coun t; i++ )
{
if( this.validatorA ssignments.Keys[i].ToString() != string.Empty &&
this.validatorA ssignments[i].ToString() != string.Empty )
{
sb.AppendFormat (" var {0}Validators = new Array(",
this.validatorA ssignments.Keys[i].ToString());
string[] keys = this.validatorA ssignments[i].Split(",".ToCh arArray());
for( int k = 0; k < keys.Length; k++ )
{
sb.AppendFormat ("'document. all[\"{0}\"]'", keys[k].Trim()); ///This
Line has Problems

if( k != keys.Length - 1 )
sb.Append(",");
}
sb.Append(");") ;
sb.Append(Envir onment.NewLine) ;

}
}
sb.Append(Envir onment.NewLine) ;
sb.Append("</script>");
Page.RegisterCl ientScriptBlock ("ValidatorAssi gnments", sb.ToString());
}
}
<<<<<<<<<<<<<<< <<<<<<<<<<<<<<< <<<<<<<<<<<<<<< <<<<<<<<<<<<<<< <<<<<<<<<<<<<<< <<<<<<<<<<<<<<< <

The problem is with the line:
sb.AppendFormat ("'document. all[\"{0}\"]'", keys[k].Trim());

The error reads "Overload resolution failed because no accessible
AppendFormat can be called with these arguments....."

Any help would be appreciated

My VB translation up to that line reads:
>>>>>>>> >>>>>>>>>>>>>>> >>>>>>>>>>>>>>> >>>>>>>>>>>>>>> >>>>>>>>>>>>>>> >>>>>>>>>>>>>>> >>>>

If (Me.validatorAs signments Is Nothing) AndAlso
(Me.validatorAs signments.HasKe ys() = True) Then

Dim sB As New StringBuilder

sB.Append("<scr ipt>")

sB.Append(Envir onment.NewLine)

sB.Append("Page _ValidatorAssig nments = true;")

sB.Append(Envir onment.NewLine)

Dim i, j As Integer

For i = 0 To Me.validatorAss ignments.Count - 1

If Me.validatorAss ignments.Keys(i ).ToString <> "" AndAlso
Me.validatorAss ignments(i).ToS tring <> "" Then

sB.AppendFormat (" var {0}Validators = new Array(",
Me.validatorAss ignments.Keys(i ).ToString())

Dim keys As String() = Me.validatorAss ignments(i).Spl it(",".ToCharAr ray())

For j = 0 To keys.Length - 1

sb.AppendFormat ("'document. all[\"{0}\"]'", keys(j).Trim())

Next

End If

Next

End If

<<<<<<<<<<<<<<< <<<<<<<<<<<<<<< <<<<<<<<<<<<<<< <<<<<<<<<<<<<<< <<<<<<<<<<<<<<< <<<<<<<<<<<<<<< <<<<<<<<<<<<<<< <<<<<<

[Cor Ligthert]

Phil,
\" (single quote) is in VBNet "" (double quote)

Therefore
"""This""" is "This"

I hope this helps,

Cor

[charlestek]

Thanks for saving my skin Cor,
I should remember that backslash escapes are strictly C language type
constructs.
I learned C from K&R and used it more in the past than VB,
so when I translate C# to VB I frequently think things look ok. I
remember now constructing sql queries in regular asp vbscript
and having to concatenate strings and escape the single quotes too.

I learned .Net in VB, so I started this project with it.
In the future I'm going to do everything in C# so I don't
get a headache ;-)

*** Sent via Developersdex http://www.developersdex.com ***