单项选择题
单击命令按钮,下列事件过程的执行结果为( )。 Private Sub Command1_Click( ) Dim x As Integer, y As Integer x=40:y=72 Call PtoP(x, y) Print x; y End Sub Public Sub PtoP(Byval n AS Integer, ByVal m Aa Integer) n = n \ 10+2 m = m \ 10+2 End Sub
A. 0 8
B. 40 72
C. 4 50
D. 78 50
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
单项选择题
设有如下通用过程:Public Function Fun(xStr As String)As StringDim tStr As String,strL As IntegerstrL=Len(xStr)Do While i<=strL/2tStr=tStr&Mid(xStr,i,1)&Mid(xStr,strL-i+1,1)i=i+1Loop在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮。然后编写如下的事件过程:Private Sub Command1_Click()Dim S1 As StringTextl.Text=UCase(Fun(S1))程序运行后,单击命令按钮,则Textl中显示的是【 】
A.ABCDEF
B.abcdef
C.AFBECD
D.DEFABC
点击查看答案&解析
单项选择题
在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Command1_Click( )Dim m As Integer,n As Integer,p As Integerm=3:n=5:p=OCall Y(m,n,p)Print Str(p)End SubSub Y(ByVal i As Integer,ByVal j As Integer,k As Integer)k=i + jEnd Sub程序运行后,如果单击命令按钮,则在窗体上显示的内容是( )。
A.4
B.6
C.8
D.10
点击查看答案&解析
相关试题
有如下程序:Private Sub Commandl_Clic...
设在窗体上有个文本框,然后编写如下的事件...
在窗体上画一个名称为Label1的标签,然后...
单击命令按钮时,下列程序的执行结果为( ...
设在窗体上有个文本框,然后编写如下的事件...