Cant open a User Control containing other User controls without getting "Unable to load DLL SQLite.Interop.DLL"

As the question implies I have a User Control containing 4 user controls each control I can open individually without a problem however when I open the control by containing all 4 I get the error.

unable to load dll 'sqlite.interop.dll': 
the specified module could not be found

If I open the "show Call stack" it tells me that the problem is within one of the User controls

Instances of this error (1)  

1.   Hide Call Stack 

at SimpleBudget.ProcessTickUI.BankAccountsDB() in  C:\Users\John\Documents\Visual Studio 2013\Projects\SimpleBudget\SimpleBudget\UI\Menu\ProcessTickUI.vb:line 20
at SimpleBudget.ProcessTickUI.reLoad() in C:\Users\John\Documents\Visual Studio 2013\Projects\SimpleBudget\SimpleBudget\UI\Menu\ProcessTickUI.vb:line 14
at SimpleBudget.ProcessTickUI.ProcessTickUI_Load(Object sender, EventArgs e) in C:\Users\John\Documents\Visual Studio 2013\Projects\SimpleBudget\SimpleBudget\UI\Menu\ProcessTickUI.vb:line 8
at System.Windows.Forms.UserControl.OnLoad(EventArgs e)
at System.Windows.Forms.UserControl.OnCreateControl()
at System.Windows.Forms.Control.CreateControl(Boolean fIgnoreVisible)
at System.Windows.Forms.Control.CreateControl(Boolean fIgnoreVisible)
at System.Windows.Forms.Control.CreateControl()
at System.Windows.Forms.Control.ControlCollection.Add(Control value)
at System.Windows.Forms.Design.ControlDesigner.DesignerControlCollection.Add(Control c)  

however as said previously there is no error in that control.

3) Dim mBankAccountsDT As DataTable
4) Dim BankID As Integer
5) Dim ActionID As Integer = 1
6)
7) Private Sub ProcessTickUI_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
8)    reLoad()
9) End Sub
10) Public Shadows Sub reLoad()
11)     ProcessToCB.Items.Clear()
12)     mBankAccountsDT = BankAccounts.BankAccountsDT
13)
14)     BankAccountsDB()
15)     ProcessToCB.SelectedIndex = 0
16) End Sub
17)
18) Private Sub BankAccountsDB()
19)    ProcessToCB.Items.Add("Please Choose")
20)    For Each row As DataRow In mBankAccountsDT.Rows
21)        ProcessToCB.Items.Add(row("NickName"))
22)    Next
23) End Sub

It must also be said there is NO problem running the application at all I just cant edit the User control with out deleting the User control and recreating it, then once again I cant get back into it. can anyone help in a direction to go?