access vba代码太长，换行，分行的写法

2022-01-19 10:45:00

tmtony8

原创

27395

在编程过程中，我们经常会遇到语句太长，无法完全查看，要拉动编辑窗口下方的滚动条才能完全阅读。
由于一行代码太长，所以我们必须分开两行甚至多行，但不能破坏代码的结构性。

对于有sql语句，必须在句末+双引号+空格+下划线，下一句前面+&+空格+双引号

Private Sub 更新_Click()

‘DoCmd.RunSQL "update 表1 set 名称='桔子',数量=100, 日期=#2012-12-12# where ID=3"

DoCmd.RunSQL "update 表1 set 名称='桔子',数量=100, " _

& "日期=#2012-12-12#,采购员=6 " _

& "where ID=3"

End Sub

对于非sql，只需要+空格+_

Private Sub 清空_Click()

' If MsgBox("您确认要清空文本框值吗?", vbOKCancel + vbInformation, "提示") = vbOK Then

If MsgBox("您确认要清空文本框值吗?", vbOKCancel + _

vbInformation, "提示") = vbOK Then

Me.Text0 = ""

End If

End Sub

Access报表图表

文章分类

联系我们