下列有关数据库的描述正确的是

在运行阶段，要在文本框Text1获得焦点时选中文本框中所有内容，对应的事件过程是
Ａ) Private Sub Text1_GotFocus()
Text1.SelStart=0
Text1.SelLength=Len(Text1.Text)
End Sub
Ｂ) Private Sub Text1_LostFocus()
Text1.SelStart=0
Text1.SelLength=Len(Text1.Text)
End Sub
Ｃ) Private Sub Text1_Change()
Text1.SelStart=0
Text1.SelLength=Len(Text1.Text)
End Sub
Ｄ) Private Sub Text1_SetFocus()
Text.SelStart=0
Text1.SelLength=Len(Text1.Text)
End Sub

窗体上有Text1、Text2两个文本框及一个命令按钮Command1，编写下列程序：
Dim y As Integer
Private Sub Command1_Click()
Dim x As Integer
x=2
Text1.Text=Fun2(Fun1(x),y)
Text2.Text=Fun1(x)
End Sub
Private Function Fun1(x As Integer) As Integer
x=x+y:y=x+y
Fun1=x+y
End Function
Private Function Fun2(x As Integer，y As Integer) As Integer
Fun2=2*x+y
End Function
当单击1次和单击2次命令按钮后，文本框Text1和Text2内的值分别是
　　Ａ) 2 4
2 4
　Ｂ) 2 4
4 8
　Ｃ) 10 10
58 58
Ｄ) 4 4
8 8