Warning: file_get_contents(/data/phpspider/zhask/data//catemap/8/design-patterns/2.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Vb.net 使用函数的VisualBasic贷款计算器_Vb.net_Radio Button - Fatal编程技术网

Vb.net 使用函数的VisualBasic贷款计算器

Vb.net 使用函数的VisualBasic贷款计算器,vb.net,radio-button,Vb.net,Radio Button,我需要构建一个贷款计算器,它使用函数根据单击的单选按钮为文本框提供值。然后我需要使用Sub来报告带有标签的结果 我想我开始的方向是正确的,但是我没有vb的背景,所以请耐心听我说 Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click Dim Payment As Double Dim Nper As Double Dim LoanIRate As Doubl

我需要构建一个贷款计算器,它使用函数根据单击的单选按钮为文本框提供值。然后我需要使用Sub来报告带有标签的结果

我想我开始的方向是正确的,但是我没有vb的背景,所以请耐心听我说

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    Dim Payment As Double
    Dim Nper As Double
    Dim LoanIRate As Double
    Dim LoanDuration As Integer
    Dim LoanAmount As Integer


    If rdbmp1.Checked Then
        Payment = Pmt(LoanIRate, LoanDuration, -LoanAmount, 0, )
        TextBox4.Text = Payment.ToString("#.00")
    End If
    If rdbamt1.Checked Then
        LoanAmount = PV(LoanIRate / 1200, LoanDuration, -Payment)
        TextBox1.Text = Payment.ToString("#.00")
    End If
    If rdbir1.Checked Then
        LoanIRate = 1200 * Rate(LoanDuration, Payment - LoanAmount)
        TextBox2.Text = Payment.ToString("#.00")
    End If
    If rdbdl1.Checked Then
        LoanDuration = Nper(LoanIRate / 1200, Payment, -LoanAmount)
        TextBox3.Text = Payment.ToString("#.00")
    End If
End Sub

目前,对我来说唯一正确的计算方法是每月付款,其他所有方法都有构建错误。

PV
是一种自定义方法,很可能是由您的一个库在项目中定义的。您当前正在向它传递三个参数,但它显然期望的不止这些。因为我不知道它需要什么参数,所以我无法回答还需要传递什么。如果右键单击
PV
方法名称并选择转到定义选项,您将能够看到该方法的正确参数


您提到的第二条错误消息试图解释
Nper
不是一个方法,但您试图调用它,就好像它是一个方法一样。它实际上可能是一个实际方法的名称,但您已将局部变量定义为
Dim Nper为Double
,因此它认为您指的是该变量名称而不是方法。要解决这个问题,您可能只需重命名或删除该局部变量。

构建错误是什么?当尝试计算LoanIrate时,我会收到一个错误,上面写着“参数PV未指定参数”,当尝试使用NPER计算LoanDuration时,我会得到“表达式不是数组或方法”。