设窗体上有一个名为Txtl的文本框和一个名为Commandl的命令按钮，并有以下事件过程：

Private Sub Commandl一Click()

x!==Val(Textl．Text)

Select Case x

C．asc Is<-10，Is>=20

Print“输入错误”

C．ase Is<0

Print 20 x

C．ase ls<10

Print 20

C．ase Is=20

Print x+10

E．nd Select

E．nd Sub

程序运行时，如果存文本框中输入一5，则单击命令按钮后的输出结果是

A．5

B．20

C．25

D．输入错误

[单选题]在窗体上添加一个命令按钮(名为Commandl) 和一个文本框(名为Text1) ，并在命令按钮中编写如下事件代码： Private Sub Commandl_click() m＝2.17 n＝Len(Str$(m) +Space(5) ) Me!Text1＝n End Sub 打开窗体运行后，单击命令按钮，在文本框中显示( )。A．5B．8C．9D．10

[单选题]（26）设窗体上有一个名为Text 1的文本框和一个名为Command 1的命令按钮，并有以下事件过程：Private Sub Commandl Click()x！=Val(Text 1.Text)Select Case xC．ase Is＜-10，Is＞=20Prini"输入错误"C．ase Is＜0Print 20-xC．ase Is＜10Print 20C．ase Is＜＝20Print x+10E．nd SelectB．ud Sub程序运行时，如果在文本框中输入一5}则单击命令按钮后

[单选题]（ 31 ）在窗体上有一个命令按钮 Commandl 和一个文本框 Textl ，编写事件代码如下：Private Sub Command1_Click()D．im i,j,xF．or i = 1 To 20 step 2x = 0F．or j = To 20 step 3x = x + 1Next jNext iTextl.Value=Str(x)E．nd Sub打开窗体运行后，单击命令按钮，文本框中显示的结果是A． ） 1B． ） 7C． ） 17D． ） 400

[单选题]窗体上有一个名为Commandl的命令按钮和一个名为Timerl的计时器，并有下面的事件过程：Private Sub Commandl_Click()Timerl．Enabled=TrueE．nd SubPrivate Sub Form_Load()Timerl．Interval=10Timerl．Enabled—FalsePrivate Sub Timerl _Timer()C．ommandl．Left=Commandl．Left+10E．nd Sub程序运行时，单击命令按钮，则产生的结果是A

[单选题]在窗体上有一个名为Text1的文本框和一个名为Command1的命令按钮，并编写有如下事件过程：程序运行后，单击命令按钮，在文本框中显示的是（ ）。A． 2B． 3C． 4D． 5

[单选题]假定窗体上有一个文本框，名为txtl，为了使该文本框的内容能够换行，并且具有垂直滚动条，没有水平滚动条正确的属性设置为A．Txtl.MultiLine=True Txtl.ScrollBars=0B．Txtl.MultiLine=True Txtl.ScrollBars=2C．Txtl.MulfiLine=False Txtl.ScrollBars=0D．Txtl.MultiLine=False Txtl.ScrollBars=3

[单选题]在窗体上有一个命令按钮Commandl和一个文本框Textl，编写事件代码如下：Private SuB cormmandl_Click()D．im i,j,xF．or i=i To 20 step 2x=0F．or j=1 To 20 step 2x=x+1Next jNext iText1.Value=Str(x)E．nd SuB打开窗体运行后，单击命令按钮，文本框中显示的结果是A．1B．7C．17D．400

[单选题]窗体上有一个名为Commandl的命令按钮，并有如下程序：Private Sub Commandl_Click()D．im a(1 0)，x％a(k)=Int(Rnd*90+10)x=x+a(k)Mod 2Print xE．nd Sub程序运行后．单击命令按钮，输出结果是A．10个数中奇数的个数B．l0个数中偶数的个教C．10个数中奇数的累加和D．10个数中偶数的累加和

[单选题]窗体上有一个名为Commandl的命令按钮，并有如下程序：Private Sub Command_Click()D．im a As Integer，b As Integera=8b=12Print Fun(a，b)；a；bE．nd SubPrivate Function Fun(ByVal a As Integer，b As Integer)As Integera=a Mod 5b=b＼5F．un=aE．nd Function程序运行时，单击命令按钮，则输出结果是A．3 3 2B．3 8 2C．

[单选题]窗体上有一个名为Commandl的命令按钮，并有下面的程序：Private Sub Command1_Click()D．im art(5)As IntegerF．or k=1 TO 5arr(k)=kNext kprog art()F．or k=1 To 5Print alT(k)；Next kE．nd subSub prog(a()As Integer)n=UBound(a)F．or i=n To 2 step-1F．or j=1 To n-1if a(j)<a(j+1)Thent=a(