Access交流中心

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

子窗体数据表用VBA排序问题

小陈  发表于:2014-02-14 14:53:21  
复制

在“明细”窗体中有一个详细记录的子窗体,打开时是以只读模式打开,如果打开子窗体时对记录的某一字段(例如“类别”)进行升序或降序排序,请问,用VBA如何写代码?点击下载此附件

 

Top
落尘_小新 发表于:2014-02-14 15:19:00
Me.类别ID.SetFocus
DoCmd.RunCommand acCmdSortAscending '按选择的字段升序排列
DoCmd.RunCommand acCmdSortDescending'按选择的字段降序排列



cspa 发表于:2014-02-14 15:30:37

在点灯表 子窗体的加载事件中键入:

Private Sub Form_Load()
Me.Form.OrderBy = "[点灯表].[类别ID]"
'如要倒序:
'Me.Form.OrderBy = "[点灯表].[类别ID] DESC"
Me.Form.OrderByOn = True
End Sub�������ش˸���

小陈 发表于:2014-02-14 16:01:18
谢谢两位,特别感谢CSPA!

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