A . 运行程序
B . 响应事件
C . 设置属性
D . 使用控件
[单选题]执行如下程序代码后,C的值是()A.0B.1C.-1D.死循环
[单选题]单击命令按钮时,下列程序代码的执行结果为( )。 Private Function PickMid(xStr As String)As Sting Dim tempStr As String Dim strLen As Integer TempStr=" " StrLen=Len(xStr) i=1 Do While i<=strLen/2 tempStr=tempStr+Mid(xStr,i,1)+Mid(xStr,strLen-i+1,1) i=i+1 Loop PickMid=temp
[单选题]单击窗体时,下列程序代码的执行结果为______ 。 Private Sub Test (x As Integer) x=x*2+1 If x < 6 Then Call Test(x) End If x-x*2+1 Print x; End Sub Private Sub Command1_ Click () Test 2 End SubA.23 47B.5 11C.10 22D.23 29
[单选题]单击命令按钮时,下列程序代码的执行结果为______ 。Public Function MyFune(m As Integer,n As Integer) As Integer Do While m<>n Do While m>n m=m-n Loop Do While m<n n=n -m Loop Loop MyFunc=mEnd FunctionPrivate Sub Command1_Click() Print MyFunc(24, 18)End SubA. 2B.4C.6D.8
[单选题]单击命令按钮时,下列程序代码的执行结果为______。 Private Function PickMid(xStr As String) As String Dim tempStr As String Dim strLen As Integer tempStr=“” strLen=Len(xStr) i=1 Do While i<=strLen/2 tempStr=tempStr+Mid(xStr,i,1)+Hid(xStr,strLen-i+1,1) i=i + 1 Loop PickMid=
[单选题]单击命令按钮时,下列程序代码的执行结果为______。 Private Function FirProc (x As Integer,y As Integer,z As Integer) FirProc=2*x+y+3*z End Function Private Function SecProc(x As Integer,y As Integer,z As Integer) SecProc=FirProc(z,x,y)+x End Function Private Sub Command1_C
[单选题]单击命令按钮时,下列程序代码的执行结果为( )。 Private Function FirProc(x As Integer,y As Integer,z As Integer) FirProc=2*x+y+3*z End Funcfion Private Function SecProc(x As Integer,y As Integer,z As Integer) SecProc=FirProc(z,x,y)+x End Funcfion Private Sub Command1_Click
[单选题]记时器控件能有规律地以一定时间间隔触发()事件,并执行时间过程中的程序的程序代码。A . timerB . timer1C . enabledD . interval
[单选题]单击命令按钮时,下列程序代码的执行结果为( )。 Private Sub Procl(nAs Integer,ByValmASInteger) n=nMod 10 m=m/10 End Sub PrivateSubCommandl_Click() Dimx As Integer Dimy As Integer x=12 y=34 CallProcl(x,y) Printx;y End SubA.12 34B.2 34C.2 3D.12 3
[单选题]单击命令按钮时,下列程序代码的执行结果为______。 PubUc Sub Procl(n As Integer,By Valm As InteSg) n=n Mpd 10 m=m/10 End Sub PHvate Sub Commandl Click() Dim X As Inte9er,y As Intger x=12:y=34 Call Procl(x,y) Print x;y End SubA.12 34B.2 34C.2 3D.12 3