我正在为学校作业创建一个计算器。在其中,我必须包含一个百分比按钮,其中第一个输入(Num1)是百分比,然后是%按钮,然后是第二个输入(Num2),我们将计算百分比,最后是等于按钮。
所以,例如,如果我说 25%100 = ,我希望显示的值 25%。
但是,我的值仍然以0%返回,我无法弄清楚如何在特定情况下对操作进行编码。
这就是我的百分比按钮的代码:
If txtDisplay.Text.Length <> 0 Then
If Operation = String.Empty Then
Num1 = CType(txtDisplay.Text, Double)
txtDisplay.Text = "0"
Else CalculateTotals()
End If
Operation = "Percent"
Point = False
End If
这就是我的计算功能(不包括所有其他计算):
Function CalculateTotals()
Num2 = CType(txtDisplay.Text, Double)
Select Case Operation
Case "Percent"
Num1 /= 100 * Num2 & " %"
End Select
txtDisplay.Text = CType(Num1, String)
Point = False
End Function
这将返回错误&#34; 转换为字符串&#34; 10000%&#34;输入&#39; Double&#39;无效。&#34;
如果有人能提出可行的解决方案,我们将不胜感激。
答案 0 :(得分:0)
不得不稍微改变它,但我自己找到了答案,只需将其编码为百分比按钮本身。
{{1}}