主题：页面集合的背景色

可以用代码写背景：

'页签增加背景
If FileSys.FileExists(ProjectPath & "Images\back4.jpg") = True
    Dim tab As WinForm.TabControl = e.Form.Controls("TabControl1")
    tab.TabPages(0).BackgroundImage = GetImage(ProjectPath & "Images\背景.jpg")
    tab.TabPages(0).BackgroundImageLayout = ImageLayout.Stretch
    tab.TabPages(1).BackgroundImage = GetImage(ProjectPath & "Images\背景.jpg")
    tab.TabPages(1).BackgroundImageLayout = ImageLayout.Stretch
    tab.TabPages(2).BackgroundImage = GetImage(ProjectPath & "Images\背景.jpg")
    tab.TabPages(2).BackgroundImageLayout = ImageLayout.Stretch
End If