如何一对多赋值

Y9X

我希望对子窗体中某个字段的内容都相同的情况下一次性赋值，这样减少工作量，可是不会搞，请高手教我。请见附件。

aslxt

把"进口业务基本信息数据库"表一并上传,好不改动"进口集装箱信息数据库"的设计

Y9X

已添加，请看一下。

Y9X

我自己顶一下

Y9X

那位高手可以教一下么

Y9X

我再顶起来

Y9X

奇怪，人都哪去了呢

ynjxw

基本实现

Y9X

多谢了。红字这句看不懂，可否解释一下啊
Private Sub Command10_Click()
DoCmd.SetWarnings False
On Error GoTo Err_Command10_Click

    Dim stDocName As String

    stDocName = ChrW(26597) & ChrW(-29726) & ChrW(50)
    DoCmd.OpenQuery stDocName, acNormal, acEdit

Exit_Command10_Click:
    Exit Sub

Err_Command10_Click:
    MsgBox Err.Description
    Resume Exit_Command10_Click
    DoCmd.SetWarnings True
Me.子窗体.Requery
  Me.子窗体.Requery
End Sub

dingchi

那个U什么码怎么对应到汉字？上哪能查