宁波大学 - VB试题库

2019-08-29 18:18

VB.NET模拟试题2

1、按照变量的命名规则,下列变量名中不合法的是:( ) A、strMystring B、intCount C、sng平均值 D、12Number 2、在VB.NET中,一般使用关键词( )来表示重载方法. A. overloads B. overrides C. shadows D. public

3、连接sql server2000数据库,使用哪种.net数据提供程序最优( ) A.SQL SERVER.NET数据提供程序 B.OLE DB.NET数据提供程序 C.ODBC.NET数据提供程序 D.ORACLE.NET数据提供程序

4、.NET Framework类库中所以类型的根命名空间为() A.System B.Collection C.System.Collection D.Space

5、Command对象对数据源执行命令,返回结果为单一值,使用Command对象的哪种方法() A.ExecuteReader B.ExecuteNonQuery C.ExecuteScalar D.ExecuteXmlReader

6、在Web表单的设计中,可以将页面的( )属性设置为Grid Layout ,以使用绝对位置排列页面上的可视元素。

A. showGrid B. codePage C. pageLayout D. bgColor 7、判断下列程序运行后x的值( )? X=5 X+=5

A. 5 B.10 C. 0 D.1

8、.NET构架中被用来访问数据库的组件集合称为( ) A.ADO.NET B.COM+ C. ADO D. Data.Service.NET

9、若需要从关系数据库中的表Employees中查看所有的记录,应使用SQL语句( ) A.Insert * From Employees B.Delete * From Employees C.Update * From Employees D.Select * From Employees

10、为了在程序中使用SqlServer .NET 数据提供程序,应在源程序工程中添加对程序集( )的引用。

A. System.Data B. System.Data.SqlClient C. System.Data.OleDb D. System.Data.Odbc

11、如果要使文本框能够多行显示,则应使( )属性设为True。 A. MultiLine B. MaxLength C. SelLength D. Locked 12、对文件进行读写操作时需要导入的名称空间是:( ) A. system.data B. system.io C. system.xml D. system.collections

13、.NET Framework不支持的一种类型的用户界面为() A. Web窗体 B.Windows窗体 C.控制台应用程序 D.Unix 14、下列代码执行后,变量IntY的值为() IMPORTS SYSTEM CLASS MAINAPP

Public Shared Sub MAIN() Dim SngX As Single = 123.45 Dim IntY As Integer IntY = Convert.ToInt32(SngX) Console.WriteLine(IntY) End Sub End Class

A. 123 B.123.45 C.123.4 D.123.5

15、声明一个动态数组dim intX()as integer,在使用intX之前,要重新定义intX,下面格式正确的是( )。 A、ReDim IntX() B、Dim IntX() C、Dim IntX(3) D、ReDim IntX(5) 16、下列不属于类三要素是:( ) A、属性 B、方法 C、过程 D、事件

17、要使窗体成为容器,需要设置窗体的( )属性为True。 A、Container B、MdiLayout C、Child D、IsMdiContainer 18、类的继承的关键字为()

A.Overloads B. Overridable C. Inherits D.Overrides

19、进度条(ProgressBar)控件用来显示事务处理的进度,()属性用来获取或设置进度栏的当前位置 A.Maximum B. Minimum C. Name D.Value 20、下列声明事件的语句正确的为()

A. Public Event proverb(ByVal agemsg As String) B. Public proverb()

C. Public proverb(ByVal aegmsg As String) D. Private proverb() 21、请看以下代码: Dim X As Integer =2 Select Case X Case 1

MessageBox.Show(“Yes!”) Case 2

MessageBox.Show(“No!”) Case 3

MessageBox.Show(“Ok!”) Case Else

MessageBox.Show(“Sorry!”) End Select

问运行后MessageBox将输出:( ) A、Yes! B、No! C、Ok! D、Sorry!

22、如果FOR语句中的步长值为正,则循环正常结束时( )。 A. 循环变量的终值>初值 B. 循环变量的终值<初值

C. 循环变量的终值=初值 D. 都错

23、向列表框中填加一个新项目,正确的语句是( )。 A. ListBox1.Items.Add (“How are You?”) B. ListBox1.Items.Insert (“How are You?”) C. ListBox1.Items.Add (2,“How are You?”) D. ListBox1.Items.Insert (2,“How are You?” 24、以下能够正确计算5!的程序是( ) 。 A.

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim N As Integer Dim X As Integer Dim I As Integer N = 5 : X = 1 Do

X = X * I : I = I + 1 Loop While I < N Label1.Text = X End Sub B.

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim N As Integer Dim X As Integer Dim I As Integer N = 5 : X = 1 : I = 1 Do

X = X * I : I = I + 1 Loop While I < N Label1.Text = X End Sub C.

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim N As Integer Dim X As Integer Dim I As Integer N = 5 : X = 1 : I = 1 Do

X = X * I : I = I + 1 Loop While I <= N Label1.Text = X End Sub D.

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim N As Integer Dim X As Integer Dim I As Integer N = 5 : X = 1 : I = 1 Do

X = X * I : I = I + 1 Loop While I > N Label1.Text = X End Sub

25、连接字符串设置如下,该连接的服务器的机器名为( )。 Dim cnNorthwind As new OleDbconnection

CnNorthwind.ConnectionString=”Provider=SQLOLEDB;Data Source=ProdServ01;” _ + “Initial Catalog=Pubs”+ “Integrated Security=SSPI” A. Prodserv01 B. SQLOLEDB C. Pubs A. SSPI

26、使用()方法可以使线程开始运行 A. Start B.Sleep C. Suspend D.Abort 27. ( )标记标志着HTML文档的开始。 A. B. C.

D.

28、( )标记标志着HTML文档文件体的开始。 A. B. C.

D. 29、标签控件的作用是( )。

A.输入文本信息 B. 编辑文本信息 C.显示文本信息 D. 相当于文本编辑器

30、如果保留动态数组元素原来的值,在关键字Redim 后加( )参数。 A、Byref B、Byval C、Preserve D、Static

31、根据输入的整数X的值,给出相应的提示,要求如下: 当 x <100时 显示\当 100 <= x <= 500时 显示\ 当 x >500时 显示\x>500\

Private Sub Form1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Click Dim x As Integer Dim Y As String

x = InputBox(\请输入x的值:\ _____________________________ Case Is < 100 Y = \ Case 100 To 500

Y = \ Case Else

Y = \x >500 \ End Select MsgBox(Y) End Sub

32、 输入一个数,判断其为偶数还是奇数,并用消息框显示出结果,如“您输入的数8是偶数”。 Private Sub Form1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Click Dim X As Integer Dim Y As String

X = InputBox(\请输入X的值:\ _____________________________ MsgBox(\您输入的数\& X & Y) End Sub

33、Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

___________________ ?创建SqlConnection对象cnNorthwind

cnNorthwind.ConnectionString = \Source = (local); Initial Catalog = Northwind; Integrated Security = SSPI;\

'创建SqlCommand类的对象

Dim cmdNorthwind As New SqlCommand '设置属性值

cmdNorthwind.Connection = cnNorthwind

cmdNorthwind.CommandType = CommandType.Text

cmdNorthwind.CommandText = \INTO Products(ProductName,SupplierID,Discontinued)\& \VALUES ('玩具',2,0)\ cnNorthwind.Open()

___________________ ' Command对象执行方法 MessageBox.Show(\操作成功!\ cnNorthwind.Close() End Sub

34、以下代码计算11+21+31+……+91的整数和,请将程序补充完整。 Dim sum as integer Dim i as integer Sum=0 i=11

While i<=100 Sum=sum+i End while

35、为下面类的定义添加属性。 Public Class PERSON

___________________ ' 定义NAME属性可读可写 Private INNER_SEX As String


宁波大学 - VB试题库.doc 将本文的Word文档下载到电脑 下载失败或者文档不完整,请联系客服人员解决!

下一篇:2010成人高等学校招生全国统一考试--英语全真模拟试卷(一)

相关阅读
本类排行
× 注册会员免费下载(下载后可以自由复制和排版)

马上注册会员

注:下载文档有可能“只有目录或者内容不全”等情况,请下载之前注意辨别,如果您已付费且无法下载或内容有问题,请联系我们协助你处理。
微信: QQ: