好的我有一个类,一个dbml文件和一个表单。我的项目名为“演示项目”
表格 - DriveTimeActiveVendorsFrom dbml - Dataworld class - tblDriveTimeActiveVendors
我的表单包含以下代码
Imports System.Data.Linq.Mapping
Public Class DriveTimeActiveVendorsForm
Private dc As New DataworldDataContext.DataworldDataContext
Dim _insert As New tblDrivetimeActiveVendors
Private Sub insertVendor()
dc = New DataworldDataContext.DataworldDataContext
_insert.ASRVendor = TextBox1.Text
_insert.AddressLine1 = TextBox2.Text
_insert.City = TextBox3.Text
dc.tblDriveTimeActiveVendors.InsertOnSubmit(_insert)
End Sub
End Class
我的课程包含以下内容
Public Class tblDrivetimeActiveVendors
Private _ASRVendor As String = Nothing
Private _AddressLine1 As String = Nothing
Private _City As String = Nothing
Public Property ASRVendor() As String
Get
Return _ASRVendor
End Get
Set(ByVal value As String)
If value Is Nothing Then
_ASRVendor = Nothing
Else
_ASRVendor = value.Trim
End If
End Set
End Property
Public Property AddressLine1() As String
Get
Return _AddressLine1
End Get
Set(ByVal value As String)
If value Is Nothing Then
_AddressLine1 = Nothing
Else
_AddressLine1 = value.Trim
End If
End Set
End Property
Public Property City() As String
Get
Return _City
End Get
Set(ByVal value As String)
If value Is Nothing Then
_City = Nothing
Else
_City = value.Trim
End If
End Set
End Property
我在下一行收到错误
dc.tblDriveTimeActiveVendors.InsertOnSubmit(_insert)
它是“_insert”部分,错误是
Value of type 'WindowsApplication1.tblDrivetimeActiveVendors' cannot be converted to 'WindowsApplication1.DataworldEntity.tblDriveTimeActiveVendor'. C:\Users\rmonzing\Documents\Visual Studio 2008\Projects\DemoProject\DemoProject\DriveTimeActiveVendorsForm.vb 13 53 DemoProject
我在这里缺少什么?感谢
答案 0 :(得分:1)
变量_insert
被声明为tblDrivetimeActiveVendors
(复数)类型的对象,但InsertOnSubmit
期望一个类型为'tblDrivetimeActiveVendor'的对象(单数)。
在代码的某处,某些东西已经声明了一个类tblDrivetimeActiveVendor
,它(可能)包含与数据库表中的列对应的属性。您需要使用此对象而不是上面发布的类。