老是提示“应为语句结束”错误，不知道哪里出问题

Question

行 29:  Dim strA,strB,strSql As String
行 30:  strA="Insert Into recordInfo(accountName,recordIncome,recordPayout,recordHandle,recordRe,recordTime,recordByWho"
行 31:  strB="values('" & DDLAccount.SelectedItem.Text & "'," CInt(recordIncome.Text)*100/100 "," CInt(recordPayout.Text)*100/100 ",'" & recordHandle.Text& "','" & recordRe.Text & "',#" & now() & "#,'" & session(userLoginName) & "'"
行 32:  strSql=strA & ")" & strB & ")" 

Answer 1

Dim strA,strB,strSql As String
strA="Insert Into recordInfo(accountName,recordIncome,recordPayout,recordHandle,recordRe,recordTime,recordByWho" strB="values('" & DDLAccount.SelectedItem.Text & "'," & CInt(recordIncome.Text) & ","  & CInt(recordPayout.Text) & ",'" & recordHandle.Text & "','" & recordRe.Text & "',#" & now() & "#,'" & session(userLoginName) & "'"
strSql=strA & ") " & strB & ")" )后面给个空格 ,少了n个&

Answer 2

少了n个&？怎么个少法

Answer 3

strSql=strA & "  )  " & strB & " ) "注意空格  values 前面要保留空格