网友您好, 请在下方输入框内输入要搜索的题目:
题目内容
(请给出正确答案)
单击命令按钮时,下列程度段的执行结果为( )。 Private Sub Command1_Click() Dim a As Integer, b As Integer, c As Integer a=2:b=4:c=6 Call S1(a,B) Print "a="; a; "b="; b; "c="; c Call S2(a,B) Print "a ="; a; "b ="; b; "c="; c; End Sub Private Sub S1(x As Integer, y As Integer) Dim c As Integer x=2*x:y=y+2:c=x+y End Sub Sub S2(x As Integer, ByVal y As Integer) Dim e As Integer x=2*x:y=y+2:c=x+y End Sub
A.a=4 b=6 e=6 a=4 b=6 e=6
B.a=8 b=6 c=6 a=8 b=6 c=6
C.a=4 b=6 e=6 a=8 b=6 e=6
D.a=8 b=6 c=6 a=4 b=6 c=6
参考答案
更多 “ 单击命令按钮时,下列程度段的执行结果为( )。 Private Sub Command1_Click() Dim a As Integer, b As Integer, c As Integer a=2:b=4:c=6 Call S1(a,B) Print "a="; a; "b="; b; "c="; c Call S2(a,B) Print "a ="; a; "b ="; b; "c="; c; End Sub Private Sub S1(x As Integer, y As Integer) Dim c As Integer x=2*x:y=y+2:c=x+y End Sub Sub S2(x As Integer, ByVal y As Integer) Dim e As Integer x=2*x:y=y+2:c=x+y End SubA.a=4 b=6 e=6 a=4 b=6 e=6B.a=8 b=6 c=6 a=8 b=6 c=6C.a=4 b=6 e=6 a=8 b=6 e=6D.a=8 b=6 c=6 a=4 b=6 c=6 ” 相关考题
考题
应用程序窗体的名称属性为Frm1,窗体上有一个命令按钮,其名称属性为Cmd1,单击窗体和命令按钮的事件过程名分别为______。A.form_ Click() Command1_Click()B.Frm1_ Click() Command1_ Click()C.form_ Click() Cmd1_ Click()D.Frm1_ Click() Cmd1_ Click()
考题
若看到程序中确以下事件过程,则可以肯定的是,当程序运行时( )。 Private Sub Click—MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single) Print"VB Program" End SubA.用鼠标左键单击名称为“Command1”的命令按钮时,执行此过程B.用鼠标左键单击名称为“MouseDown”的命令按钮时,执行此过程C.用鼠标右键单击名称为“MouseDown”的命令按钮时,执行此过程D.用鼠标左键或右键单击名称为“Click”的命令按钮时,执行此过程
考题
若看到程序中确以下事件过程,则可以肯定的是,当程序运行时( )。Private Sub Click—MouseDown(Button As Integer,Shift As Integer,X As Single,YAs Single)PrintVB ProgramEnd SubA.用鼠标左键单击名称为“Command1”的命令按钮时,执行此过程B.用鼠标左键单击名称为“MouseDown”的命令按钮时,执行此过程C.用鼠标右键单击名称为“MouseDown”的命令按钮时,执行此过程D.用鼠标左键或右键单击名称为“Click”的命令按钮时,执行此过程
考题
单击命令按钮时,下列程序段的执行结果为( )。 Public Sub Procl(n As Integer,ByVal m As Integer) n=n Mod 10 m=m\10 End Sub Private Sub Command1_Click() Dim x As Integer,y As Integer x=12;y=34 Call Procl(x,y) Print x;y End SubA.12 34B.2 34C.2 3D.12 3
考题
单击命令按钮时,下列程序段的执行结果为( )。 Private Sub Command1_Click() Dim FirstStr As String FirstStr="abcdef" Print PickMid(FirstStr) End Sub Private Function PickMid(xStr As String)As String Dim tempStr As String,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=tempStr End FuncfionA.abcdefB.fedC.fedcbaD.defabc
考题
单击命令按钮,下列程序段的输出结果为______。 Private Sub Command1_Click() Dim n As Integer n = 5 While n <= 10 n = n + 2 Print n; Wend End SubA.5 7 9 11B.6 8 10C.7 9 11D.6 8 10 12
考题
下列关于图层设置的说法正确是()。A.可以选择“格式”-“图层”命令来执行B.可以单击“视图”选项卡-“选项板”面板中的“图层特性”命令按钮来执行C.可以单击“默认”选项卡-“选项板”面板中的“图层特性”命令按钮来执行D.可以单击“图层”工具栏中“图层特性”命令按钮来执行
热门标签
最新试卷