请问下VB里怎样另存为一个已经打开的文件
我们老师叫做一个简单的图片浏览器，要具备一些打开，另存为等功能。其余都做完了，就是怎么另存为一直搞不明白，书上也只有另存为文本文档的，似乎图片跟文本文档不一样。
打开的图片会显示到picturebox，能够复制，粘贴，剪切等操作，就是不能另存为！
下面我把代码贴出来，大家帮我看看该怎么弄吧，谢谢啦！
Dim mstrFileName As String
'“复制”菜单项的事件过程
Private Sub Copy_Click()
Clipboard.Clear
Clipboard.SetData imgPicture.Picture
End Sub
'“剪切”菜单项的事件过程
Private Sub Cut_Click()
Clipboard.Clear
Clipboard.SetData imgPicture.Picture
imgPicture.Visible = False '通过不可见达到剪切效果
End Sub
Private Sub dirselect_Change()
filselect.Path = dirselect.Path
End Sub
Private Sub drvselect_Change()
dirselect.Path = drvselect.Drive
End Sub
Private Sub Exit_Click()
Unload Me
End Sub
Private Sub filselect_Click()
mstrFileName = filselect.Path & "\" & filselect.FileName
imgPicture.Picture = LoadPicture(mstrFileName)
End Sub
Private Sub Form_Resize()
Dim i As String
Dim m As String
Dim picWidth As Integer
Dim picHeight As Integer
Dim imgWidth As
相关问答：
在下是vb的新手，想写段程序，在vb中，使用wscript调用一些外部的命令，但是程序执行一直有错误，请各位高手帮忙解答下，谢谢。
代码如下：
VB code:
Private Function getFile_CMD(filename, filepath) As Bo ......
我在类中有一个函数
Public Function DownloadAdditionalSite(SiteName As siteconfig, Directory As String, ymd As String) As Boolean
siteconfig是我自定义类型的数据，为什么会提示“只有在公共对象模块中� ......
怎么把已知的数据保存成xml文件，现在已知的数据是
<?mso-application progid="Excel.Sheet"?>
<Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet"
xmlns:o=& ......
xmlDoc1.loadXML(h)总是返回false，为什么？谢谢帮忙回答一下
h是什么呢。。。。。。。。。
h是xml格式的字符串
你是想打开。XML格式的文件吧？
我是把h放在xmlDoc1里，用xmlDoc1.loadXML(h)，然后取xmlDo ......
挺繁琐，之前发的帖子，分值太低现在重发一个。欢迎各位大侠~~
#include "stdlib.h"
#include "math.h"
#include "stdio.h"
float objfx(float x[]);
void constraint(float x[] ......
