窗体上有名称分别为Text1、Text2的2个文本框，要求文本框Text1中输入的数据小于500，文本框Text2中输入的数据小于1000，否则重新输入。为了实现上述功能，在以下程序中问号（?）处应填入的内容是。

Private Sub Text1_LostFocus（）

C．all CheckInput（Text1，500）

E．nd Sub

Private Sub Text2_LostFocus（）

C．all CheckInput（Text2，1000）

E．nd Sub

Sub CheckInput（t As ?，x As Integer）

If Val（t.Text）>x Then

MsgBox"请重新输入!"

E．nd If

E．nd Sub

A．Text

B．SelText

C．Control

D．Form