单选题在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后输写如下程序: Private Sub Command1_Click() Dim x,y,Z As Integer x=5 y=7 z=0 Text1.Text=“” Call Fun1(x,y,z) Text1.Text=Str(Z) End Sub Sub Fun1(ByVal a As Integer,ByVal b As Integer,c As Integer) c=a+b End Sub 程序运行后,如果单击命令按钮,则在文本框中显示的内容是( )。 A) 0 B) 12 C) Str(z) D) 没有显示
单选题设用复制、粘贴的方法建立了一个命令按钮数组Command1,以下对该数组的说法错误的是( )。 A) 命令按钮的所有Caption属性都是Command1 B) 在代码中访问任意一个命令按钮只需使用名称Command1 C) 命令按钮的大小都相同 D) 命令按钮共享相同的事件过程
单选题设有如下程序: Private Sub Form_Click() num=InputBox(”请输入一个实数”):P=InStr(num,“,”) Ifp>0 Then Print Mid(num,P+1) Else Print“END” End If End Sub 运行程序,单击窗体,根据提示输入一个数值。如果输入的不是实数,则程序输出“END”: 否则
单选题当文本框中的内容发生改变时所触发的事件是
单选题在窗体上画一个名称为List1的列表框,然后编写如下程序:Private Sub Form_Click()For i=1 To 10Item="Item"&1List1.AddItem ItemNext iEnd Sub程序运行时,单击窗体,所完成的功能是
单选题阅读下面的程序段:
a=0
For i=1 To 3
For j=1 To i
For k=j To 3
a=a+1
Next k
Next j
Next i
执行上面的程序段后,a的值为______。
单选题负责数据库中查询操作的数据库语言是( )。 A) 数据定义语言 B) 数据管理语言 C) 数据操纵语言 D) 数据控制语言
单选题下列说法中错误的是( )。
单选题以下叙述错误的是( )。
单选题在窗体上画一个列表框和一个命令按钮,其名称分别为List1和Command1,然后编写如下事件过程: Private Sub Form_Load() List1.AddItem "Item 1" List1.AddItem "Item 2" List1.AddItem "Item 3" End Sub Private Sub Command1_Click() List1.List(List1.Listcount)="AAAA" End Sub 程序运行后,单击命令按钮,其结果为
单选题由高中数学可知,对于连续函数f(x),若f(x1)与f(x2)值的符号相反,则在x1和x2之间必存在x0,使得f(x0)=0(该点称为"零点")。必存在x0,使得f(x0)=0(该点称为"零点")。设有VB函数:Private Function f(x As Single) As Single 可以返回f(x)的值(函数体没有给出)。下面程序的功能是从键盘输入2个实数x1、x2,判断在x1、x2之间是否存在零点。Private Sub Command1_Click() Dim x1 As Single, x2 As Single x1 = InputBox("请输入一个实数x1") x2 = InputBox("请再输入一个实数x2") If ( ____________ ) Then Print "在"; x1; "与"; x2; "之间存在零点" Else Print "不能确定在"; x1; "与"; x2; "之间是否存在零点" End IfEnd SubPrivate Function f(x As Single) As Single ……End Function为使上面程序可以实现该功能,程序代码中横线处应填写的代码是
单选题往窗体Form1上添加一个列表框控件List1,并编写如下代码: Private Sub Form_Load() For i=0T06 Listl.AddItem i Next i End Sub 为了在程序运行时,按住Ctrl键单击列表中的项目可以选中多个项目,可以设置Listl的属性______。
单选题若已把一个命令按钮的Default属性设置为True,则下面可导致按钮的Click事件过程被调用的操作是
单选题要使两个单选按钮属于同一个框架,正确的操作是______。 A) 先画一个框架,再在框架中画两个单选按钮 B) 先画两个单选按钮,再画框架将单选按钮框起来 C) 先画一个框架,再在框架外画两个单选按钮,然后把单选按钮拖到框架中 D) 以上三种方法都不正确
单选题在窗体上画一个名称为Text1的文本框,编写以下代码:
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii < 65 Or KeyAscii> 90 Then
msgBox "请输入大写字母"
KeyAscii = 0
End If
End Sub
以下能说明该事件过程正确是( )
单选题在窗体上添加标签控件Label1之后,标签控件的默认的名称Name是( )。
单选题当一个工程中含有多个窗体时,其中的启动窗体是____________。
A.启动Visual Basic时建立的窗体
B.第一个添加的窗体
C.最后一个添加的窗体
D.在“工程属性|”对话框中指定的窗体
单选题下列关于数据库系统的描述中,正确的是( )。 A.数据库系统减少了数据冗余 B.数据库系统避免了一切冗余 C.数据库系统中数据的一致性是指数据类型一致 D.数据库系统比文件系统能管理更多的数据
单选题用语句Open"C:/teac.txt"For Input As #1打开文件后,就可以编程序
单选题在窗体上画一个名为Command1的命令按钮,然后编写下列程序: Option Base 1 Private Sub Command1_Click() Dim Arr Arr=Array(1,2,3,4,5) j=1 For i=5 To 1 Step-1 S=S+Arr(i)*j j=j*10 Next Print S End Sub 程序运行后,单击命令按钮,输出结果是( )。