Question

我正在尝试使用C＃编写的video并将其转换为vb（使用函数从SQL Server填充下拉框）这是工作的C＃代码：

private list<product> getallprodcuts()
{
    Try
    {
          using(PropSolWebDBEntities db= new PropSolWebDBEntities())
          list<product> products = (from x in db.product select x).tolist;
    }
    catch(exception)
    {
           Return Null;
    }
}

我无法上班的vb：

Private Function getallproducts() As List( Of<product>)

        Try
            Dim db As New PropSolWebDBEntities
            Dim products As list <product> = (from x in db.product select x).tolist 

            Return products

        Catch ex As Exception
            Return vbNull
        End Try
    End Function

我做错了什么？

Answer 1

您不需要LINQ部分，因为您没有过滤/分组/排序。 Using块会为您处理上下文处理。你刚刚错过了一些语法差异。

Private Function getallproducts() As List(Of product)
  Dim results As List(Of product) = Nothing
  Using db As New PropSolWebDBEntities
     results = db.product.ToList 
  End Using
  Return results
End Function

Answer 2

列表应翻译为列表（产品）。

return null应该被翻译为Return Nothing。

使用using而不是声明db变量。

我不编译代码，但它是这样的：

Private Function getallproducts() As List(Of product)

Try
    Using db As New PropSolWebDBEntities
        Dim products As list(Of product) = (From x In db.product Select x).ToList()
        Return products
    End Using

Catch ex As Exception
    Return Nothing
End Try

结束功能

使用函数从SQL Server填充下拉框

2 个答案: