在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click（)X=0Do Until x=-1 a

相似题目

• 在窗体上画两个文本框（其Name属性分别为Text1和Text2）和一个命令按钮（其Name属性为Command1），然后编写如下的事件过程： https://assets.asklib.com/images/image2/2017110811322251127.jpg 程序执行后，单击命令按钮，在两个文本框中显示的值分别为（）

  A . 1和0 B . 2和72 C . 3和50 D . 4和168

  查看最佳答案

• 在窗体上画一个名称为Command1的命令按钮，一个名称为Label1的标签，然后编写如下事件过程： https://assets.asklib.com/images/image2/2018080114161482449.jpg 程序运行后，单击命令按钮，则标签中显示的内容是（）

  A . 5 B . 15 C . 20 D . 25

  查看最佳答案

• 设有如下通用过程：PublicFunctionf(xAsInteger)DimyAsIntegerx=30y=8f=x*yEndFunction在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程PrivateSubCommand1_Click()StaticxAsIntegerx=15y=6y=f(x)Printx;yEndSub程序运行后，如果单击命令按钮，则在窗体上显示的内容是_____。

  查看最佳答案

• 在窗体上画1个命令按钮和1个通用对话框，其名称分别为Command1和CommonDialog1，然后编写如下事件过程：

  Private Sub Command1_Click（） CommonDialog1.______="打开文件" CommonDialog1.Filter="All Files（*.*）|*.*" CommonDialog1.InitDir="c:\" CommonDialog1.ShowOpen End Sub 该程序的功能是，程序运行后，单击命令按钮，将显示“打开”文件对话框，其标题是“打开文件”，在“文件类型”栏内显示“AIl Files（*.*）”，并显示C盘根目录下的所有文件，请填空。

  查看最佳答案

• 在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框，然后编写如下事件过程：

  Private Sub Command1_Click（） n = Val（Text1.Text） For i = 2 To n For j = 2 To sqr（i） If i Mod j = 0 Then Exit For Next j If j ＞ Sqr（i） Then Print i Next i End Sub 该事件过程的功能是（）。 A．输出n以内的奇数 B．输出n以内的偶数 C．输出n以内的素数 D．输出n以内能被j整除的数

  查看最佳答案

• 在窗体上画一个命令按钮，名称为Command1，然后编写如下事件过程；Private Sub Command1_Click（)a $

  在窗体上画一个命令按钮，名称为Command1，然后编写如下事件过程； Private Sub Command1_Click() a $="software and hardware" b $=Right(a$, 8) c $=Mid(a$, 1, 8) MsgBox a$, ,b$,c$,1 End Sub 运行程序，单击命令按钮，则在弹出的信息框的标题栏中显示的是______。 A．software and hardware B．software C．hardware D．1

  查看最佳答案

• 在窗体上画一个名称为Co mmand1的命令按钮，然后编写如下程序：Di m（）

  A．输出0 B．输出25 C．输出45 D．无任何输出

  查看最佳答案

• 在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click（） Next i Print Dec End Sub 程序功能为:单击命令按钮,将产生一个输入对话框,此时如果在对话框中输入一个二进制数,并单击“确定”按钮,则把该二进制数转换为等值的十进制数。这个程序不完整,应在横线处填入的内容是

  A．Left B．Right C．Val D．Mid

  查看最佳答案

• 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Option Base 1Private Sub Comma

  在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Option Base 1 Private Sub Command1_Click() Dim a a=Array(1,2,3,4,5) For i=1 To UBound(a) a(i)=a(i)+i-1 Next Print a(3) End Sub 程序运行后，单击命令按钮，则在窗体上显示的内容是()。 A．4 B．5 C．6 D．7

  查看最佳答案

• 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程: Private Sub Command1_Click（)

  在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程: Private Sub Command1_Click() c = 1234 c1 = Trim(Str(C)) For i = 1 To 4 Print_____ Next End Sub 程序运行后，单击命令按钮，要求在窗体上显示如下内容 1 12 123 1234 则在下划线处应填入的内容为 A．Right(c1,i) B．Left(c1,i) C．Mid(c1,i,1) D．Mid(c1,i,i)

  查看最佳答案

• 在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框，然后编写如下事件过程：Priva

  在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框，然后编写 如下事件过程： Private Sub Command1_Click() n = Val(Text1.Text) For i = 2 To n For j = 2 To Sqr(i) If i Mod j=0 Then Exit For Next j If j＞Sqr(i)Then Print i Next i End Sub 该事件过程的功能是 A．输出n以内的奇数 B．输出n以内的偶数 C．输出n以内的素数 D．输出n以内能被j整除的数

  查看最佳答案

• 在窗体上画一个通用对话框，其名称为CommonDialog1，然后画一个命令按钮，并编写如下事件过程：priva

  在窗体上画一个通用对话框，其名称为CommonDialog1，然后画一个命令按钮，并编写如下事件过程： private Sub Command1_Click() CommonDialog1.Flags=cdl0FNHideReadOnly CommonDialog1.Filter="All Files(*.*)|*.*|Text Files"&_ "(*.txt)|*.txt|Batch Files(*.bat)|*.bat" CommonDialog1.Filterlndex=2 CommonDialog1.ShowOPen MsgBox CommonDialog1.filename End Sub 程序运行后，单击命令按钮，将显示一个“打开”对话框，此时在“文件类型”框中显示的是______。 A．All Files(*.*) B．Text Files(*.txt) C．Batch Files(*.bat) D．不确定

  查看最佳答案

• 在窗体上画二个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：

  <img src='https://img2.soutiyun.com/ask/uploadfile/2586001-2589000/23e1201b59bd107c459be2a1be30957d.jpg' /> 程序运行后，单击命令按钮，在文本框中显示的值是 A．2 B．3 C．4 D．5

  查看最佳答案

• 在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click()x=0Do Until x=-1a=InputBox("请输入A的值")a=Val(

  A． b=InputBox("请输入B的值") b=Val( B． C．14 D．15

  查看最佳答案

• 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click（)

  在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() For n=1 To 20 If n Mod 3＜＞0 Then in=m+n/3 Next Print n End Sub 程序运行后，如果单击命令按钮，则窗体上显示的内容是 A．15 B．18 C．21 D．24

  查看最佳答案

• 在窗体上画—个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_click（) Di

  在窗体上画—个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_click() Dim a As Integer,s As Integer a=8 s=1 Do s=s+a a=a-1 Loop While a＜=0 Print s；a End Sub 程序运行后，单击命令按钮，则窗体上显示的内容，是 ______。 A．79 B．340 C．97 D．死循环

  查看最佳答案

• 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click（)c=

  在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() c=“ABCD” For n=l to 4 Print______ Next End Sub 程序运行后，单击命令按钮，要求在窗体上显示如下内容： D CD BCD ABCD 则在______处应填入的内容为 A．Left(c，n) B．Right(c，n) C．Mid(c，n，1) D．Mid(c，n，n)

  查看最佳答案

• 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：PrivatSuCommand1_Click（）。程序运行时，单击Command1，则在窗体上输出的结果是（）

  A．分支1 B．分支2 C．分支3 D．无任何输出

  查看最佳答案

• 假定有以下函数过程：在窗体上画一个命令按钮，然后编写如下过程：程序结束后单击命令按钮，如果在输入对话框中输入字符串“abcdefg”，单击确定按钮后在窗体上输出的结果为（）

  A．ABCDEFG B．abcdefg C．GFEDCBA D．gfedcba

  查看最佳答案

• 在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Command1_Click（）

  A．Right B．Left C．Val D．Mid

  查看最佳答案

• 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click（)n=5f=1s=0For i=1 To n f= 【12】 s=s+fNextPrint s End Sub 该事件过程的功能是计算的值。请填空。

  查看最佳答案

• 在窗体上画一个通用对话框，其名称为CommonDialog1，然后画一个命令按钮，并编写如下事件过程： Private Sub Command1_Click（) CommonDialog1.Filter="All Files（*.*)|*.*|Text Files（*.txt)|*.txt_|Batch Files （*.bat)|*.bat" CommonDialog1.FilterIndex=

  查看最佳答案

• 在窗体上画一个命令按钮，然后编写如下事件过程，结果为（）

  A．字符串“123+321” B．字符串“444” C．数值“444” D．空白

  查看最佳答案

• 在窗体上画一个文本框，然后编写如下事件过程：程序运行时，在文本框中输入456，然后单击窗体，在输入对话框中输入123，单击“确定”按钮后，在窗体上显示的内容为（）

  A．123 B．456 C．579 D．123456

  查看最佳答案