Dim image_uri As New BitmapImage
image_uri.BeginInit()
image_uri.UriSource = New Uri("pictures\bmp_001.bmp", UriKind.Relative)
image_uri.EndInit()
image_mname.Source = image_uri
设计需要,设置了一个image控件,通过程序动态加载外部图片。 我的程序和图片文件夹的关系如下: application ├pictures │└bmp_001.bmp └bmpload.exe 程序代码如下: Dim image_uri As New BitmapImage image_uri.BeginInit() image_uri.UriSource = New Uri("pictures\bmp_001.bmp", UriKind.Relative) image_uri.EndInit