某城市为了鼓励大家采用公共交通方式出行，推出了一种地铁换乘公交车的优惠方案：在搭乘一次地铁后可以获得一张面额为本次地铁价格的优惠券，有效期为60分钟，在有效期内可以使用这张优惠券，免费搭乘一次票价不超过这张优惠券的公交车。在有效期内指开始乘公交车的时间与开始乘地铁的时间之差小于等于60分钟。搭乘地铁获得的优惠券可以累积，即可以连续搭乘若干次地铁后再连续使用优惠券搭乘公交车，但每次搭乘公交车只能使用一张优惠券。搭乘公交车时，如没有合适的优惠券，则自己全额支付：如果有多张优惠券满足条件，则优先消耗获得最早的优惠券。
小叶同学根据优惠政策，编写了计算优惠后需要支付费用的程序，同时将乘车记录按时间先后顺序逐行显示。在Textl里输入乘车记录的数量n,Text2里输入n组数据，每组乘车记录有3个数据，依次是车型（1表示地铁、2表示公交）、开始乘车时间、乘车票价。每个数据以逗号结尾。不会有两次乘车记录出现在同一分钟。数组d存储乘车记录的结构如图a所示：

程序界面如图b所示：

（1）在VB表达式Val（Textl.Text）中，Val、Textl.Text依次表示

C

C

（单选，填字母：A.方法名、属性名、事件名/B.函数名、对象名、方法名/C.函数名、对象名、属性名）。
（2）实现上述功能的程序如下，请在横线处填入合适的代码。
（3）程序中加框处代码有误，请改正。