题目内容
（请给出正确答案）
有如下程序： Private Sub command1_Click() a=1：b=1 Print"a="；a；"，b="；b Call mult((a)，b) Print "a="；a；"，b=";b 语句 End Sub Sub mult(x，y) K=2 * k y=3 * k Print "x="；x；"，y="；y End Sub 运行后，标有“语句”的Print语句的输出结果是【 】。
如果结果不匹配，请 联系老师 获取答案
更多“有如下程序： Private Sub command1_Cl…”相关的问题
有如下的程序片段，该程序片段的执行完后，共执行循环______次。 Private Sub command1_ Click() total =0 Counter = 1 do Print Counter total = total + Counter Print total, "111" Counter = Counter + 1 if total ＞= 10 then exit do End if Loop while Counter ＜= 10 End Sub
设有如下程序： Private Sub Form_Click() a=325456 Print Format(Int((a*10+0.5))/10，"000，000.00") End Sub 程序运行后，单击窗体，输出结果为【 】。
设有如下程序 Private Sub Search(a()As Variant，ByVa1 key As Variant，index%) Dim I% For I=LBound(A)To UBound(a) If key=a(1) Then index=I Exit Sub End If Next I index=I End Sub Private Sub Form_Load() Show Dim b() As Variant Dim n As Integer b = Array(1,3,5,7,9,11,13,15) Call Search(b, 11 ,n) Print n End Sub程序动行后,输出结果是【 】。
执行如下程序段后，intsum的值为【 】。 Private Sub Command1_Click() sum=0 For i=1 To 18 Step 2 For j=2 To 6 If(i Mod j)＜＞0 Then sum=sum+j Next Next Print sum End Sub
在窗体上面有一个列表，然后编写如下两个事件过程： Private Sub Form_Click() List1.RemoveItem 1：List1.RemoveItem2 List1.RemoveItem 3 End Sub Private Sub Form_Loab() List1.AddItem "ItemA ":List1.AddItem "Item B" List1.AddItem"Item C"：List1.AddItem "ItemD" List1.AddItem "ItemE" End Sub 运行上面的程序，然后单击窗体，列表框中显示的项目是【 】。
窗体上有一个命令按钮Conunand1，其Click事件过程如下。
Private Sub Command1_Click()
Dim c As String，n As Integer
c="ABCDEF"
For n=1 To 5 Step 2
Debug.Print______
Next n
End Sub
程序运行后，单击命令按钮，要求在立即窗口输出如下内容，则程序的空白处应填入( )。
F
DEF
BCDEF
A．left(c，n) B．right(n，C) C．Right(c，n)D．mid(c，n，n)
在窗体上画一个文本框和一个命令按钮，如下图所示。
.jpg){kind=spacer}
编写如下程序： Private Sub Form_Load() Show Text1.Text=" " Form1.KeyPreview=False Text1.SetFocus End Sub Private Sub Command1_Click() KeyPreview=Not KeyPreview Print End Sub Private Sub Form_KeyPress(KeyAscii As Integer) Print UCase(Chr(KeyAscii+1))； End Sub Private sub Text1_KeyPress(KeyAscii As Integer) Print Chr(KeyAscii+2) KeyAscii=0 End Sub 阅读以上程序，理解每个事件过程的操作，然后填空。 ①程序运行后，直接从键盘上输入abc，程序输出的结果是【 】。 ②程序运行后，单击一次“命令按钮1”，然后从键盘上输入abc，程序输出的结果是【 】。
阅读如下程序； Private Sub Form. Click() msg1$=“继续吗？” msg2$=“操作对话框” r=MsgBox(msg1$，vbYesNo OrvbDefaultButton2，msg2$) End Sub 程序运行后，单击窗体，将产生一个信息框。此时如果直接按回车键，则相当于用鼠标单击信息框中的【 】按钮。
Private Sub Command1_Click（）
Dim x As Integer
Static y As Integer
x=10
y=5
Call f1（x,y）
Print x,y
End Sub
Private Sub f1（ByRef x1 As Integer, y1 As Integer）
x1=x1+2
y1=y1+2
End Sub
程序运行后，单击命令按钮，在窗体上显示的内容是（）。
A.10 5
B.12 5
C.10 7
D.12 7
A.7654
B.6543
C.5432
D.4321
