用vb编写个小程序计算百分比输入总数输出三个值abca=10%b=30%c=60%

Question

用vb编写个小程序 计算百分比 输入总数 输出三个值 a b c a=10% b=30% c=60%

Answer 1

Private Sub Command1_Click()
Sum = InputBox("请输入总数")
MsgBox "a=" & Sum * 0.1 & "b=" & Sum * 0.3 & "c=" & Sum * 0.6
End Sub