男，30岁。2个月前上腹部撞伤，近日来上腹部持续性疼痛，且感腹部逐渐膨起，餐后加重，并放射至腰背部，恶心，呕吐。体格检查：体温38℃，上腹部偏左明显膨隆，可扪及一边界不清、触痛性肿块，直径约10cm，搏动不明显，固定。

最可能的诊断是：（）.

A.横结肠系膜血肿

B.胰腺假性囊肿

C.肾盂积水伴感染

D.肝包膜下血肿

E.脾包膜下出血

在窗体上有一个文本框控件，名称为Text1。同时，窗体加载时将设置计时器间隔为1秒，计时器触发事件过程实现在Text1文本框中动态显示当前日期和时间。请将以下程序补充完整。
Private Sub Form_Load()
Me．TimerInterval=1000
End Sub
Private Sub______
Me! texl=Now()
End Sub