一、学友问题描述：

请问如何才能实现按指定星期几刷新主窗体呢？该窗体是不关闭的。

二、解决方法：

可以使用Format函数与计时器 对窗体进行按星期操作。

代   码：

Private Sub Form_Timer()
If Format(Now(), "aaaa") = "星期一" Then
Me.Refresh '加上自己需要的操作代码
End If
End Sub

图   示：

如大家有简便的方法，请各位前辈指教。