这种玩意AI生成的？如果没有看代码改代码的能力，使用AI，只会减低生产力，让人变笨，没有什么好处。
Dim dlg As New SaveFileDialog '定义一个新的SaveFileDialog
dlg.Filter = "PNG 图片|*.png|JPEG 图片|*.jpg|BMP 图片|*.bmp" '设置筛选器
dlg.Title = "保存雷达图"
dlg.FileName = "RiskRadarChart"
dlg.DefaultExt = "png"
If dlg.ShowDialog = DialogResult.Ok Then '如果用户单击了确定按钮
Dim Chart As WinForm.Chart
Chart= Forms("风险雷达图").Controls("Chart1")
Chart.SaveImage(dlg.FileName)End If
加好友 
发短信
Post By：2025/2/10 16:57:00 [显示全部帖子]
