<output id="os3gq"><ruby id="os3gq"></ruby></output>

    1. <mark id="os3gq"></mark>
    2. 【初級入門】主窗體、子窗體如何共用一個刪除按鈕示例-落塵_小新
      Access軟件網QQ交流學習群(群號碼198465573),歡迎您的加入!
      首頁 >技術文章> 源碼示例


      【初級入門】主窗體、子窗體如何共用一個刪除按鈕示例

      發表時間:2013/12/11 20:49:00 評論(2) 瀏覽(14023)  評論 | 加入收藏 | 復制
         
      摘 要:有網友發貼求助:
      主窗體、子窗體如何共用一個刪除按鈕?
      隨風 等級: 普通會員 ( △ ) 積分:2 城市:東莞 發表于:2013-12-11 11:31:15 
      正 文:

      有網友發貼求助:
      主窗體、子窗體如何共用一個刪除按鈕?
      隨風 等級: 普通會員 ( △ ) 積分:2 城市:東莞 發表于:2013-12-11 11:31:15 

      http://www.www.beijingfeeling.com/bbs/showtopic.asp?id=20367

      主窗體、子窗體如何共用一個刪除按鈕?

      當光標在主窗體時,按’刪除‘按鈕是刪除整張單,

      當光標在子窗體時,按’刪除‘按鈕是刪除子窗體數據選中項。

      本示例是通過判斷上次獲得焦點控名稱是否為子窗體控件名來實現

      具體看示例:

      點擊下載此附件

       

      Private Sub 刪除記錄_Click()
          Dim ctl As Control
          Set ctl = Screen.PreviousControl '返回對上次獲得焦點的控件的引用
          If ctl.Name = "子窗體" Then
              strsql = "Delete * FROM 合約細項 Where IID=Forms!FrmOpen!子窗體.Form!IID;"
              DoCmd.SetWarnings False              ' 取消系統提示
              DoCmd.RunSQL strsql              ' 運行查詢
              DoCmd.SetWarnings True                ' 恢復系統提示
              Me.子窗體.Requery
              Me.子窗體.SetFocus
              MsgBox "成功刪除子窗體記錄."
          Else
              strsql = "Delete * FROM 合約 Where BID_NO=Forms!FrmOpen!BID_NO;"
              DoCmd.SetWarnings False              ' 取消系統提示
              DoCmd.RunSQL strsql              ' 運行查詢
              DoCmd.SetWarnings True                ' 恢復系統提示
              Me.Requery
              MsgBox "成功刪除主窗體記錄."
          End If
      End Sub



      Access軟件網交流QQ群(群號:198465573)
       
       相關文章
      非記錄集方式新增數據到子窗體\主窗體添加數據到子窗體列表  【金宇  2012/2/6】
      【Access源碼示例】調用同一個非綁定數據源窗體實現新增、修改保...  【金宇  2013/1/7】
      Access2003數據庫快速開發教程(一)  【竹笛  2013/10/30】
      Access2007數據庫快速開發教程(一)  【竹笛  2013/10/30】
      Access2010數據庫快速開發教程(一)  【竹笛  2013/10/30】
       
       訪客評論
      2015/9/24大海
      很好,正在找這方面的資料。

      2013/12/23隕石襲海
      嗯,不錯的設計。

      總記錄:2篇  頁次:1/1 9 1 :
       
       發表評論
      評論內容 (必填)

      常見問答
      技術分類
      相關資源
      文章搜索
      關于作者

      落塵_小新

      文章分類

      文章存檔

      友情鏈接
       
         
      湖北11选5