已知Rt△ABC中，∠C=90°，CH⊥AB于点H，AC=3，CH=2，求BC的长．
Private Sub Command1Click( )
Dim n As Integer
Dim a(1 To 10) As Integer
n = Val(Text1.Text)
s = 1
For i = 1 To n
s = s * i
a(i) = s
List1.AddItem Str(a(i))
Next i
End Sub
△ABC中, ∠A，∠B，∠C所对的边分别为a, b, c.若a=3,b=4,∠C=60°, 则边 c 的值等于（ ）
引发伦理问题的生物技术包括（ ）
①克隆人
②设计试管婴儿
③基因身份证
④转基因生物．
