mY vb.net代码中的表达式预期错误

时间:2012-01-30 04:23:12

标签: vb.net

我的代码中有以下错误,请有人告诉我如何从代码中删除它 这是我的代码

Protected Sub addListItems()

        Dim now As DateTime = DateTime.Now
        Dim past As DateTime = now.AddDays(-20)
        Dim dates As New List(Of DateTime)()
        Dim curDate As DateTime = now
        While curDate > past
            dates.Add(curDate)
            curDate = curDate.AddDays(-1)
        End While
        'Add Date Values TO DPR Jhang
        ddlTrnDte.Attributes("onchange") = "window.open('http://appsrv01.shakarganj.com.pk:7778/reports/rwservlet?reptestdpr&report=DPR_SEASON_20102011_W&P_1='+ this.value, 'mywindow4');"
        ddlTrnDte.Attributes("onclick") = "return sel_veh_onclick();"
        ddlTrnDte.Items.Clear()
        ddlTrnDte.Items.Add(New ListItem("Please Select", ""))
    ddlTrnDte.Items.AddRange(dates.ConvertAll(Function(dt) New ListItem(dt.ToString("dd-MMM"), dt.ToString("dd-MMM-yyyy"))).ToArray())


    End Sub

错误位于“预期表达式”功能的最后一行

ConvertAll(Function(dt)

任何人都告诉我这段代码有什么问题

1 个答案:

答案 0 :(得分:-1)

嗯,什么是"功能"在这一行?功能的名称?据我所知,你不能这样命名,因为它是一个保留的关键字。 什么" dt" ?声明在哪里,它的类型是什么?