下列程序运行时输出的结果是( )。 Private Sub Form_Click() Dima a=Array("天天向上"，"清华大学"，"天上人间"，"程序设计") forI=Lbound(a，1) to Ubound(a，1)ifleft(a(i)，1)="天"then print a(i)； nextI End Sub

A．天天向上

B．天天向上天上人间

C．出错信息

D．天天向上清华大学天上人间程序设计

近年来，我国各级党组织和政府部门积极开展“进万家门，知万家晴，解万家难，暖万家心”的送温暖工程，帮助困难群众和家庭解决实际困难。送温暖工程[ ]

A．体现了社会主义的本质要求

B．实践了党的“三个代表”重要思想

C．坚持了改革开放

D．维护了社会的稳定