VB算法设计打开'c:\MyExam\工程1.vbp'完成如下算法设计 请你为某汽车运输公司编制一个计算运输费

VB算法设计
打开'c:MyExam工程1.vbp'完成如下算法设计 请你为某汽车运输公司编制一个计算运输费用的程序,运输费用的计算方法是距离愈远,每公里运价愈低,如下表所示： 距离s＜500公里 折扣=0% 500=＜s＜1000 折扣=5% 1000=＜s＜3000折扣=10% s＞=3000 折扣=15% 如果运输的货物重为15吨,每吨运价为0.225元,请根据不同的运输距离计算出运费. 注：1.请勿更改main函数.2.请在函数func(c)中实现功能.帮我写一下吧 好不好 不用做 只要把那些代码呀什么的全给我弄过来就好了 注意：一定是我将这个复制到程序里就可以直接得到我想要的结果的如果我满意的话 我会加分的 我保证