以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  日期框  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=55877)
--  作者：发财
--  发布时间：2014/8/25 15:30:00
--  日期框
Dim Book As New XLS.Book(ProjectPath & "备忘录\\杂费.xls")
Dim Sheet1 As XLS.Sheet = Book.Sheets("日期")
Dim cj As WinForm.DateTimePicker = e.Form.Controls("DateTimePicker2")
If cj.Text =Nothing Then
    messagebox.show("请在导入月终日期输入日期!")
Else
    Sheet1(2,1).Value = cj.value
    Dim Proc As New Process
    Proc.File = (ProjectPath & "备忘录\\杂费.xls")
    Proc.Start()
End If
上述代码中    Sheet1(2,1).Value = cj.value，为什么不能将日期框中的值输入到Sheet1(2,1)中？
--  作者：有点甜
--  发布时间：2014/8/25 15:31:00
--  
 你没有把book保存。
--  作者：发财
--  发布时间：2014/8/25 22:30:00
--  
为什么打开Excel表总是发送错误报告？
--  作者：有点甜
--  发布时间：2014/8/25 22:32:00
--  

 你的excel有问题吧？换一个好的excel表格也一样？
--  作者：发财
--  发布时间：2014/8/25 22:37:00
--  
是的，是不是日期框赋值同题？
--  作者：有点甜
--  发布时间：2014/8/25 22:41:00
--  
 我单独测试，没有发现问题。我的是空的xls表格
--  作者：发财
--  发布时间：2014/8/25 22:47:00
--  
我的不是空的Excel表，原来有日期的。
--  作者：有点甜
--  发布时间：2014/8/25 22:48:00
--  
 出错的例子做一个发上来。
--  作者：发财
--  发布时间：2014/8/25 22:49:00
--  
通过日期框赋值改变Excel表旧日期。
--  作者：有点甜
--  发布时间：2014/8/25 22:50:00
--  
以下是引用发财在2014-8-25 22:49:00的发言：
通过日期框赋值改变Excel表旧日期。

 

不可能有错，如果出错，做个可以出错的例子看看。