I get an error when performing the following.

Me.UltraChart1.SaveTo(SaveFileDialog1.FileName, System.Drawing.Imaging.ImageFormat.Wmf)

 "System.ArgumentNullException: Value cannot be null"

Other  format types works fine. see code below.

If SaveFileDialog1.ShowDialog() = DialogResult.OK Then
            Dim sExt As String = SaveFileDialog1.FileName.Substring(SaveFileDialog1.FileName.LastIndexOf(".") + 1, 3).ToUpper()

            Select Case sExt
                Case "JPG"
                    Me.UltraChart1.SaveTo(SaveFileDialog1.FileName, System.Drawing.Imaging.ImageFormat.Jpeg)

                Case "BMP"
                    Me.UltraChart1.SaveTo(SaveFileDialog1.FileName, System.Drawing.Imaging.ImageFormat.Bmp)

                Case "GIF"
                    Me.UltraChart1.SaveTo(SaveFileDialog1.FileName, System.Drawing.Imaging.ImageFormat.Gif)

                Case "WMF"
                    Me.UltraChart1.SaveTo(SaveFileDialog1.FileName, System.Drawing.Imaging.ImageFormat.Wmf)

            End Select

            MsgBox("Save As Complete", MsgBoxStyle.OkOnly, cMANAGES)

        End If