最近學校出了一個題目.用VB遞迴算階層 因為之前學VB時沒教到遞迴 目前有點瓶頸想跟前輩請益一下 題目 tn=tn-1 + 3*tn-2 目前進度 Dim N As Integer Function f(N) If N = 0 Then f = .. << 詳全文 >>

| 回應(5) | 引用 | 連結 | 2006-09-22 00:21

Dim MONEY As Integer Private Sub Command1_Click() If Val(Text2) < MONEY Then MONEY = MONEY - Val(Text2) MsgBox ("提款金額=" + Text2 + Chr(13) + "你餘款剩&quo .. << 詳全文 >>

| 回應(4) | 引用 | 連結 | 2005-12-16 22:54