office交流網(wǎng)--QQ交流群號

Access培訓(xùn)群:792054000         Excel免費交流群群:686050929          Outlook交流群:221378704    

Word交流群:218156588             PPT交流群:324131555

access vba代碼太長,換行,分行的寫法

2022-01-19 10:45:00
tmtony8
原創(chuàng)
26325
在編程過程中,我們經(jīng)常會遇到語句太長,無法完全查看,要拉動編輯窗口下方的滾動條才能完全閱讀。
    由于一行代碼太長,所以我們必須分開兩行甚至多行,但不能破壞代碼的結(jié)構(gòu)性。

對于有sql語句,必須在句末+雙引號+空格+下劃線,下一句前面+&+空格+雙引號

Private Sub 更新_Click()
    ‘DoCmd.RunSQL "update 表1 set 名稱='桔子',數(shù)量=100, 日期=#2012-12-12#  where ID=3"
 
     DoCmd.RunSQL "update 表1 set 名稱='桔子',數(shù)量=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
分享
文章分類
聯(lián)系我們
聯(lián)系人: 王先生
Email: 18449932@qq.com
QQ: 18449932
微博: officecn01
移動訪問