【发布时间】：2015-02-07 09:45:01
【问题描述】：
我是一名在家接受教育的代码编写者，技术含量不高。我正在尝试使用 VB 在 Visual Studio 2013 中使用 sqlite 访问 s3db 文件。我不断收到此错误消息 "在 sqlite.exe 中发生了类型为 'System.IO.FileLoadException' 的未处理异常
附加信息：混合模式程序集是针对运行时版本“v2.0.50727”构建的，如果没有附加配置信息，则无法在 4.0 运行时中加载。”
代码如下，调试器指向loadpropertydata()
导入 System.Data.SQLite 公共类 listboxpropertydata
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
loadpropertydata()
End Sub
Public Sub loadpropertydata()
Dim connectionString As String = "data source=c:\users\andy\documents\a la mode\database\spectrum.s3db"
Dim mSQL As String = "select AD_ADDR1, AD_ADDR2, PR_SALEPR1, SC_SOURCE1, SC_SOURCE2, FN_CONC1,FN_CONC2, DT_SALTIM1, LC_LOCAT1, RG_RIGHTS, ST_SITSIZE, ST_SITEVW,DA_DESAPL1, DA_CONSTQL, AG_AGYRBLT, AG_COND1, RM_TOTAL, RM_BED,RM_BATH, SF_GLA, BM_BSM1, BM_BSM2, FU_FUNCTUT, HC_HTCOOL, EE_EFFIC1,CR_GARPRK1, PF_PORPAT1, BL_BLANK1, BL_BLANK2, BL_BLANK3, HS_PRIOR1,HS_PRIOR2, HS_PRIOR3, HS_DSDATE from TOTALFormSource"
Dim dt As DataTable = Nothing
Dim ds As New DataSet
Try
Using con As New SQLiteConnection(connectionString)
Using cmd As New SQLiteCommand(mSQL, con)
con.Open()
Using da As New SQLiteDataAdapter(cmd)
da.Fill(ds)
dt = ds.Tables(0)
End Using
End Using
End Using
listboxsqlresults.valuemember = "PropertyGrid"
listboxsqlresults.displaymember = "Address"
listboxsqlresults.datasource = dt
Catch ex As Exception
MsgBox(ex.Message)
End Try
End Sub
结束类
【问题讨论】：