单项选择题

在窗体上画一个名称为Command1的命令按钮，然后编写如下通用过程和命令按钮的事件过程： Private Funcdonf(m As Integer) If m Mod2=0 Then f=m E1Se f=1 End If End FunCdOn Private Sub Cmnmalldl_CUCk() Dimi As Integer S=0 Fori=1 To 5 s=s+f(i) Next PrintS End Sub 程序运行后，单击命令按钮，在窗体上显示的是( )。

A．11
B．10
C．9
D．8
<上一题 目录 下一题>
热门 试题

单项选择题
下列程序的执行结果为( )。 Ptivate Sub Command_Click() DimFirStr As String FirStr= abcdef PrintPat(FirSb) End Sub PrivateFunctionPat(xStr As String)As String DimtempStr As String，strLen As Integer tempStr= strLen=Len(xStr) i=1 DoWhile i＜=Len(xStr)-3 tempStr=tempSlx+Mid(xStr，i，1)+Mid(xStr，strLen-i+1，1) i=i+1 Loop Pat=tempStr End Function
A．abcdef
B．afbecd
C．fedcba
D．defabc
单项选择题
在窗体上画一个名称为Filel的文件列表框，并编写如下程序： Private Sub FUel_DblClick() x=Shell(File1_ileName，1) End Sub 以下关于该程序的叙述中，错误的是( )。
A．x没有实际作用，因此可以将该语句写为：Call Shell(FileFileName,1)
B．双击文件列表框中的文件，将触发该事件过程
C．要执行的文件的名字通过File1.FileName指定
D．Ffle1中显示的是当前驱动器、当前目录下的文件
相关试题