单选题设组合框Combol中有3个项目,则以下能删除最后一项的语句是( )。
单选题已知某弹出式菜单名为“p1”,它的Visible属性为False。现在要让它在名为Form1的窗体上弹出,使用的命令是( )。
单选题在Visual Basic中,长整数的取值范围是______。
单选题在窗体上画一个命令按钮(名称为Command1),并编写下列代码:
Function Fun1(ByVa1 a As Integer,b As Integer)As Integer
Dim t As Integer
t=a-b
b=t+a
Fun1=t+b
End Function
Private Sub Command1Click()
Dim X As Integer
x=10
Print Fun1(Vun1(X,(Fun1(x,x-1))),x-1)
End Sub
程序运行后,单击命令按钮,输出结果是( )。
单选题在窗体上先后画2个图片框,名称分别为Picture1和banana,banana中添加了香蕉图片(见图1),且将banana.DragMode属性设置为1。要求程序运行时,可以用鼠标把banana拖动到Picture1中(见图2)。能实现此功能的事件过程是______。A)PrivateSubForm_DragDrop(SourceAsControl,XAsSingle,YAsSingle)banana.MovePicture1.Left+X,Picture1.Top+YEndSubB)PtivateSubbanana_DragDrop(SourceAsControl,XAsSingle,YAsSingle)Source.MovePicture1.Left+X,Picture1.Top+YEndSubC)PrivateSubPicture1_DragDrop(SourceAsContro1,XAsSingle,YAsSingle)Source.MovePicture1.Left+X,Picture1.Top+YEndSubD)PrivateSubPicturel_DragDrop(SourceAsContro1,XAsSingle,YAsSingle)banana.Movebanana.Left+X,banana.Top+YEndSub
单选题每建立一个窗体,工程管理器窗口中就会增加一个( )。
单选题在窗体上画一个名称为Command1的命令按钮,并编写以下程序: Private Sub Command1_Click() Dim n%,b,t t=1:b=1:n=2 Do b=b*n t=t+b n=n+1 Loop Until n>9 Print t End Sub 此程序计算并输出一个表达式的值,该表达式是( ) A.9! B.10! C.1! +2! +…+9! D.1! +2! +…+10!
单选题在按下任意一个鼠标按钮时被触发的事件是 ______。
单选题在窗体上画一个通用对话框,程序运行中用ShowOpen方法显示“打开”对话框时,希望在该对话框的“文件类型”栏中只显示扩展名为DOC的文件,则在设计阶段应把通用对话框的Filter属性设置为
单选题在窗体上画一个文本框,名称为Text1,然后编写如下程序:Pfivate Sub Form_Load() Text1.Text=””:Text1.SetFocusEnd Sub Private Sub Form Click() Dim aAs String,sAs String a=Text1.Text:s=“” For k=1 To Len(a) s=UCase(Mid(a,k,1))+s Next k Text1.Text=sEnd Sub 程序运行后,在文本框中输入一个字符串,然后单击窗体,则文本框中的内容
单选题窗体上有一个名称为VScrolll的垂直滚动条,为了设定单击滚动条两端箭头时的Value增量值,应设置的属性是( )。
单选题当用户要自定义鼠标指针图形,除要对MouseIcon属性进行设置外,还必须将 MousePointer属性设置为( )。
单选题假设有如下的命令按钮(名称为Command1)事件过程: Private Sub Command1_Click() x=InputBox(”输入:”,”输入整数”) MsgBox”输入的数据是:”,”输入数据:”+x End Sub 程序运行后,单击命令按钮,如果从键盘上输入整数10,则以下叙述中错误的是
单选题现有如下一段程序: Private Sub Command1_Click() x=UCase(InputBox(”输入:“)) Select Case x Case"A"To"C" Print"考核通过!" Case"D" Print"考核不通过!" Case Else Print"输入数据不合法!" End Select End Sub 执行程序,在输入框中输入字母“B”,则以下叙述中正确的是
单选题下列工具中,不属于结构化分析的常用工具的是( )。
单选题以下叙述中正确的是( )。
单选题在窗体上画一个名称为CommonDialog1的通用对话框,一个名称为Command1的命令按钮,要求单击命令按钮时,打开一个保存文件的对话框,该窗口的标题为“Save”,缺省文件名称为“SaveFile”,在“文件类型”栏中显示*txt,则能够满足上述要求的程序是A) Private Sub Command1_Click ( ) CommonDialog1.FileName="SaveFile" CommonDialog1.Filter="AllFiles|*.*|(*.txt)|*.txt|(*.doC) |*.doc" CommonDialog1.FilterIndex=2 CommonDialog1.DialogTitle="Save" CommonDialog1.Action=2 End SubB) Private Sub Command1_Click ( ) CommonDialog1.FileName="SaveFile" CommonDialog1.Filter="AllFiles|*.*|(*.txt)|*.txt|(*.doC) |*.doc" CommonDialog1.FilterIndex=1 CommonDialog1.DialogTitle="Save" CommonDialog1.Action=2 End SubC) Private Sub Command1 Click ( ) CommonDialog1.FileName="Save" CommonDialog1.Filter="AllFiles|*.*|(*.txt)|*.txt|(*.doC) |*.doc" CommonDialog1.FilterIndex=2 CommonDialog1.DialogTitle="SaveFile" CommonDialog1.Action=2 End SubD) Private Sub Command1 Click ( ) CommonDialog1.FileName="SaveFile" CommonDialog1.Filter="AllFiles|*.*|(*.txt)|*.txt|(*.doC) |*.doc" CommonDialogl.FilterIndex=1 CommonDialog1.DialogTitle="Save" CommonDialog1.Action=1 End Sub
单选题SUBSTR(″ABCDEF″,3,2)结果是( )
单选题关系数据库的任何检索操作的实现都是由三种基本检索运算组合而成的,这三种基本运算不包括( )。
单选题窗体上有名为Text1、Text2的两个文本框,和一个由3个单选按钮组成的控件数组Option1,如图1所示。程序运行后,如果单击某个单选按钮,则执行Text1中数值与该单选按钮所对应的运算(乘1、乘10或乘100),并将结果显示在Text2中,如图2所示。为了实现上述功能,在程序中的横线处应填入的内容是______。图1图2PrivateSubOption1_Click(______AsInteger)IfText1.Text<>""ThenSelectCase______Case0:Text2.Text=Text1.TextCase1:Text2.Text=Text1.Text*10Case2:Text2.Text=Text1.Text*100EndSelectEndIfEndSub
