在:G:\foxtable\管理项目1\Images\图片\ 下面有 4张 jpg图片 :1.jpg 2.jpg 3.jpg 4.jpg
想实现”主窗口” 背景图片自动切换,如30秒。
在窗口的timertick中
Static i As Integer
If i = 0 Then
i = 1
End If
e.Form.baseform.controls(“主窗口”).backgroundimage=getimage("G:\foxtable\管理项目1\Images\图片\" & i & ".jpg")
i = i + 1
If i = 5 Then
i = 1
End If
在窗口的afterload中
Forms("主窗口").baseform.backgroundimage = getimage("G:\foxtable\管理项目1\Images\图片\.jpg")
怎么不能实现啊?
帮我看一下!