题目内容

窗体上有1个名称为Command1的命令按钮;1个名称为List1、没有列表项的列表框。编写如下程序: Private Sub Command1_Click() Dim x As String, s As String, temp As String Dim i As Integer x=InputBox("输入字符串","输入") Ifx<>""Then For i=Len(x) To 1 Step-1 s=Mid(x, i, 1) If s<>""Then temp=s+temp Else List1.AddItem temp s="" temp="" End If Next List1.AddItem temp Else MsgBOX"输入内容为空!" End If End Sub 程序运行后,单击命令按钮Command1,并输入“Happy new year”,则在List1中显示的内容为

A. year new Happy
B. Happy new year
C. raey wen yppaH
D. yppaH wen raey

查看答案
更多问题

在窗体上画一个名称为Command1的命令按钮,然后编写如下程序: Private Sub Command1_Click() Static a AS Integer Static b As Integer Cls b=2 b=b+2 a=3+a Print a,b End Sub 程序运行后,三次单击该命令按钮,此时窗体上显示的结果是______。

A. 3 5
B. 6 6
C. 3 3
D. 9 4

设栈S和队列Q的初始状态为空,元素e1,e2,e3,e4,e5和e6依次通过栈S,一个元素出栈后即进入栈队列Q,若6个元素出队的顺序是e2,e4,e3,e6,e5,e1,则栈S的容量至少应该是______。

A. 6
B. 4
C. 3
D. 2

下列程序段中没有错误的是______。

A. x=6For k=5 To 1 Step-1x=x+1NextPrint x
B. x=10While x>5x=x-1LoopPrint x
C. x=10Do While x>5x=x-1End DoPrint x
D. X=6Do While x>5x=x+1Loop Until x=10Print x

在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() m=1:n=1 Print"m="; m; ", n="; n Call subl((m), n) Print "m="; "; ", n="; n End Sub Private Sub subl(x, y) x=x+5 y=y+x Print "x="; x;", y="; y End Sub 程序运行后,单击命令按钮,则窗体上显示的内容是______。

A. m=1, b=1x=6, y=7m=1, b=1
B. m=1, b=1x=6, y=7m=6, b=7
C. m=1, b=1x=6, y=7m=1, b=7
D. m=1, b=1x=6, y=7m=6, b=1

答案查题题库