菜鸟提问：下面一段代码中的下划线“

李子　发表于：2017-02-15 12:10:03 　

Public Sub btnEdit_Click()
On Error GoTo ErrorHandler

If Me.sfrList.Form.CurrentRecord < 1 Then
Exit Sub
End If

Me.sfrList.SetFocus
RunCommand acCmdSelectRecord
DoCmd.OpenForm FormName:=Me.Name & "_Edit", _
DataMode:=IIf(Me.btnEdit.Enabled, acFormEdit, acFormReadOnly), _
OpenArgs:=Me.sfrList![ID]

ExitHere:
Exit Sub

Top

MDZZ 发表于：2017-02-15 12:49:20

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

对于有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

Top

李子发表于：2017-02-15 13:21:48

非常感谢 MDZZ ！回答的非常清晰，同时使我更增加了学习的信心。

Top

总记录：2篇页次：1/1 9 1 :

Access交流中心

菜鸟提问：下面一段代码中的下划线“_”是什么意思