1楼：匿名用户
privatesub***mand1_click()dimpersonasinteger,nasinteger,pay
person=inputbox("请输入乘车人数：")n=inputbox("请输入乘车站数：")ifn>0andn<=4thenpay=person*3
elseifn<=9then
pay=person*4
else
pay=person*5
endif
msgbox"乘车人数："&person&vbcrlf+"乘车站数："&n&vbcrlf&"应付款数："&pay&"元",,"购票信息"
endsub
就是我想做一个用vb编写地铁实时到站的系统 然后不知道怎么编写地铁还有几分钟到站的程序
2楼：
地铁票价查询系统
这个没意义吧！按公里收费的，还是按站台收费的。这个只需要计算就ok了！！
值至少有一个小于。 特别提醒：如果指定的逻辑条件参数中
天津地铁多少钱一站
3楼：匿名用户
天津地铁1号线票价：
乘坐5站4区间：2元；
乘坐5站4区间以上，10站9区间：3元；
乘坐10站9区间以上，16站15区间：4元；
以上5元。
4楼：汗骥夹谷越泽
天津西站到天津站，地铁票价3元。
天津地铁 1,2,3号线换乘最高封顶多少元？ 听说单条路线最高5元，换乘的话，是多少？
5楼：宋萨
最高票价5元封顶
地铁3号线将实行分段计程票价，起步票价为乘坐5站4区间以内(含5站)每人每张2元；乘坐5站4区间以上、10站9区间以下(含10站)，票价每人每张3元；乘坐10站9区间以上、16站15区间以下(含16站)，票价每人每张4元；乘坐16站15区间以上票价每人每张5元。
地铁3号线与地铁1、2号线票价制定方式相同，乘客在地铁1、2、3号线内换乘时，电脑系统将以乘客从出发站到目的地站的最短路径计算乘车费用，无论乘客届时选择怎样的乘车路径，最终出站时系统均以最短路径收取车费。地铁3号线开通试运营后，将与地铁1号线在营口道站换乘，与地铁2号线在天津站换乘。
第一次到北京南站，请问怎么在北京南站坐地铁4号线，票价调整之后，站内换乘1号线的话需要重新买票吗
6楼：匿名用户
你不是北京的？
①北京南站地铁换乘大厅，问工作人员。
②在北京南站坐4号线到西单站换乘1号线，到自动售票机买票，你就点就可以了，旁边有本站（西单站）到1号线各个站点的票价。从3元到5元不等，选择标有绿色箭头的闸机，在右侧屏幕刷卡进站，车票在中途不要丢失，不然会很麻烦，出站时选择标有绿色箭头的闸机然后把车票投入右下方的车票**机里，方可离开车站，停留在地铁里的时间不要超过4小时，否则追加3元超时费。
③地铁4号线和1号线客流很大，但车辆间隔时间短，只有1至3分钟，当开门铃响后不要强行上车，以免造成危险。
7楼：旅人
第一次到北京南站，在北京南站坐地铁4号线，。。下车从站台直接下楼，楼下就是地铁站。站内换乘一号线，不用重庆买票，买票的时候，你跟售票员说清楚你的目的地，一次付清票款，这样就不用换乘的时候重新买票了
北京南站
8楼：郎峰
不用重新买票，直接站内换乘就行了。地铁票价是根据起始站和终点站的位移决定的，跟路程无关。望采纳。
用vb编写计算s=1-1/2+1/3-1/4+1/5-1/6+1/7-1/8+1/9-1/10
9楼：匿名用户
private sub ***mand1_click()dim i as integer, s as doubles = 0
for i = 1 to 10
s = s + (-1) ^ (i - 1) * (1 / i)next i
print 0; s
end sub
天津地铁从2号线倒1号线共坐4站收费标准
10楼：人品赢天下
天津地铁1、2、3号线正式票价为“分段计程票价”，全程票价每人每张5元。
起步票价为乘坐5站4区间以内（含5站）每人每张2元；乘坐5站4区间以上10站9区间以下（含10站）票价每人每张3元；乘坐10站9区间以上16站15区间以下（含16站）票价每人每张4元；乘坐16站15区间以上票价为每人每张5元。
用vb编程求pi=4(1–1/3+1/5–1/7+1/9–1……)
11楼：匿名用户
privatesubform_click()dimiaslong,fasinteger,piassingle
i=1
f=1
dopi=pi+(1/i)*ff=-f
i=i+2
loopwhile1/i>0.00001msgbox4*pi
endsub
12楼：匿名用户
lets=0
lete=0.00001
leti=0
letsign=-1
dowhile1.0/(2*i+1)>=eletsign=-sign
lets=s+sign*1.0/(2*i+1)leti=i+1
loop
lets=s*4
printsend
深圳地铁八卦岭到大新刷卡有时5.3元有时5.7元，买单程5元，什么原因？
13楼：匿名用户
根据优惠政策，持深圳通乘坐公交或地铁，5-90分钟内换乘第二趟公交或地铁，在已有折扣上再优惠0.4元。
深圳地铁八卦岭-大新站票价6元，持深圳通卡乘车享受标准票价9.5折优惠，即6*0.95=5.7元。
如果乘坐地铁前坐过公交，可享受换乘优惠0.4元，即5.7-0.4=5.3元