Access交流中心

北京 | 上海 | 天津 | 重庆 | 广州 | 深圳 | 珠海 | 汕头 | 佛山 | 中山 | 东莞 | 南京 | 苏州 | 无锡 | 常州 | 南通 | 扬州 | 徐州 | 杭州 | 温州 | 宁波 | 台州 | 福州 | 厦门 | 泉州 | 龙岩 | 合肥 | 芜湖 | 成都 | 遂宁 | 长沙 | 株洲 | 湘潭 | 武汉 | 南昌 | 济南 | 青岛 | 烟台 | 潍坊 | 淄博 | 济宁 | 太原 | 郑州 | 石家庄 | 保定 | 唐山 | 西安 | 大连 | 沈阳 | 长春 | 昆明 | 兰州 | 哈尔滨 | 佳木斯 | 南宁 | 桂林 | 海口 | 贵阳 | 西宁 | 乌鲁木齐 | 包头 |

请教一下,这段代码

不务实  发表于:2009-06-09 17:22:27  
复制

请帮我看一下下段,为何子窗体是数据表,主窗体执行子窗体的命令就没用,如子窗是单个、连续窗体都能执行

 

 

子窗体Child6的代码

 

  Public Sub 上一条()             '请问这两句有的不同,在什么情况下用其不同的代码
 'Private Sub 上一条_Click()
  DoCmd.GoToRecord , "", acPrevious
 'DoCmd.GoToRecord , , acLast
End Sub

Public Sub 撤销()
DoCmd.RunCommand acCmdUndo
End Sub

Public Sub 删除()
DoCmd.RunCommand acCmdDeleteRecord
End Sub

Public Sub cmdAddNew()
      DoCmd.GoToRecord , , acNewRec
    
     'DoCmd.RunCommand acCmdUndo
     'DoCmd.RunCommand acCmdDeleteRecord
End Sub

 

 

 

主窗体中的代码,是执行子窗体中的程序

 

 

 

 

Private Sub 上条子记录_Click()
  Me.Child6.SetFocus
  Me.Child6.Form.上一条                            这两名也不同,效果会不同吗?,
 ' Call Me.Child6.Form.上一条_Click           
End Sub

Private Sub 撤销子记录_Click()
    Me.Child6.SetFocus
    Me.Child6.Form.撤销
End Sub

Private Sub 删除子记录_Click()
    Me.Child6.SetFocus
    Me.Child6.Form.删除
End Sub

Private Sub cmdAdd2_Click()
'执行子窗体中的cmdAddNew
    Me.Child6.SetFocus
    Me.Child6.Form.cmdAddNew
End Sub


 

 

Top
不务实 发表于:2009-06-09 21:26:35
没人

不务实 发表于:2009-06-10 09:19:40

帮我一下,我会很感谢你的



不务实 发表于:2009-06-11 08:25:27
帮我一下,我会很感谢你的

不务实 发表于:2009-06-12 14:40:47
顶顶顶

竹笛 发表于:2009-06-12 15:17:11
你想问的具体问题是什么?我看了半天没看懂你要问的是什么?

不务实 发表于:2009-06-13 09:27:28

1、为何子窗体是数据表,主窗体执行子窗体的命令就没用,但子窗是单个、连续窗体都能执行的,帮我查原因

2、 Public Sub 上一条()             '请问这两句有的不同,在什么情况下用其不同的代码
 'Private Sub 上一条_Click()
3、

  Me.Child6.Form.上一条                            这两名也不同,效果会不同吗?,
 ' Call Me.Child6.Form.上一条_Click           



不务实 发表于:2009-06-20 22:26:44
没解决也要结贴

总记录:7篇  页次:1/1 9 1 :