041020[计算机软件技术基础(1)](4)

A.102, 2500 B.100,2500

160.执行下列代码后，变量count的值为（）。 Dim count As Integer

For count = 10 To 0, Step -1 count = count - 3 Next A.0 B.-1

C.100.2550 D.102,2550

C.-2 D.-3

161.单击鼠标时，首先响应的是（）事件。 A.Click B.Mousedown C.MouseUp D.MouseMove

162. VB控件属性中使用Cursor属性设置（）。 A.操作类型 B.形状类型 C.鼠标按键

D.指针类型

163.鼠标的移动触发（）事件。

A.Click B.Mousedown C.MouseUp D.MouseMove

164.鼠标一次单击过程，依次触发了（）事件。 A.Mouseup、Mousedown、Click## ## ## B.Mousedown、Click、Mouseup C.Click、Mousedown、Mouseup D.Mousedownk、Mouseup、Click

165.程序运行后，在窗体上单击鼠标，此时窗体不会接收到的事件是（）。 A.MouseDown B.MouseUp C.Load

D.Click

166.鼠标按键、移动和释放事件过程的()参数用来获取按下的是哪个鼠标键。 A.sender B.e C.sender.Button D.e.Button

167.当指针指向窗体Form1时，鼠标指针改为用户自己定义的指针图标，应使用（）语句形式。

A.Form1.Cursor = New Cursor(图标文件名 B.Me.Cursor = New Cursor(图标文件名 C.Form1.Cursor = Cursor(图标文件名 D.Me.Cursor = Cursor(图标文件名

168.当在文本框中输入“ABCD”时，标签上显示的是（）。 Sub TextBox1_TextChanged(……) Handles TextBox1.TextChanged Label1.Text &=TextBox1.Text End Sub A.ABCD B.A C.AABABCABCD D.A

169.下列事件中，（）不是键盘可触发事件。 A.Click B.KeyDown C.KeyUp

170.要接收键盘按键的字符，应该使用（）事件。 A.Click B.KeyDown C.KeyUp 171.下面的程序段运行后S的值是（）。 Dim a(3) As Integer S=0

D.KeyPress

D.KeyPress

For i=1 To 3 a(i)=i*i S=S+a(i) Next i A.1

B.4 C.9 D.14

172.编写如下程序：

Private Sub Button1_Click(…)Handles Button1.Click Dim i As Integer, n As Integer Dim arr() As Integer

n = InputBox(请输入数值： ReDim arr(n)

For i = 1 To UBound(arr) arr(i) = i Next

For i = 1 To UBound(arr) \ 2 temp = arr(i)

arr(i) = arr(n - i + 1) arr(n - i + 1) = temp Next

For i = 1 To UBound(arr) Print arr(i); Next End Sub

程序运行后，单击命令按钮Button1，并在输入对话框中输入7，输出结果为()。 A.7 6 5 4 3 2 1 B.1 2 3 4 5 6 7 C.3 2 1 4 7 6 5 D.4 3 2 1 5 6 7

173.若dim a() as integer={1,2,3,4,5},则a.length的值（）。 A.4 B.5 C.6 D.NULL

174.以下属于中合法的数组元素的是（）。 A.k8 B.k[8] C.k() D.k(8)

175.下列有关VB中的概念，正确的是()。 A.列表框中的项目可以设定成允许多选 B.组合框中的项目可以设定成允许多选 C.数组默认下标下界可以设置为负数 D.数组名可以与简单变量名同名

176.下列叙述中正确的是（）。 A.数组是用户自定义的数据类型 B.数组元素在内存中的存放形式是连续的 C.数组在使用时可以采用隐式声明 D.数组的下界可以任意

177.下列数组声明语句中正确的是（）。 A.Dim (9) As Single={1,2,3,4,5,6,7,8,9,10} B.Dim a() As Single={1,2,3,4,5,6,7,8,9,10} C.Dim a() As Single={1,

D. Dim a( , ) As Integer={1,2,3,4,5,6,7,8,9,10}

178. VB.NET中，定义数组如下 Dim arr() as Integer = {1,2,3,4,5} 则arr(1)的值为（）。 A.1 B.2

C.3 D.4

179.如下数组声明语句中正确的是（）。 A.Dim (9) As Single={1,2,3,4,5,6,7,8,9,10} B.Dim a( ) As Single={1,2,3,4,5,6,7,8,9,10}

C.Dim a( ) As Single={1,“a”, “bc”2. ,4,5,6,7,8,9,10} D. Dim a(,) As Integer={1,2,3,4,5,6,7,8,9,10}

180.如下程序输出的结果是（）。

Dim a() As Integer={1,2,3,4,5,6,7} For i=0 To UBound(a) a(i)a=(i)*a(i) Next i MsgBox(a(i))

A.49 B.0 C.不确定 D.程序出错

181. ListBox1中的 GetSelected是（）。 A.方法 B.对象 C.属性

D.事件

182.在设计状态，列表框中的选项可以通过（）属性设置。 A.List B.Items.Count C.Text

D.Items

183.（）控件用于显示较长的选项列表，用户可以从中进行选择。 A. ListBox B.CheckBox C.Label D.以上都不是

184.引用列表框ListBox1最后一个数据项应使用（）。 A.ListBox1.Items(ListBox1.Items.Count) B.ListBox1.Items(ListBox1.Items.Count-1) C.ListBox1.Text D.ListBox1.Items(ListBox1.SelectedIndex)

185.要清除列表框中的所有列表项时，应使用（）方法。 A.Items.Remove B.Items.Clear C.Items.RemoveAT D.Items.Move

186.在下面对列表框（ListBox1）的操作中，正确的语句是（）。 A.Listbox1.Items.Cls B.ListBox1.Items.Remove(4) C.ListBox1.Items.Remove(计算机 D.ListBox1.Items.Add(1,打印机

187.已知列表框（ListBox1）中有10个数据项，对列表框操作正确的语句是( )。 A.ListBox1.Clear() B.ListBox1.Items.RemoveAt(4)

C.ListBox1.Items.RemoveAt(计算机D.ListBox1.Items.Add(1, 打印机

188.向列表框中的最后填加一个新项目，正确的语句是（）。 A.ListBox1.Items.Add (B.ListBox1.Items.Insert (C.ListBox1.Items.Add (2, D. ListBox1.Items.Insert (2,

189.复选框的CheckState属性为（）时，表示复选框内有灰色的勾即不可选。 A.Unchecked B.Indeterminate C.Checked D.None

190.复选框或单选钮的当前状态可通过（ ）属性来返回或设置。 A.Checked B.Value C.Selected

191.下面过程运行后显示的结果是（）。

Public Sub F1(ByRef n as Integer,ByVal m as Integer) n=n mod 10 m=m\10 End Sub

Sub Button1_Click(…… ) Handles Button1_Click Dim x,y as Integer x=12 y=34 Call F1(x,y)

MessageBox.Show(x & End Sub A.2 34 B.12 34 C.2 3

D.Caption

D.12 3

192.下面程序段运行的结果是（）。 Public Sub Proc(ByRef a%()) Dim i% Do

a(i) = a(i) + a(i + 1) ：i = i + 1 Loop While i < 2 End Sub

Private Sub Button1_Click(…) Handles Button1.Click Dim m%, i%, x%(10) For i = 0 To 4 x(i) = i + 1 Next i

For i = 1 To 2 Call Proc(x) Next i

For i = 0 To 4

Label1.Text &= x(i) & Next i End Sub A.8 8 3 4 5 B.7 7 2 3 4 C.9 9 4 5 6

D.6 6 1 2 3

193.下面过程运行后显示的结果是（）。 Public Sub F1(ByRef n%, ByVal m%) n=n Mod 10 m=m\10 End Sub

Sub Button1_Click(... ...) Handles Button1_Click Dim x%, y% x=12: y=34 Call F1(x, y)

MsgBox(x &“ End Sub A.2 34 B.12 34

C.2 3 D.12 3 6

194.下列主过程Main中执行完语句x.MyFunc(i)后，局部变量i的值为( )。 Public Sub MyFunc(ByVal i As Integer) i = i * 2 End Sub End Class Sub Main()

Dim x As new test

Dim i As Integer = 100 x.MyFunc(i) End Sub A.0 B.2 C.100

D.200

195.已知数组arr进行以下定义： Dim arr() as Integer = {1,1,1,1,1} 过程MySub定义如下：

Sub MySub(ByVal ar() As Integer, ByRef x As Integer) Dim i As Integer

For i = 0 To UBound(ar) 注：UBound(ar)求数组ar的下标上限 ar(i) = x Next x = 0 End Sub

则执行下列语句后，数组arr和变量data中的内容是( )。 Dim data As Integer = 2 MySub(arr, data)

A.arr={2,2,2,2,2} data=2 B.arr={1,1,1,1,1} data=2 C.arr={2,2,2,2,2} data=0 D.arr={1,1,1,1,1} data=0

196.在VB.NET的过程MySub中，下列变量声明语句（）正确。 A.Dim x,y,x as Integer

B.Dim x as Integer,y as String,z as Decimal C.Private temp as Long D. Public temp as Long

197.在VB.NET中，无返回值的过程称为（）过程。 A.Sub B.Function C.Property

D.Main

198.设过程P有两个数值类型的形参，把( )当作调用过程P的语句是错误的。 A.CallP(1,2) B.Call P(Math.Sqrt(10), 2) C.P(1,2) D.P1+2

百度搜索“77cn”或“免费范文网”即可找到本站免费阅读全部范文。收藏本站方便下次阅读，免费范文网，提供经典小说综合文库041020[计算机软件技术基础(1)](4)在线全文阅读。