图片按钮的【 】属性用来设置命令按钮无效时显示的图形。

下列程序的功能是：当发生窗体的单击事件时，求出3～1000之间的所有素数的和以及所有能被3和5整除的数的和(素数是指只能被1和它本身整除的数)，并在窗体上把这两个和显示出来。 Private Sub Form_Click() Dim s1 As Long，s2 As Long Dim i As Integer For i=3 To 1000 If prime(i) Then s1=s1+i Else If【 】Then s2=s2+i End If Next i Print s1，s2 End Sub Public Function prime(ByVal n As Integer)As Boolean Dim j As Integer For j=2 To n-1 If n Mod j=0 Then Exit For End If Next j If j=n Then 【 】 Else prime=False End If End Function

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

下列程序的功能是：单击窗体时将随机生成20个两位数依次赋值给一个由20个元素组成的数组，然后把数组反序存放，再输出。 Option Base 1 Private Sub Form_Click() Dim a(20) As Integer,i As Integer Dim t As Integer,j As Integer Randomize For i=1 To 20 a(i)=10+Int(90*Rnd) Print a(i)； Next i Print i=1：【 】 Do While i＜j t=a(i)：【 】：a(i)=t i=i+1：j=j-1 Loop For i=1 To 20 Print a(i)； Next i Print End Sub

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

在窗体上画一个列表框、一个命令按钮和一个标签，其名称分别为List1、Command1和Labe11，通过属性窗口把列表框中的项目设置为：“第一个项目”、“第二个项目”、“第三个项目”、“第四个项目”。程序运行后，在列表框中选择一个项目，然后单击命令按钮，即可将所选择的项目删除，并在标签中显示列表框当前的项目数，运行情况如图20-8所示(选择“第三个项目”的情况)。下面是实现上述功能的程序，请填空。

Private Sub Command1_Click() If List1.ListIndex＞=0 Then List1．RemoveItem【 】 LabeCaption=【 】 Else MsgBox“请选择要删除的项目” End If End Sub

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

设C盘根目录下有一文件名为“a1.txt”，若该文件还没有打开，现在要知道它的长度，可使用命令【 】。

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