设有如右图所示的窗体和下列程序：

Private Sub Command1_Click() Text1.Text="Visual Basic" End Sub Private Sub Text1_LostFocus() If Text1.Text＜＞"BASIC" Then Text1.Text=" " Text1.SetFocus End If End Sub程序运行时，在Text1文本框中输入“Basic”(如图所示)，然后单击Command1按钮，则产生的结果是( )。

A．文本框中无内容，焦点在文本框中

B．文本框中为"Basic"，焦点在文本框中

C．文本框中为"Basic"，焦点在按钮上

D．文本框中为"Visual Basic"，焦点在按钮上

如图所示，不旋转的铝件在强大压力作用下顶住高速旋转的铜件，通过      的方式使两者接触处温度急剧升高，内能增大，这样铜和铝接触处的分子相互渗透，从而使两者紧密结合在一起，这就是先进的“旋转焊接”技术。