在窗体上有一个列表，然后编写如下两个事件过程： Private Sub Form_Click（) List1.RemoveItem 1:List1.RemoveItem 2 List1RemoveItem 3 End Sub Private Sub Form_Load（) List1.AddItem"ItemA":List1.AddItem"ItemB’P List1.AddItem"ItemC

相似题目

• 在窗体（Name属性为Formal）上画两个文本框（其Name属性分别为Text1和Text2）和一个命令按钮（Name属性为Command1），然后编写如下两个事件过程： https://assets.asklib.com/images/image2/2017110811221976005.jpg 程序运行后，在第一个文本框（Text1）和第二个文本框（Text2）中分别输入123和321，然后单击命令按钮，则输出结果为（）

  A . 444 B . 321123 C . 123321 D . 132231

  查看最佳答案

• 在窗体上画两个文本框（其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

  查看最佳答案

• 在窗体上画一个名称为TxtA的文本框,然后编写如下事件过程:Private Sub TxtA_KeyPress(Keyascii as integer)…End Sub若焦点位于文本框中,则能够触发KeyPress事件的操作是（ ）。

  查看最佳答案

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

  在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() X=0 Do Until x=-1 a=InputBox("请输入A的值") a=Val(A)b=InputBox("请输入B的值") b=Val(B)x=InputBox("请输入x的值") x=Val(x) a=a+b+x Loop Print a End Sub 程序运行后，单击命令按钮，依次在输入对话框中输入5、4、3、2、1、-1，则输出结果为 ______。 A．2 B．3 C．14 D．15

  查看最佳答案

• 在窗体上画一个名称为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

  查看最佳答案

• 在窗体上画一个名称为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

  查看最佳答案

• 在窗体上画一个文本框，然后编写如下事件过程： Private Sub Form_Click( ) x=InputBox(“请输入一个整数”) Print x+Text1.Text End Sub 程序运行时，在文本框中输入456，然后单击窗体，在输入对话框中输入123，单击“确定”按钮后，在窗体上显示的内容为

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

  查看最佳答案

• 在窗体上画一个名称为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

  查看最佳答案

• 在名称为Form1的窗体上绘制一个文本框，其名称为Text1，在属性窗口中把该文本框的MultiLine属性设置为True，然后编写如下的事件过程：

  Private Sub Form. Click() Open "d：\test\smtext1.txt" For Input As 1 Do While Not Line Input 1，aspects whole$=whole$+aspect$+Chr$(13)+Chr$(10) Loop Text1.Text=whole$ Close 1 Open "d：\test\smtext2.txt" For Output As 1 Print 1, ______ Close 1 End Sub 上述程序的功能是，把磁盘文件smtext1.txt的内容读到内存并在文本框中显示出来，然后把该文本框中的内容存入磁盘文件smtext2.txt。

  查看最佳答案

• 在窗体上画一个名称为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．无任何输出

  查看最佳答案

• 设存窗体上有个文本框．然后编写如下的事件过程：上述程序运行后，如果按Shift+F2键，则在文本框中显示的是（）

  A．Alt+F2 B．BBBBB C．随机出几个数 D．文本框内容无变化

  查看最佳答案

• 在窗体上画一个名称为Text1的文本框，然后编写如下事件过程：PrivatSuForm_Load（）。程序运行后，如果按Shift+F2键，则文本框中的内容是（）

  A．Alt+F2 B．ab1 C．随机显示 D．不显示任何信息

  查看最佳答案

• 设窗体上有一个名为List1的列表框，并编写下面的事件过程：程序运行时单击一个列表项，则产生的结果是（）

  A．该列表项被移到列表的最前面 B．该列表项被删除 C．该列表项被移动到列表的最后面 D．该列表项被删除后又在原位置插入

  查看最佳答案

• 在窗体上画两个文本框和一个命令按钮，然后在代码窗口中编写如下事件过程： Private Sub Command1_Click（) Text1.Text="VB Programming" Text2.Text=Text1.Text Text1.Text="ABCD" End Sub 程序运行后，单击命令按钮，两个文本框中显示的内容分别为 （8) 和 （9) 。

  查看最佳答案

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

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

  查看最佳答案

• 在窗体上画一个文本框和一个图片框，然后编写如下两个事件过程： Private Sub Form_Click（) Text1.Text=“VB程序设计” End Sub PrivmeSubText1_Change（) Picture1.Print"VB Programming" End Sub 程序运行后，单击窗体，则在文本框中显示的内容是 【7】 ，而在图片框中显示的内容是 【8】 。

  查看最佳答案