其他回答(共7条)

• 

  2018-07-08 11:16 齐景宪 客户经理

  Option Explicit
  Dim k As Single
  以下为运算方式和求解编程
  Private Sub Command1_Click()
  Picture1.Cls
  chushihua
  Dim m, n, p, o, i, y, h As Single
  m = Val(Text1.Text)
  n = Val(Text2.Text)
  p = Val(Text3.Text)
  If n ^ 2 - 4 * m * p > 0 Or n ^ 2 - 4 * m * p = 0 Then
  o = (-1 * n + Sqr(n ^ 2 - 4 * m * p)) / (2 * m)
  i = (-1 * n - Sqr(n ^ 2 - 4 * m * p)) / (2 * m)
  Text4.Text = o
  Text5.Text = i
  Else
  MsgBox "没有实数解"
  Text4.Text = ""
  Text5.Text = ""
  End If
  Picture1.CurrentX = -200
  Picture1.CurrentY = m * 40000 - 200 * n + p
  For h = -20 To 20 Step 1
  y = m * h ^ 2 + n * h + p
  Picture1.Line -(h * 10, y)
  Next h
  Text4 = Format(o, "##0.00")
  Text5 = Format(i, "##0.00")
  End Sub
  定义函数图象显示大小
  Private Sub Form_Activate()
  If k = 0 Then
  Picture1.Scale (-1 * Picture1.ScaleWidth / 2, Abs(Picture1.ScaleHeight) / 2)-(Picture1.ScaleWidth / 2, -1 * Picture1.ScaleHeight / 2)
  chushihua
  k = 1
  End If
  End Sub
  定义坐标轴
  Private Sub chushihua()
  Picture1.Line (-1 * Picture1.ScaleWidth / 2, 0)-(Picture1.ScaleWidth, 0)
  Picture1.Line (0, Abs(Picture1.ScaleHeight) / 2)-(0, -1 * Abs(Picture1.ScaleHeight) / 2)
  Dim z, x, c, v As Single
  x = -24
  For z = -250 To 500 Step 10
  Picture1.CurrentX = z
  Picture1.CurrentY = 0
  Picture1.Line -(z, -1 * 5)
  Picture1.Print x
  x = x + 1
  Next z
  c = 250
  For v = 250 To -250 Step -25
  Picture1.CurrentX = 0
  Picture1.CurrentY = v
  Picture1.Line -(-1 * 5, v)
  Picture1.Print "" + Str(c)
  c = c - 25
  Next v
  End Sub
• 

  2018-07-08 11:13 连亚玉 客户经理

  北京 CA939 09：20 13：10 米兰 136
• 

  2018-07-08 11:10 齐智富 客户经理

  2.25%x-2.25%x×20%=90
  0.018x=90
  x=5000
• 

  2018-07-08 11:07 窦连池 客户经理

  x=2.25%x1―20%―90
• 

  2018-07-08 11:01 符腾丹 客户经理

  年利率是:
  [(1018-1000)/(1-20%)]/1000=22.5/1000=2.25%
  月利率是：
  2.25%/12=0.1875%，即千分之1.875
• 

  2018-07-08 10:58 齐显影 客户经理

  利息税=5000*2.25%*20%=22.5元
• 

  2018-07-08 10:55 连丽花 客户经理

  1.6月末储蓄所的储蓄款余额是850万元，到12月末增加到920万元，增加了百分之几？（百分号前保留1位小数）2.奶奶今年在本单位存入养老金3000元，单位每年付给奶奶的利息是150万元，奶奶养老金的年利率是多少？ 3   妈妈把4000元钱存入银行，存期为两年，年利率为2.43％。到期后，妈妈可得到本金和利息共多少元？4   小瑛把自己的压岁钱300元存入银行，准备支援贫困地区的失学儿童。她存的是定期一年，利率是2.25%，到期后小瑛可捐给贫困地区多少元钱？5   李铭家买了5000元国家建设债券，定期3年，年利率是3.9%，到期时可以得到本金和利息共多少元？6   李小东于2003年5月1日把积攒的500元人民币存入信用社，整存整取存期3年。如果按年利率2.52%计算，到期时可以获得本金和税后利息共多少元？7   王老师把20000元存入银行，存期1年，到期后的税前利息和本金共20450元。年利率是多少元？8    2年定期存款的年利率是2.7%，李师傅存入银行2000元。到期他能取回税后利息多少元？（利息税是20％） 9  教育储蓄所得的利息不用纳税。爸爸为笑笑存了三年期的教育储蓄基金，年利率为5.40％，到期后共领到了本金和利息22646元。爸爸为笑笑存的教育储蓄基金的本金是多少？ 10、 小丽的妈妈在银行里存入人民币5000元，存期一年，年利率2.25%，取款时由银行代扣代收20%的利息税，到期时，所交的利息税为多少元？