16,721
社区成员




Dim 程序集 As System.Reflection.Assembly = System.Reflection.Assembly.GetExecutingAssembly() : Dim 当前程序集名称 As String = 程序集.GetName().Name
Dim 字节流 As System.IO.Stream = 程序集.GetManifestResourceStream(当前程序集名称 & ".preview.jpg")
Dim 图片文件 As Bitmap = New Bitmap(字节流)
Me.BackgroundImage = 图片文件 '设置窗口的背景
Me.BackgroundImageLayout = ImageLayout.Stretch '图像沿控件的矩形工作区拉伸。