作者ntcblin ( )
看板Visual_Basic
标题[VBA ] 一个问题
时间Wed Nov 1 17:46:38 2006
请问 什麽是程式处於中断模式
我要怎麽除错呢 thanks
这是我的程式
Public Sub dee()
Dim pra As Double
Dim ra As Double
Dim na As Double
Dim mp As Double
Dim rb As Double
Dim nb As Double
Dim mpa As Double
Dim mpl As Double
pra = Worksheets("sheet1").Cells(3, 1).Value
ra = Worksheets("sheet1").Cells(3, 2).Value
na = Worksheets("sheet1").Cells(3, 3).Value
mp = Worksheets("sheet1").Cells(10, 1).Value
rb = Worksheets("sheet1").Cells(10, 2).Value
nb = Worksheets("sheet1").Cells(10, 3).Value
mpa = pra * (ra / 12) / (1 - (1 / (1 + (ra / 12) ^ na)))
mpl = mp * (1 - (1 / (1 + rb / 12) ^ nb)) / (rb / 12)
Worksheets("sheet1").Cells(6, 1).Value = mpa
Worksheets("sheet1").Cells(13, 1).Value = mpl
End Sub
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 140.114.132.196
1F：推 qsss:你的问题好像跟程式没有关系? 这段可以Run没有错误 11/01 18:05
2F：推 commiserate:侦错时 按Ctrl+Break可进入中断模式 11/01 18:15
3F：→ commiserate:按 F5 继续 可以看说明档 功能表中的侦错项 11/01 18:15
4F：推 ntcblin:请问我的程式有错吗 11/01 19:18
5F：推 qsss:程式应该没错 11/02 10:05