VBA Textbox 没有显示内容
Sub按钮16_Click()Dimprofit,nprofit,ratio,bonusAsSingleprofit=Val(TextBox1)ratio=Val(Tex...
Sub 按钮16_Click()Dim profit, nprofit, ratio, bonus As Singleprofit = Val(TextBox1)ratio = Val(TextBox2)bonus = (profit + 120) * ratio / (ratio + 100)nprofit = profit - bonusTextBox3 = Format(nprofit, "0.00")TextBox4 = Format(bonus, "0.00")End Sub
展开
1个回答
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询