vbnet考试资料.doc

一、选择：1、窗体中有一名称1、中，定义数组如下：Dim arr（）as Integer= 1,2,3,4则arr1的值为：( B 2 )A 1 B 2 C 3 D42.VB.NET中，无返回值的过程为（A）A. Sub B. Function C.Property D. Main3.利用下列哪个语句可以从For循环中提前跳出循环（）A. Exit For B. Exit Do C. Exit Loop D. Exit 4若要求将提交按钮的访问键设置为“S”， D 则为修改其Text的属性值。 ASubmit B*Submit CSubmit DSubmit 5.在下列关于通用对话框的说法中，错误的是（）A.可以用ShowDailog方法打开B.可以用Show方法打开C.单击了“取消”按钮后，方法的返回值是DialogResult.CancelD.通用对话框是非界面控件6双击窗体会产生 D 事件。 AenabledBactiveCclickDload 7在VB.NET中每个对象都有三个基本要素，它们是 B 。A对象的名称、值和所属类 B对象的属性、事件和方法C对象的大小、存储方式和内容 D对象的访问方法、存储方式和名称8数学函数式Sin25写成VB.NET表达式是 D 。 Asin25 Bsin(25) Csin(25*314) Dsin(25*314/180)9下列哪组语句可以将变量A、B的值互换 C 。AA=B:B=A BA=A+B:B=AB:A=A+B CC=A:A=B:B=C DA=(A+B)/2:B=(AB)/210. VB.NET程序中， B 显示一个内容为“this is a test”消息框。 ASystemWindowsFormsMessageBox(this is a test!) BSystemWindowsFormsMessageBoxShow(this is a test!) CSystemWindowsFormsMessageBoxShowDialog(this is a test!) DSystemWindowsFormsMessageBoxShowMessageBox(this is a test!)11“x是小于100的非负数”，用VB.NET表达式表示正确的是 C 。 A0x100 B0=x100 C0=x And x 100 D0=x Or x 1000 total = total + i i = i+2 Loop TextBox1Text = total End SubEnd Class3、已有一模块文件Modify.vb。该模块中的Findat过程是用于在一个字符串变量中查找at，并用消息框给出查找结果的报告：没有找到或找到的个数。Public Sub Findat() 在字符串str1中查找at Dim str1 As String Dim length As Integer 字符串长度 Dim sum As Integer 查到的个数 Dim i As Integer str1 = InputBox(请输入一个字符串) length = Len(str1) i = 1 sum = 0 Do While i = length If Mid(str1, i , 2) = at Then sum = sum + 1 End If i=i+1 Loop If sum = 0 Then MsgBox 没有找到！ Else MsgBox 找到了 & Str(sum) & 个 End IfEnd Sub9.弹出菜单是通过 ContextMenuStrip 控件创建的。10.Graghics类在VB.NET中用作（包含完成绘图的基本方法）（P258）11.关闭窗体的方法是（Close( )）12. 在窗体上放入一个名称为Button1命令按钮和1个名称为TextBox1文本框，然后编写如下事件过程： Private Sub Button1_Click(ByVal sender As SystemObject, ByVal e As SystemEventArgs) Handles Button1ClickDim n, x As Integer n = CInt(TextBox1Text) Select Case n Case 1 To 20 x = 40 Case 2, 4, 6 x = 20 Case Is 10 x = 30 Case 10 x = 10 End Select TextBox2Text = x End Sub 程序运行后，在文本框TextBox1中输入10，然后单击命令按钮，则在TextBox2中显示的内容是 40 。14. 类MyClass 的定义如下： Public Class MyClass1 Private data as String End Class 则关键字Private 在类的定义中的作用是限定成员变量data 仅在类MyClass 的成员方法中可以访问; 15.NET中用以声明Num为一整型常量，其值为20的正确语句的是：(Const Num As Integer = 20)16.向列表框中添加一个新项目，正确的语句是：（Dim ListBox2 As ListBox = New ListBoxListBox2.Items.Add()）三、1、窗体中有一个名称为Button1的命令按钮、一个Label1控件对象，编写如下事件过程：Private Sub Button1_Click(ByVal sender As SystemObject, ByVal e AsSystemEventArgs) Handles Button1Click Dim n As String, x, i, j As Integer x = 0 n = InputBox(请输入一个大于1的整数, 输入框) For i = 1 To CInt(n) For j = 1 To i x = x + 1 Next j Next i Label1Text = CStr(x)End Sub程序运行后，单击命令按钮，如果输入3，则在Label1显示的内容是 62、请写出以下程序在屏幕上的输出内容。 Module Module1 Function F(ByVal N As Integer) As Double Dim I As Integer, T As Long T = 1 For I = 1 To N T = T * T Next I Return T F = T End Function Sub Main() Dim SUM As Long SUM = F(3) + F(5) + F(8) Console.WriteLine(SUM= & SUM) Console.ReadLine() End Sub End Module结果为：SUM=404463.在窗体放入一个名称为Button1命令按钮和一个TextBox1文本框，然后编写如下事件过程：Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim x, y, z As Integer x = 5 : y = 7 : z = 0 TextBox1.Text = z & x & yEnd Sub程序运行后，如果单击命令按钮，则在文本框中显示的内容是： 057 四、简答题：1、定义画笔，画布、画刷对象P258 P262 P2642、写出建立新顺序文件，追加顺序文件内容。或读顺序文件Seqne