爱问知识人 爱问教育 医院库

1.出租车车费现有用VB编程的简单计算程序,已经完成窗口界面和部分代码,需要补充代

首页

1.出租车车费现有用VB编程的简单计算程序,已经完成窗口界面和部分代码,需要补充代

出租车车费 
现有用VB编程的简单计算程序,已经完成窗口界面和部分代码,需要补充代码完成该编程项目。 
程序功能:计算出租汽车车费。 
在文本框“Text1”中输入行驶里程的千米值,按照起步价12元,3千米,续距费用为每千米2.4元,忽略等候及其他费用,单击“计算”按钮,求车费,见分进元。 
请完成“计算”按钮的程序代码。 

提交回答

全部答案

    2019-02-01 01:54:04
  • 123456789101112Private Sub Command1_Click()If Val(Text1.Text) <= 3 Then    Text2.Text = 12Else    Text2.Text = 12   (Val(Text1.Text) - 3) * 2.4End IfEnd SubPrivate Sub Form_Load()Text1.Text = ""Text2.Text = ""Command1.Caption = "计算"End Sub

    逃***

    2019-02-01 01:54:04

类似问题

换一换

相关推荐

正在加载...
最新问答 推荐信息 热门专题 热点推荐
  • 1-20
  • 21-40
  • 41-60
  • 61-80
  • 81-100
  • 101-120
  • 121-140
  • 141-160
  • 161-180
  • 181-200
  • 1-20
  • 21-40
  • 41-60
  • 61-80
  • 81-100
  • 101-120
  • 121-140
  • 141-160
  • 161-180
  • 181-200
  • 1-20
  • 21-40
  • 41-60
  • 61-80
  • 81-100
  • 101-120
  • 121-140
  • 141-160
  • 161-180
  • 181-200
  • 1-20
  • 21-40
  • 41-60
  • 61-80
  • 81-100
  • 101-120
  • 121-140
  • 141-160
  • 161-180
  • 181-200

热点检索

  • 1-20
  • 21-40
  • 41-60
  • 61-80
  • 81-100
  • 101-120
  • 121-140
  • 141-160
  • 161-180
  • 171-190
返回
顶部
帮助 意见
反馈

确定举报此问题

举报原因(必选):