如何使选定的行变成高亮显示？

谢健

当光标选中子窗体任意一行时，即光标进入任意一个单元格，如何使选定的行变成高亮显示？如图所示：

laiguiyou

在子窗体的成为当前事件中加入DoCmd.RunCommand acCmdSelectRecord

[此贴子已经被作者于2007-4-28 8:47:48编辑过]

谢健

非常感谢！真是太好了，又学会一招！

谢健

想再问一个问题，那个高亮显示是黑色为背景色的，那么这个黑色可以改成其他颜色吗？如橙色，请问如何改？

laiguiyou

也可以,那要用到条件格式.这样窗体会有点抖动,你可以搜索一下,有这方面的资料

goodboy040

非常感谢！真是太好了，又学会一招

graper

很好赞一个

graper

再赞一个

086-china

抖动的问题怎么就解决不了呢?

wu8313

如果是acc2007的话，将会自动加上所在行的边框，不过没有高亮显示。

------------------------------------------------------------------------------------------
如果，希望单击某字段不执行高亮显示的，可以在子窗体中贴上如下代码，正好手边上我写了一段。

单击 '姓名' 字段的话，就不执行高亮显示(而是弹出一个快捷菜单等等)

Private Sub Form_Load()
Call focus_select
End Sub
Public Sub my_sel_rec()
DoCmd.RunCommand acCmdSelectRecord
End Sub
Private Sub focus_select() '文本框获取焦点后,行选该记录
For Each ctla In Me.Controls
    Select Case ctla.ControlType
        Case acTextBox
         If ctla.name <> "姓名" Then
         ctla.
         Else
          '你定义弹出快捷菜单或者其他操作
         End If
        Case Else
        '什么也不做
    End Select
Next ctla
End Sub

[ 本帖最后由 wu8313 于 2008-8-22 22:26 编辑 ]