单项选择题

单击命令按钮时，下列程序的执行结果是 Private Sub Command1_Click() Dim a As Integer，b As Integer，c As Integer 　　a=3:b=4:c=5 　　Print SecProc(c,b,a) End Sub Function FirProc(x As Integer，y As Integer，z As Integer) 　　FirProc=2*x+y+3*z End Function Function SecProc(x As Integer，y As Integer，z As Integer) 　　SecProc=FirProc(z,x,y)+x End Function

A．20
B．22
C．28
D．30
<上一题 目录 下一题>
热门 试题

填空题
需求分析的最终结果是产生______。
单项选择题
下列程序的执行结果为 Private Sub Command1_Click() Dim FirStr As String FtrSt= abcdef Print Pat(FirStr) End Sub Private Function Pat(xStr As String)As String Dim tempStr As String，strLen As Integer tempStr= strLen=Len(xStr) i=1 Do While i＜=Len(xStr)-3 tempStr=tempStr+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
相关试题