某城市為了鼓勵(lì)大家采用公共交通方式出行，推出了一種地鐵換乘公交車的優(yōu)惠方案：在搭乘一次地鐵后可以獲得一張面額為本次地鐵價(jià)格的優(yōu)惠券，有效期為60分鐘，在有效期內(nèi)可以使用這張優(yōu)惠券，免費(fèi)搭乘一次票價(jià)不超過這張優(yōu)惠券的公交車。在有效期內(nèi)指開始乘公交車的時(shí)間與開始乘地鐵的時(shí)間之差小于等于60分鐘。搭乘地鐵獲得的優(yōu)惠券可以累積，即可以連續(xù)搭乘若干次地鐵后再連續(xù)使用優(yōu)惠券搭乘公交車，但每次搭乘公交車只能使用一張優(yōu)惠券。搭乘公交車時(shí)，如沒有合適的優(yōu)惠券，則自己全額支付：如果有多張優(yōu)惠券滿足條件，則優(yōu)先消耗獲得最早的優(yōu)惠券。
小葉同學(xué)根據(jù)優(yōu)惠政策，編寫了計(jì)算優(yōu)惠后需要支付費(fèi)用的程序，同時(shí)將乘車記錄按時(shí)間先后順序逐行顯示。在Textl里輸入乘車記錄的數(shù)量n,Text2里輸入n組數(shù)據(jù)，每組乘車記錄有3個(gè)數(shù)據(jù)，依次是車型（1表示地鐵、2表示公交）、開始乘車時(shí)間、乘車票價(jià)。每個(gè)數(shù)據(jù)以逗號(hào)結(jié)尾。不會(huì)有兩次乘車記錄出現(xiàn)在同一分鐘。數(shù)組d存儲(chǔ)乘車記錄的結(jié)構(gòu)如圖a所示：

程序界面如圖b所示：

（1）在VB表達(dá)式Val（Textl.Text）中，Val、Textl.Text依次表示

C

C

（單選，填字母：A.方法名、屬性名、事件名/B.函數(shù)名、對象名、方法名/C.函數(shù)名、對象名、屬性名）。
（2）實(shí)現(xiàn)上述功能的程序如下，請?jiān)跈M線處填入合適的代碼。
（3）程序中加框處代碼有誤，請改正。