Comments by CaptainChizni (Top 21 by date)

I fix my query, It works thank you :)

It really works, Thank You :)

it works thank you

Yes i want to add the values of the 5 textboxes and write the result of this additon into a new cell of my datatable

Thank You

do you have a code for this? I'm really new to this

It Works thank you

can you show me the code?

Dim constr = "provider=microsoft.ace.oledb.12.0;data source=" & Application.StartupPath & "\Maccount.accdb"
Dim adapt As New OleDbDataAdapter
Dim conn As New OleDbConnection(constr)
Dim rs As New OleDb.OleDbDataAdapter(" Select * from NewAccount where Saccountno = '" & txtHidden.Text & "'", conn)
I was just wondering when it will return the values

Dim constr = "provider=microsoft.ace.oledb.12.0;data source=" & Application.StartupPath & "\Maccount.accdb"
Dim adapt As New OleDbDataAdapter
Dim conn As New OleDbConnection(constr)
Dim rs As New OleDb.OleDbDataAdapter(" Select * from NewAccount where Saccountno = '" & txtHidden.Text & "'", conn)

always use appropriate column type. For example?

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If Val(WithBox.Text) > bal Then
LowerBalance.Show()
ElseIf Me.WithBox.Text = "" Then
Errorform1.Show()
Else
total = bal - Val(WithBox.Text)
Dim dbcommand As String = "update NewAccount set Samount = '" & total & "'where AccountName='" & TextBox1.Text & "'"
adapt = New OleDbDataAdapter(dbcommand, cn)
dset = New DataSet
adapt.Fill(dset)
'rs.Dispose()
'cn.Close()
Call draw()

End If
End Sub
im getting a problem in else statement. i don't know if it's the data types or my access database. I've try the Option Strict but nothing's happening. Please help me I'm new to vb.net and Ms access if only i can post my database file here

One more question i am trying to create a banking system, the problem is when i click the button1 it only executes the if val(withbox.text) statement, how can i decrease my balance in access

Thanks it works :)