用/連接數(shù)字為何變成除以了？

lzx-shmily

Private Sub 發(fā)出單號_AfterUpdate()
Dim a  As Integer, i As Integer, str2 As String
a = Right(Me.發(fā)出單號, 2)

For i = 1 To a
  
str2 = "insert into 發(fā)出表 ( 發(fā)出單號, 序號) select (forms![發(fā)出表]![發(fā)出單號])," & Me.發(fā)出單號 & "/" & i
    DoCmd.SetWarnings False
    DoCmd.RunSQL str2
    DoCmd.SetWarnings True
Next
End Sub

我想要的是主窗體的發(fā)出單號輸入：A0905-04
然後子窗體自動添加4條記錄
單號分別為：A0905-04/01;A0905-04/02;A0905-04/03;A0905-04/04;
可是當我輸入發(fā)出單號是數(shù)字的時候就變成除以i，輸入發(fā)出單號是字符串的時候又彈出要輸入?yún)��?shù)了
麻煩大家?guī)兔�看下如何解決？謝謝！

zyp

str2 = "insert into 發(fā)出表 ( 發(fā)出單號, 序號) select (forms![發(fā)出表]![發(fā)出單號])," & Me.發(fā)出單號 & "/" & CStr(i)

試試

lzx-shmily

不行的，之前有試過加CSTR的

zyp

str2 = "insert into 發(fā)出表 ( 發(fā)出單號, 序號) VALUES ('"& forms![發(fā)出表]![發(fā)出單號] &"','" & Me.發(fā)出單號 & "/" & i &"')"

lzx-shmily

謝謝ZYP！