1

我在 onload 事件上有一个 MS Access 连续表单,我正在获取 MyTable Record,到这里为止都很好。但我只想改变第一行的颜色

我的表

Id ¦ Name ¦  Months ¦ Years
------------------
1  ¦ Ali  ¦ 01 ¦ 2020
2  ¦ Umar ¦ 02 ¦ 2020
3  ¦ Abid ¦ 03 ¦ 2019
4  ¦ Sana ¦ 04 ¦ 2020

我用了这段代码

Dim tblCount, Countr as Integer
tblCount = Dcount("Years", "MyTable")
For Countr = 1 to tbleCount
 If countr = 1 Then
   Me.Years.ForeColor = vbred
 Else
   Me.Years.ForeColor = vbblack
End If
Next Countr

当countr = 1时,它显示所有年份列红色,当Countr> 1年列变为黑色但我只想要第一行年份红色其余所有行黑色

我真的很感谢你请帮助我

4

0 回答 0