您所在的当前位置: 计算机等级考试题库   >  
BASIC题库  
  >  [单项选择题] 已知某弹出式菜单名为“p1”,它的Visible属性为False。现在要让它在名为Form1的窗体上弹出,使用的命令是( )。 A.Popup P1 B.Form1.Popup P1 C.P1.Popup D.Popup Form1.p1
问题:
发布时间:2022-07-01

[单项选择题] 已知某弹出式菜单名为“p1”,它的Visible属性为False。现在要让它在名为Form1的窗体上弹出,使用的命令是( )。


A.Popup P1
B.Form1.Popup P1
C.P1.Popup
D.Popup Form1.p1

可能感兴趣的题目:

1

[问答题] );

2

[填空题] 数据库设计包括概念设计、______和物理设计。

3

[填空题] 阅读以下程序,输出结果为_________。  class D{  public static void main (String args[]){  int d=21;  Dec dec=new Dec( );  dec. decrement (d):  System.out.println(d);  }  }  class Dec{  public void decrement(int decMe){  decMe=decMe-1:  }  }

4

[问答题] 在1~n之间的自然数中,每次抽取k个数字来抽奖,计算中奖几率的算法为:
n*(n-1)*(n-2)*...*(n-k+1)/1*2*3*...*k
请完善Java_2.java文件,并进行调试,使程序先显示输入窗口如下:

然后从自然数1~20中,每次抽3个数,计算中奖几率,并将最终结果在命令行中显示,其形式类似:你中奖的几率是1/1140.Good luck!
由于Java_2.j ava文件不完整,请在注释行“//*********Found********”下一行语句的下画线处填入正确内容,然后删除下画线,请勿删除注释行或其他已有语句内容。存盘时,文件必须存放在考生文件夹下,不得改变原有文件的文件名。
给定源程序:
import javax.swing.*;
public class Java_2
public static void main (String[] args)
//*********Found********
String input=______.showInputDialog("你想抽几位数?");
//*********Found********
int k=Integer.parselnt(______);
input=JOptionPane.showInputDialog("你想在自然数中抽的最高数是几?");
//*********Found********
int n=______.parselnt (input);
int lotteryOdds=1;
for (int i=1; i<=k; i++)
lotteryOdds=lo

5

[问答题] ");

6

[问答题] 完成下列问题:
在考生文件夹下有一个工程文件sjt3.vbp,在程序运行时,单击“输入整数”按钮,可以从键盘输入一个整数,并在窗体上显示此整数的所有不同因子和因子个数。图4是输入53后的结果,图5是输入100的结果。已经给出了全部控件和程序,但程序不完整。


要求:请在程序中的横线处填写正确的内容。不能修改程序中的其他部分,也不能修改控件的属性。最后用原来的文件名保存工程文件和窗体文件。
[题目提供的源程序]
Private Sub Command1_Click()
Dim n As Integer
Cls
(1) =InputBox("请输入一个整数")
Print "因子数="; fun(n)
End Sub
Function fun(m As Integer)
Dim s As Integer
s=0
For k=1 To Abs(m)/2
If m Mod k= (2) Then
s=s+1
Print k
End If
Next k
(3)
End Function

7

[填空题] 工程中有Form1、Form2两个窗体。Form1窗体外观如图1所示。程序运行时,在Form1中名称为Text1的文本框中输入一个数值(圆的半径),然后单击命令按钮"计算并显示"(其名称为Command1),则显示Form2窗体,且根据输入的圆的半径计算圆的面积,并在Form2的窗体上显示出来,如图2所示。如果单击命令按钮时,文本框中输入的不是数值,则用信息框显示"请输入数值数据!"。请填空。

Private Sub Command1_Click()
If Text1.Text=" "Then
MsgBox"请输入半径!"
Elself Not IsNumeric( (9) )Then
MsgBox"请输入数值数据!"
Else
r=Val( (10) )
Form2.Show
(11) .Print"圆的面积是"&3.14"r*r
End If
End Sub

8

[单项选择题] 设窗体上有一个文本框,名称为Text1,程序运行后,要求该文本框只能显示信息,不能接收输入信息,以下能实现该操作的语句是


A.Text1.MaxLength=0
B.Text1.Enabled=False
C.Text1.Text=False
D.Text1.Index=0

9

[填空题] 若A=20,B=80,C=70,D=30,则表达式A+B>160 Or(B * C>200 And Not D >60)的值是 【8】

10

[单项选择题] 在窗体上画一个命令按钮和一个文本框(名称分别为Command1和Text1),并把窗体的KeyPreview属性设置为True,然后编写如下代码:Dim SaveAll As StringPrivate Sub Form_ Load () Show Text1.Text=" " Text1.SetFocusEnd SubPrivate Sub Command1_ Click() Text1. Text=LCase(SaveAll)+SaveAllEnd SubPrivate Sub Form_ KeyPress (KeyAscii As Integer) SaveAll=SaveAll+Chr(KeyAscii)End Sub程序运行后,直接用键盘输入:VB,再单击命令按钮,则文本框中显示的内容为 ______。


A.vbVB
B.不显示任何信息
C.VB
D.出错