locked
convert from c# to vb RRS feed

  • Question

  • User910710390 posted

    Please help me convert this code:

      Page currentPage = HttpContext.Current.Handler as Page;
      if(currentPage!=null)
                    row["ItemMediaUrl"] = currentPage.ResolveClientUrl(string.Format("~/Images/{0}/{1}.{2}", folder, (i + 1), extention));
                row["ReadMoreUrl"] = "#";
                row["ReadMoreText"] = "Read More...";
                row["ReadMoreTarget"] = "";
                data.Rows.Add(row);


     

     

    Monday, January 6, 2014 6:49 AM

Answers

  • User-718146471 posted

    Next time, you can use Telerik's Code Converter for that job http://converter.telerik.com :

    Dim currentPage As Page = TryCast(HttpContext.Current.Handler, Page)
    If currentPage IsNot Nothing Then
    	row("ItemMediaUrl") = currentPage.ResolveClientUrl(String.Format("~/Images/{0}/{1}.{2}", folder, (i + 1), extention))
    End If
    row("ReadMoreUrl") = "#"
    row("ReadMoreText") = "Read More..."
    row("ReadMoreTarget") = ""
    data.Rows.Add(row)
    
    

    • Marked as answer by Anonymous Thursday, October 7, 2021 12:00 AM
    Monday, January 6, 2014 7:09 AM

All replies

  • User-718146471 posted

    Next time, you can use Telerik's Code Converter for that job http://converter.telerik.com :

    Dim currentPage As Page = TryCast(HttpContext.Current.Handler, Page)
    If currentPage IsNot Nothing Then
    	row("ItemMediaUrl") = currentPage.ResolveClientUrl(String.Format("~/Images/{0}/{1}.{2}", folder, (i + 1), extention))
    End If
    row("ReadMoreUrl") = "#"
    row("ReadMoreText") = "Read More..."
    row("ReadMoreTarget") = ""
    data.Rows.Add(row)
    
    

    • Marked as answer by Anonymous Thursday, October 7, 2021 12:00 AM
    Monday, January 6, 2014 7:09 AM
  • User2103319870 posted

    Hi,

    You can also try using Developer Fusion's Code Converter tool to convert code from C# to VB and Vice Versa.

    Monday, January 6, 2014 5:57 PM