如何在值中保留小数部分

Question

res1将数字显示为整数，如何让它显示结果数字并保留小数部分？

P.s 此方法是从另一个类调用的，因此数字是从那里给出的，但结果仍然相同。

Public Sub max(num1, num2)
    If (num1 > num2) Then
        MessageBox.Show("Max: " & num1)
    Else : MessageBox.Show("Max: " & num2)
    End If
End Sub
Public Sub min(num1, num2)
    If (num1 < num2) Then
        MessageBox.Show("Min: " & num1)
    Else : MessageBox.Show("Min: " & num2)
    End If
End Sub
Public Sub avg(num1, num2)
    res1 = (num1 + +num2)  2
    MessageBox.Show("Average: " & res1)
End Sub

我尝试添加"Cdec"和"Cdbl"，但平均值仍然显示为整数。我曾经在 c 语言中放置这样的东西（res=（float）num1+num2），它有效，但在 vb.net 中有什么替代方案？

Answer 1

    Public Sub avg(num1 As Decimal, num2 As Decimal)
        Dim res1 As Decimal
        res1 = (num1 + +num2) / 2d
        MessageBox.Show("Average: " & res1)
   End Sub

称呼它

 avg(10D, 5.5D)

十进制数据类型