在数据库的三级模式体系结构中，模式与内模式之间的映像（模式/内模式)实现了数据库的【 】独立性。

下列程序的功能是求出所有的1～100之间的孪生素数。孪生素数是指两个素数的差为2，如3和5，11和13等，请填空。 Private Sub Form_Click() Dim i As Integer For i=3 To 97 Step 2 If【 】Then Print i，i+2 End If Next i End Sub Public Function prime(ByVal n As Integer)As Boolean Dim i As Integer For i=2 To n-1 If【 】Then Exit For End If Next i If i=n Then prime=True Else prime=False End If

请帮忙给出正确答案和分析，谢谢！

下列程序的功能是：单击窗体时将求出随机生成的10个两位数中的最大数及其下标，请填空。 Option Base 1 Private Sub Form_Click() Dim a(10) As Integer，i As Integer Dim max As Integer，max_i As Integer Randomize For i=1 To 10 a(i)=【 】 Next i max=a(1)：max_i=1 For i=1 To 10 If【 】Then max=a(i) max_i=i End If Next i Print max,max_i End Sub

请帮忙给出正确答案和分析，谢谢！

下面程序的功能是：求出所有的三位数，其各位数字的立方和等于该数。如： 153=13+53+33。 Option Explicit Private Sub Form_Click() Dim x1 As Integer,x2 As Integer,x3 As Integer 【 】 For i=100 To 999 x=i x1=【 】个位数字 x2=x\10 Mod 10 x3=x\100 If【 】Then Print i End If Next i End Sub

请帮忙给出正确答案和分析，谢谢！

在窗体上有5个控件：一个名称为Text1的文本框控件，用来显示文本；两个名称分别为Check1(设置显示文本的下划线)和Check2(设置显示文本的加粗)的复选框；两个名称分别为Option1(设置字的大小为12磅)和Option2(设置字的大小为16磅)的单选按钮。当Check1被选中时，文本框中显示的字体加下划线，当Option2被选中时，文字框中显示的字体大小为16磅，程序运行时的界面如图20-5所示。请填空。

Private Sub Check1_Click() If Check1．Value=【 】Then Text1．FontUnderline=True Else Text1．FontUnderline=False End If End Sub Private Sub Option2_Click() Text1．【 】 End Sub

请帮忙给出正确答案和分析，谢谢！