[填空题]在第6题程序执行结束后，屏幕上显示的内容是______。

[填空题]在第6题程序执行结束后，屏幕上显示的内容是 【7】 。

[填空题]在第6题程序执行结束后，屏幕上显示的内容是 【8】 。

[填空题]在第6题程序执行结束后，屏幕上显示的内容是______。

[填空题]当执行下面的程序时，程序中的第一条命令显示的内容为 【12】 ，第二条命令显示的内容 【13】 SET TALK OFF A=4 B=2 C=1 DO WHILE C＞0 A=A*B B=B+A IF A＞50 A=A-5*C C=C-1 A，B ELSE STORE B-5*C TO B N=B ENDIF ENDDO "N="，N

[填空题]

执行下面程序,单击命令按钮CmdRun后,图片框Pic1第一行显示内容是（）,第二行显示内容是（）,最后一行显示内容是（）。
Option Explicit
Private Sub CmdRun_Click（　）
Dim N As Integer,M As Integer
M=135
N=8
Pic1.Print Fun(M,N)
EndSub
Private Function Fun(ByVal N As Integer,ByVal R As Integer)As String
Dim L As Integer
If N
Fun=N
Else
L=N/R
Fun=Fun(L,R)
Fun=Fun & N Mod R
End If
Pic1.Print N
End Function

[填空题]

执行下面程序,单击命令按钮CmdRun后,文本框Text1中第一行显示的内容是（） , 第二行显示的内容是（）。第三行显示的内容是（）。
Option Explicit
Private Sub CmdRun_Click（　）
Dim S As String,Subs As String,P As Integer
S="100101 010110 110101"
Do
P=InStr(S," ")
If P<>0 Then
Subs=Left(S,P-1)
Else
Subs=S
End If
S=Mid(S,P+1)
Text1=Text1 & Complement(Subs) & vbCrLf
Loop Until Len(S)=0 Or P=0
End Sub
Private Function Complement(S As String)As Integer
Dim P As Integer,L As Integer
L=Len(S)
If Left(S,1)=1 Then
Complement=-32
End If
P=1
Do Until P=0
P=InStr(P+1,S,"1")
If P<>0 Then
Complement=Complement+2^(L-P)
End If
Loop
End Function

[填空题]上题子程序执行后，屏幕显示为 【7】 。

[填空题]假设在当前盘当前目录下有一个可执行程序USER.EXE。现要执行该程序，并要求在执行过程中将显示输出的结果信息存入当前盘当前目录的文件OUT.DAT中，则完整的DOS命令为【 】。