题目内容
（请给出正确答案）
提问人：网友zhengyytt
发布时间：2022-01-07
[单选题]
下面程序执行的结果是()Privatesubcommand1_click()a="135":b="246"c=a+bPrintcendsub
A.135
B.246
C."381"
D.135246
参考答案
A、18
B、7
C、14
D、27
网友您好，请在下方输入框内输入要搜索的题目：
搜题
题目内容
（请给出正确答案）
参考答案
更多“下面程序执行的结果是（)Privatesubcommand1_click（)a="135":b="246"”相关的问题
第1题
如下程序的运行结果是（） Sub Command1_Click ( ) MsgBox (p1(3.0, 7)) End Sub Public Function p1! (ByVal x!, ByVal n%) If n=0 Then p1=1 Else If n Mod 2=1 Then p1=x*p1(x, n\2) Else P1=p1(x, n\2) \x End if End if End Function
第2题
运行下列程序，结果是（ ）。 Private Sub Command32_click() f0= 1：f1= 1：k= 1 Do While k< = 5 f= f0+ f1 f0= f1 f1= f k= k+ 1 LoopMsgBox ”f=” ＆ f End Sub。
A、f=5
B、f=7
C、f=8
D、f=13
第3题
运行下列程序,结果是Private Sub Command32_Click() f0=1:f1=1:k=1 Do While k<=5f=f0+f1f0=f
运行下列程序，结果是
点击查看答案
Private Sub Command32_Click()
f0=1:f1=1:k=1
Do While k<=5
f=f0+f1
f0=fl
f1=f
k=k+1
Loop
MsgBox“f=”＆f
End Sub
A．f=5
B．f=7
C．f=8
D．f=13
第4题
（32）运行下列程序，结果是
Private Sub Command32_Click()
f0=1:f1=1:k=1
Do While k<=5
f=f0+f1
f0=f1
f1=f
k=k+1
Loop
MsgBox "f="&f
End Sub
A）f=5
B）f=7
C）f=8
D）f=13
第6题
1. 设有如下事件过程： Private Sub Form_Click() Sum＝0 For k＝1 To 3 If k<＝1 3 6 9 then x＝1 elseif x＝2 x＝3 else x＝4 end if sum＝sum＋x next k print sum end sub 程序运行后，单击窗体，输出结果是( )。 a. b. c. d.> A、A
B、B
C、C
D、D
第7题
1. 设窗体上有一个列表框控件List1，含有若干列表项。以下能表示当前被选中的列表项内容的是( )。 A) List1.List B) List1.ListIndex C) List1.Text D) List1.Index bel1.Caption＝Text1.Text Label1.Caption＝Str(Len(Text1.Text))
A、A
B、B
C、C
D、D
第8题
1. 窗体上有1个名称为Command1的命令按钮，事件过程如下： Private Sub Command1_Click() Dim x%， y%， z% x＝InputBox("请输入第1个整数") y＝InputBox("请输入第2个整数") Do Until x＝y If x>y Then x＝x－y Else y＝y－x Loop Print x End Sub 运行程序，单击命令按钮，并输入2个整数169和39，则在窗体上显示的内容为( )。 A. 11 B. 13 C. 23 D. 39
A、A
B、B
C、C
D、D
第9题
1. 窗体上有名称为Command1的命令按钮，名称分别为List1、List2的列表框，其中List1的MultiSelect属性设置为1(Simple)，并有如下事件过程： Private Sub Command1_Click() For i＝0 To List1.ListCount－1 If List1.Selected(i)＝True Then List2.AddItem Text End If Next End Sub 上述事件过程的功能是将List1中被选中的列表项添加到List2中。运行程序时，发现不能达到预期目的，应做修改，下列修改中正确的是( )。 A) 将For循环的终值改为List1.ListCount B) 将List1.Selected(i)＝True 改为List1.List(i).Selected＝True C) 将List2.AddItem Text 改为List2.AddItem List1.List(i) D) 将List2.AddItem Text 改为List2.AddItem List1.ListIndex
A、A
B、B
C、C
D、D
第10题
1. 窗体上有名称分别为Text1、Text2的文本框，名称为Command1的命令按钮。运行程序，在Text1中输入"FormList"，然后单击命令按钮，执行如下程序： Private Sub Command1_Click() Text2.Text＝UCase(Mid(Text1.Text， 5， 4)) End Sub 在Text2中显示的是( )。 A) form B) list C) FORM D) LIST
A、A
B、B
C、C
D、D
