网友您好， 请在下方输入框内输入要搜索的题目：
题目内容
（请给出正确答案）
在窗体上画一个名称为Command1的命令按钮和一个名称为List1的列表框。如下图所示程序的功能是：单击命令按钮后，程序用“筛选法”求出1-100之间的全部素数。并将素数在列表框中显示出来。根据题意，填空处应选择
Option Base 1 Dim a(100)As Integer Private Sub Command1_Click() n = 100 For i = 2 To Sqr(n) For j = i + 1 To n If j Mod i = 0 And a(j)＜＞ 0 Then a(j)= 0 Next j Next i For i = 1 To n If a(i)＜＞ 0# Then Next i End Sub Private Sub Form_Load () For i = 1 To 100 a (i)=i Next i End Sub
A．List1.Text=Str(a(i))+ vbCrLf
B．List1.Text=Str(a(i))+ vbCrLf
C．List1.AddItem a(i)
D．List1.AddItem=a(i)
参考答案
更多 “ 在窗体上画一个名称为Command1的命令按钮和一个名称为List1的列表框。如下图所示程序的功能是：单击命令按钮后，程序用“筛选法”求出1-100之间的全部素数。并将素数在列表框中显示出来。根据题意，填空处应选择Option Base 1 Dim a(100)As Integer Private Sub Command1_Click() n = 100 For i = 2 To Sqr(n) For j = i + 1 To n If j Mod i = 0 And a(j)＜＞ 0 Then a(j)= 0 Next j Next i For i = 1 To n If a(i)＜＞ 0# Then Next i End Sub Private Sub Form_Load () For i = 1 To 100 a (i)=i Next i End SubA．List1.Text=Str(a(i))+ vbCrLfB．List1.Text=Str(a(i))+ vbCrLfC．List1.AddItem a(i)D．List1.AddItem=a(i) ” 相关考题
考题
窗体上有一个名称为List1的列表框，一个名称为Text1的文本框，一个名称为Label1、Caption属性为“Sum”的标签，一个名称为Command1、标题为“计算”的命令按钮。程序运行后，将把1～100之间能够被7整除的数添加到列表框中。如果单击“计算”按钮，则对List1中的数进行累加求和，并在文本框中显示计算结果，如图所示。以下是实现上述功能的程序，请填空。Private Sub Form_Load（）For i=1 To 100If i Mod 7 =0 Then________End IfNextEnd SubPrivate Sub Command1_Click（）Sum = 0For i = 0 To ________Sum = Sum + ________NextText1.Text = SumEnd Sub
考题
3在窗体上画一个名称为List1的列表框，一个名称为Labe11的标签。列表框中显示若干城市的名称。当单击列表框中的某个城市名时，在标签中显示选中城市的名称。下列能正确实现上述功能的程序是( )。A．B．C．D．
考题
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() a S="VisualBasic" Print String(3, a$) End Sub 程序运行后，单击命令按钮，在窗体上显示的内容是______。A．VVVB．VisC．sicD．11
考题
在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：Private Sub Commandl_Click( )Static X As IntegerStatic Y As IntegerClsY=1Y=Y+5X=5+XPrint X, YEnd Sub程序运行时，3次单击命令按钮Command1后，窗体上显示的结果为【 】。
考题
请根据以下各题的要求设计Visual Basic应用程序(包括界面和代码)。1．在窗体(名称为Form1)上画两个命令按钮，其名称分别为C1和C2，标题分别为“命令按钮1”和“命令按钮2”，编写适当的事件过程。程序运行后，“命令按钮2”隐藏，此时如果单击“命令按钮1”，则“命令按钮2”出现，“命令按钮1”隐藏；而如果单击“命令按钮2”，则“命令按钮1”出现，“命令按钮2”隐藏。程序的运行情况如图1—1所示。注意；存盘时，工程文件名为sjt1.vbp．窗体文件名为sjt1.frm。2．在Form1的窗体上画一个命令按钮，其名称为C1，标题为“显示”；再画一个文本框，其名称为Text1，编写适当的事件过程。程序运行后，在窗体加载时使文本框不可见，如果双击窗体，则文本框出现；此时如果单击命令按钮，则在文本框中显示“等级考试”。程序运行情况如图1—2所示。
考题
窗体上有一个命令按钮Command1和一个列表框List1。先选择列表框中的某一个项目，然后单击命令按钮，将该项目从列表框删除。程序如下：Private Sub Command1_Click()Dim In As IntegerIn=______List.Remove IndEnd Sub则在程序的空白行的语句是( )。A．List1.IndexB．List1.ListIndexC．List1.TextD．List1.ListCount
考题
在名称为Form1的窗体上画一个名称为Text1的文本框，通过属性窗口设置文本框属性，在文本框中显示“AAAA”(如图2—1所示)；再建立一个名称为Cmd1，标题为“清除”的命令按钮，编写适当的事件过程。要求程序运行后，如果单击“清除”命令按钮，则清除文本框中所显示的信息。注意：保存时必须存放在考生文件夹下，窗体文件名为sjt3.frm，工程文件名为sit3.vbp。2．在考生文件夹中有工程文件sit4.vbp，它包含一个窗体文件form1。在窗体上有一个列表框，名称为List1，一个文本框，名称为Text1，和一个命令按钮，名称为Command1，标题为“复制”。要求程序运行后，在列表框中自动建立四个列表项，分别为“项目1”、“项目2”、“项目3”、“项目4”。如果选择列表框中的一项，则单击“复制”按钮时，可以把该项复制到文本框中(程序运行结果如图2—2)。要求：编写程序，以实现试题要求的功能。注意：存盘时必须放在考生文件夹下，工程文件名为sjt4.vbp，窗体文件名为sjt4.frm。
考题
在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程： Private Sub Command1_Click( ) a=12345 Print Format $(a，"000.00") End Sub 程序运行后，单击命令按钮，窗体上显示的是A．123.45B．12345.00C．12345D．00123.45
考题
窗体上有一个名称为List1的列表框，一个名称为Text1的文本框，一个名称为Labe11、 Caption属性为"Sum"的标签，一个名称为Command1、标题为“计算”的命令按钮。程序运行后，将把1～100之间能够被7整除的数添加到列表框中。如果单击“计算”按钮，则对List1中的数进行累加求和，并在文本框中显示计算结果，如下图所示。以下是实现上述功能的程序，请填空。Pfivate Sub Form_Load()Fori=1 To 100If iMod7=
考题
设有如下通用过程：在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如 下事件过程：End Sub 程序运行后，单击命令按钮，则在文本框中显示的内容是（ ）。A. 30B. 25C. 20D. 15
考题
在窗体上画一个命令按钮，名称为Command1，然后编写如下事件过程：Private Sub Command1_Cilck()End Sub运行程序，单击命令按钮，则在弹出的信息框的标题栏中显示的是( )。
考题
在考生文件夹下有一个工程文件execise59.vbp及窗体文件execise59.frm。在窗体上有两个命令按钮，名称分别为Cmd1和Cmd2，标题为“添加”和“清除”；一个文本框，名称为Text1，程序运行前，文本框的编辑区为空白；一个列表框，名称为List1。程序界面如下图所示。在文本框中输入文本，若单击“添加”按钮，则将文本框中的文本作为列表框的一个列表项添加到列表框的末尾，且使“添加”按钮变为无效，“清除”按钮变为有效：若单击“清除”按钮，则使文本框中的内容为空，且使“添加”按钮变为有效，“清除”按钮变为无效。要求：去掉程序中的注释“'”，把程序中的问号“?”改为正确的内容，使其实现上述功能，但不能修改程序中的其他部分，也不能修改控件的属性。保存时，工程文件名仍为 execise59.vbp，窗体文件名仍为execise59.frm。
考题
在考生文件夹中有一个工程文件exeeise86.vbp及窗体文件execise86.frm。在名为Form1的窗体上有一个名称为List1的列表框和一个名称为Cmd1、标题为；显示”的命令按钮。要求程序运行后,如果多次单击列表框中的项，则可同时选择这些项。而如果单击“显示”按钮，则在窗体上输出所有选中的列表项，如下图所示。要求；修改列表框的适当属性，使得运行时可以多选，并去掉程序中的注释符“'”，把程序中的问号“?”改为正确的内容，使其实现上述功能，但不得修改程序中的其他部分。最后把修改过的程序按原名保存。
考题
在考生文件夹中有一个工程文件execise24.vbp，相应的窗体文件为execise24.frm。在名为Form1的窗体上有一个命令按钮，其名称为Cmd1，标题为“添加”；有一个文本框，名为Text1，初始内容为空白；此外还有一个列表框，其名称为List1。程序运行后，如果在文本框中输入一个英文句子(由多个单词组成，各单词之间用一个空格分开)，然后单击命令按钮，程序将把该英文句子分解为单词，并把每个单词作为一个项目添加到列表框中，如下图所示。该程序不完整，请补充完整。要求：去掉程序中的注释符“'”，把程序中的问号“?”改为正确的内容，使其能正确运行，但不得修改程序的其他部分。最后，按原文件名并在原文件夹中保存修改后的文件。
考题
在窗体上画一个名称为List1的列表框，一个名称为Labe11的标签，列表框中显示若干城市的名称。当单击列表框中的某个城市名时，该城市名从列表框中消失，并在标签中显示出来。下列能正确实现上述操作的程序是( )。A．B．C．D．
考题
在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程： Private Sub Command1_Click() a = 12345 Print Format$(a, "000.00") End Sub 程序运行后，单击命令按钮，窗体上显示的是A． 123.45B．12345.00C．12345D．00123.45
考题
窗体上有一个命令按钮Commalld1和一个列表框List1。先选择列表框中的某一个项目，然后单击命令按钮，将该项目从列表框删除。程序如下： Private Sub Command1_Click() Dim In As Integer In=______ List.Removc Ind End Sub 则在程序的空白行的语句是( )。A．List1.IndexB．List1.ListIndexC．List1.TextD．List1.ListCount
考题
在考生文件夹中有一个工程文件execise50.vbp及窗体文件execise50.frm。在名为Form1的窗体上有一个名称为Cmd1，标题为“显示”的命令按钮，一个名称为List1的列表框。要求程序运行后，如果多次单击列表框中的项，则可同时选择这些项。而如果单击“显示”按钮，则在窗体上输出所有选中的列表项，如下图所示。要求：修改列表框的适当属性，使得运行时可以多选；去掉程序中的注释符“'”，把程序中的问号“?”改为正确的内容，使其实现上述功能，但不得修改程序中的其他部分。最后把修改过的程序按原名保存。
考题
窗体上有一个命令按钮Command1和一个列表框List1，其中List1有0、1、2、3、4的内容，有下列程序： Private Sub Command1_Click() Dim i，s For i=0 To List1．ListCount s=s+List1．List(i) Next i Print s End Sub 程序运行后，单击命令按钮，则窗体上显示的是A．0B．10C．01234D．程序出错
考题
在窗体上画一个名称为Commandl的命令按钮和一个名称为Text1的文本框。程序运行后，Command1为禁用(灰色)。当向文本框中输入任何字符时，命令按钮Command1变为可用。请在（ ）处填入适当的内容，将程序补充完整。
考题
单选题窗体上有List1、List2两个列表框，List1中有若干列表项（如下图所示），并有下面的程序：程序运行时，按照下图所示在List1中选中两个列表项（物理和外语），然后单击Command1命令按钮，则产生的结果是（ ）。A
在List2中插入了“外语”“物理”两项B
在List1中删除了“外语”“物理”两项C
同时产生A项和B项的结果D
把List1中最后一个列表项删除并插入到List2中
热门标签
最新试卷