作者yangchihwei (yangchihwei)
看板Visual_Basic
标题Re: [.NET] VB2005又遇到问题了
时间Fri Jan 2 19:38:05 2009
※ 引述《kyle421 (放羊的橘子)》之铭言：
: 请输入专案类型(网站专案或者应用程式专案)：
: Dim x As Integer = 10000
: Dim y, z, i As Integer
: Dim sum As Double
: sum = x * 0.15 * z + x
: y = CInt(TextBox1.Text)
: For z = 1 To i
: sum = sum - y * z
: If sum <= 0 Then
: Label1.Text = z & "个月还完"
: End If
: Next z
: Label1.Text &= sum
: x本金
: y每个月还的金额
: sum总金额
: 题目是
: 希望输入第2个月後还款金额..然後自动计算几个月後可以还完
: 我这样写哪边有错吗
: 怎麽都没反应??
: 谢
感觉有问题的地方还满多的.
1.z没有设定值,预设值应该是0,所以sum其实应该是10000.
2.i没有设定值,预设值应该是0,所以您的for回圏根本没有执行.
3.小弟认为您应该用3个textbox,(1)本金(2)利率(3)月还款金额.
4.label1.text &= sum 是字串连结的语法,结果出现label1.text内原本的字串+10000.
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 115.80.47.171