如何在运行时修改窗体的背景图?
gaodz 2002-09-13 06:59:27 我的FORM初始化了一个BackgroundImage.我希望在程序运行时修改该背景图。
方法如下:
Dim OpenDialog As New OpenFileDialog()
OpenDialog.InitialDirectory = Application.StartupPath
OpenDialog.DefaultExt = "*.jpg"
OpenDialog.Filter = "图像文件 (*.BMP;*.JPG;*.GIF)|*.BMP;*.JPG;*.GIF|所有文件 (*.*)|*.*"
Dim dResult As DialogResult
dResult = OpenDialog.ShowDialog
If dResult = DialogResult.OK And OpenDialog.FileName <> "" Then
Dim strFilename As String
strFilename = OpenDialog.FileName
Me.BackgroundImage.FromFile(strFilename)
End if
单步执行,strFilename获得的全路径名称没有问题,可是Form的背景没有改过来。是不是BackgroundImage不支持动态修改呀!