Dim Book As New XLS.Book '定义一个Excel工作簿Dim Sheet As XLS.Sheet = Book.Sheets(0) '引用工作
Dim a1 As Decimal ,a2 As Decimal
形成a1,a2程序体....
Sheet(x-1 , 15).Value =a1 Sheet(x-1 , 16).Value =a2
上述是我做的一张报表程序的示意结构。
作用是用Excel文件形式输出一张报表,并准备用a1和a2的差验证结果,正确的情况下a1和a2是相等的,这由上述单元格的结果证实。但是我如果用Sheet(x-1 , 15).Value =a1-a2表达结果时,理论上应该是0才对,可是得到的结果不可预知,没有规律而言!什么原因呢?请教狐爸谢谢!