计算机二级 - VB

不定项选择题

在窗体上画一个名称为Command1的命令按钮和三个名称分别为Label1、Label2、Label3的标签，然后编写如下代码： Private x As Integer Private Sub Command1_Click() Static y As Integer Dim z As Integer n = 10 2 = n + z y=y+z x = x + z Label1.Caption =x Label2.Caption =y LabelCaption =z End Sub 运行程序，连续三次单击命令按钮后，则三个标签中显示的内容分别是

A. 10 10 10
B. 30 30 30
C. 30 30 10
D. 10 30 30

不定项选择题

在窗体上画两个滚动条，名称分别为Hscroll1、Hscroll2；六个标签，名称分别为Label1、Label2、Label3，La- bel4、Label5、Label6，其中标签Label4～Label6分别显示“A”；“B”、“AB”等文字信息，标签Label1、La- bel2分别显示其右侧的滚动条的数值，LabeB显示AB的计算结果。如图所示。<br>当移动滚动框时，在相应的标签中显示滚动条的值。当单击命令按钮“计算”时，对标签Label1、Label2中显示的两个值求积，并将结果显示在Label3中。以下不能实现上述功能的事件过程是

A. Private Sub Command1_Click() Labe3.Caption=Str(Vs1(Label1.Caption)*Val(Label2.Caption)) End Sub
B. Private Sub Command1_Click() Labe3.Caption=Hscroll1.Value*HscrolValue End Sub
C. Private Sub Command1_Click() Labe3.Caption=Hscrol11*Hscrol12 End Sub
D. Private Sub Command1＿Chek() Labe13.Caption=HscrolText*HscrolText End Sub

查看答案

不定项选择题

在窗体(Name属性为Form1)上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(Name属性为Command1)，然后编写如下两个事件过程： Private Sub Command1_Click() A=Text1.Text+TextText Print a End Sub Private SUb Form胃Load() Text1.Text= " " TextText=" " End Sub程序运行后，在第一个文本框(Text1)和第二个文本框(Text2)中分别输入33和44，然后单击命令按钮，则输出结果为

A. 77
B. 33+44
C. 3344
D. 4433

查看答案

不定项选择题

在窗体Form1中有一个名称为Image1的图像框，在窗体加载的时候为它装载了一幅图片，该图片比图像框要小如图20-2a所示，现在单击一下图像框，将把照片放到和图像框一样大，如图20-2b所示。再单击它将其还原，然后再单击放大，再单击还原，如此反复。下划线处应填()。<br>Private Sub Form_Load() Image1．Stretch=True __________ End Sub Private Sub Image1_click() Image1．Height=3000 _________ End Sub

A. Image1．Picture=LoadPictrue("gg1．gif')
B. Image1．Picture="gg1．gif' Image1．Stretch=True Image1．Stretch=Not Image1．Stretch
C. Image1．Picture=Loadptctrue("gg1．gif")
D. Image1．Picture="gg1．gif" Image1．Sbetch=Not Image1．Stretch Image1．Stretch=True

查看答案

单选题

要在D盘的Temp 目录下建立一个名为NamE．dat 的顺序文件，应使用______语句。

A. Open "NamE．dat" For Output As #1
B. Open "NamE．dat" For Input As #1
C. Open "D:\Temp\NamE．dat" For InputAs #1
D. Open "D:\Temp\NamE．dat" For Output As #1

查看答案

不定项选择题