以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  ClipBoard没用？  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=136450)
--  作者：huangxueyao
--  发布时间：2019/6/13 15:14:00
--  ClipBoard没用？
If dlg.ShowDialog = DialogResult.Ok Then \'如果用户单击了确定按钮
    Dim s As String = "中小件新建入库预约导入模板"
    
    If ClipBoard.ContainsText Then
        ClipBoard.Clear
    End If
    
    ClipBoard.SetText(s)
    tb1.SaveExcel(dlg.FileName, "sheet1")  \'保存文件
End If

以上，想要在保存文件的时候直接黏贴文件名，但是没用，剪切板没数据
--  作者：有点甜
--  发布时间：2019/6/13 15:30:00
--  

你需要这个？

 

Dim dlg As New SaveFileDialog \'定义一个新的SaveFileDialog
dlg.FileName = "abc.xls"
If dlg.ShowDialog = DialogResult.Ok Then \'如果用户单击了确定按钮
    MessageBox.Show("你要保存为:" & dlg.FileName,"提示") \'提示用户选择的文件
End If

 
--  作者：huangxueyao
--  发布时间：2019/6/14 19:57:00
--  
谢谢

另外软件提示有新版本，但是打不开链接怎么破？
--  作者：有点蓝
--  发布时间：2019/6/14 21:00:00
--  
开发版和商业版用户的下载地址：
http://www.foxtable.com/update/how.htm
--  作者：huangxueyao
--  发布时间：2019/6/20 22:02:00
--  
点了以后报错：找不到指定的文件，怎么搞
--  作者：有点甜
--  发布时间：2019/6/20 22:06:00
--  
以下是引用huangxueyao在2019/6/20 22:02:00的发言：
点了以后报错：找不到指定的文件，怎么搞

 

方法一：修复你的ie程序；

 

方法二：http://www.foxtable.com/verify/Default.aspx?xzm=4428268835220861