中易网

《VB.NET程序设计》作业二

答案:2  悬赏:10  
解决时间 2021-04-28 14:22
  • 提问者网友:乏味沐染
  • 2021-04-27 14:02

一、      单项选择题

1.在Visual Studio.NET的集成开发环境中,下面不属于该环境编程语言的是        。

A.VB            B.C++          C.Pascal           D.J#

2.在VB.NET中,在窗体上显示控件的文本,用          属性设置。

A.Text           B.Name         C.Caption         D.Image

3.对于窗体,可改变窗体的边框性质的属性是        。

A.MaxButton       B.FormBorderStyle         C.Name        D.Left

4.若要使标签控件显示时不覆盖窗体的背景图案,要对        属性进行设置。

A.BackColor       B.BorderStyle        C.ForeColor        D.BackStyle

5.当运行程序时,系统自动执行启动窗体的      事件过程。

A.Load         B.Click           C.Unload         D.GotFocus

6.当文本框的ScrollBars属性设置了非None值,却没有效果,原因是          。

A.文本框中没有内容                    B.文本框的MultiLine属性为False

C.文本框的MultiLine属性为True         D.文本框的Locked属性为True

7.要判断在文本框中是否按了Enter键,应在文本框的       事件中判断。

A.Change        B.KeyDown       C.Click         D.KeyPress

8.在VB.NET集成环境中创建VB.NET应用程序时,除了工具箱窗口、窗体窗口、属性窗口外,必不可少的窗口是           。

A.窗体布局窗口       B.立即窗口         C.代码窗口          D.监视窗口

9.当创建一个项目名为“引例”的项目时,该项目的所有代码文件将保存在    文件夹下。

A.My Documents          B.VB.NET        C.\引例         D.Windows

10.将调试通过后生成的.exe可执行文件到其他机器上不能运行的主要原因是           。

A.运行的机器上无VB.NET系统              B.缺少.frm窗体文件  

C.该可执行文件有病毒                      D.以上原因都不对

11.对初学者而言,调试程序方便、有效的手段是          。

A.在可疑的代码处设置断点点,逐语句跟踪       B.查看资料

C.通过“立即”窗口显示变量的值               D.找老师问原因

12.当需要上下文帮助时,选择要帮助的“难题”,然后按     键,就可出现MSDN窗口及显示所需“难题”的帮助信息。

A.Help         B.F10           C.Esc             D.F1

13.__________属性用来设置窗体的背景图案。

A.BackgroundImage        B.GroundImage          C.Image              D.Icon

14.能够获得一个文本框中被选取文本的内容的属性是__________。

A.Text          B.SelectionLength       C.SelectedText           D. SelectionStart

15.关于数组的声明,正确的是__________。

A.Dim a(5) As Integer = {1,2,3,4,5,6}             B.Dim a(1,6) As Integer = {1,2,3,4,5,6}

C.Dim a( ) As Integer = {1,2,3,4,5,6}                  D.Dim a(1 to 6) As Integer = {1,2,3,4,5,6}

16.如下数组声明语句中正确的是__________。

A.Dim a[3,4]  As Integer              B.Dim a(3,4)  As Integer

C.Dim a{3,4}  As Integer              D.Dim a(3 4)  As Integer

17.数组声明语句Dim a(4,0 To 2)中的数组a包含了_________个数组元素。

A.12                   B.15               C.16                     D.20

18.下面语句说明不合法的是_________。

A. Function f1%(ByVal n%)                  B. Sub s1(ByVal n As Integer )

C. Sub s1(ByVal n%(10))                     D. Function f1%()

19.下列子过程最合理的是             。

A.Sub f1(ByVal  n%())               B.Sub f1(ByRef  n%) As Integer

C.Function f1%(ByRef  f1%)       D.Function f1(ByVal  n%)

20.下列过程的定义正确的是__________。

A.Public Function a( ByVal b!) As Double     B.Public Sub a( ByVal b!) As Double

C.Public Function a( ByRef a!) As Double   

D.Public Function a( ByRef b!(5)) As Double

21.设有如下说明

Public Sub F1(ByRef n%)

  …

  n=3*n+4

  …

Eed Sub

Sub Button1_Click(……) Handles Button1. Click

Dim n%,m%

  n=3

  m=4

  ‘调用F1的语句

  …

Eed Sub

则在Button1_Click事件中有效的调用语句是            。

A.F1(n+m)    B.F1(m)   C.F1(5)     D.F1(m,n)

22.如下程序输出的结果是            。

       Dim i As Integer

        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.程序出错  

23.如下程序输出的结果是            。

Private Sub Button1_Click(……) Handles Button1.Click

        Dim i%, j%

        Dim a() As Integer = {0, 1, 2, 3, 4, 5, 6, 7, 8, 9}, b(3, 3) As Integer

        Label1.Text = ""

        For i = 1 To 3

            Label1.Text &= Space(i * 3)

            For j = i To 3

                b(i, j) = a(i * j)

                Label1.Text &= Space(6 - Len(b(i, j))) & b(i, j)

            Next

            Label1.Text &= vbCrLf

        Next

    End Sub

A. 1  2  3        B.1         C.1  4  7       D.1  2  3   

         4  5  6           4  5         2  4  6              4  6

         7  8  9           7  8  9      3  6  9                 9

24.在过程中定义的变量,若希望在离开该过程后还能保存过程中局部变量的值,则应使用关键字           在过程中定义过程级变量。

A.Dim      B.Private      C.Public    D.Static

25.如下程序输出的结果是            。

   Private Sub Button1_Click(……) Handles Button1.Click

        MsgBox(p1(3.0, 7))

    End Sub

    Public Function p1!(ByVal x!, ByVal n%)

        If n = 0 Then

            p1 = 1

        Else

            If n Mod 2 = 1 Then

                p1 = x * p1(x, n \ 2)

            Else

                p1 = p1(x, n \ 2) \ x

            End If

        End If

    End Function

A.18       B.7        C.14          D.27  

26.如下程序,运行后各变量的值依次为           。

  Public Sub Proc(ByRef a%())

     Static i%

     Do

        a(i) = a(i) + a(i + 1)

        i = i + 1

      Loop While i < 2

  End Sub

  Sub Button_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:MsgBox(x(i)):Next i

  End sub

A.3 4 7 5 6       B.3 5 7 4 5       C.2 3 4 4 5        D. 4 5 6 7 8

二.填空题

1.当进入VB.NET集成环境,发现没有显示“工具箱”窗口,应选择      菜单的    选项,使“工具箱”窗口显示,并最好将其窗口的属性设置为            。

2.对象的属性是指            ;对象的方法是指            。

3.当对命令按钮的Image属性装入.bmp图形文件后,按钮上并没有显示所需的图形,原因是对             属性设置为            。

4.若已建立了Form1、Form2两个窗体,默认启动窗体为Form1。通过             菜单的       的      选项卡,可将启动对象设置为Form2。

5.对于正在使用的数组A,要再增加一个单元,但要保留原数组各元素的值,则应使用:

ReDim ______________ A( Ubound ( A ) + 1 )语句。

6..在模块的开头通过Imports  System. __________语句限定,x的平方根可以写为sqrt(x)。

7.在过程体中,用__________关键字声明的局部(过程级)变量,其值可以保留至下次过程被调用。

 

 

最佳答案
  • 二级知识专家网友:ー何必说爱
  • 2021-04-27 15:37

1.在Visual Studio.NET的集成开发环境中,下面不属于该环境编程语言的是 C    。


A.VB    B.C++       C.Pascal    D.J#


2.在VB.NET中,在窗体上显示控件的文本,用   A    属性设置。


A.Text    B.Name    C.Caption    D.Image


3.对于窗体,可改变窗体的边框性质的属性是   B     。


A.MaxButton    B.FormBorderStyle    C.Name    D.Left


4.若要使标签控件显示时不覆盖窗体的背景图案,要对    A    属性进行设置。


A.BackColor    B.BorderStyle    C.ForeColor    D.BackStyle


5.当运行程序时,系统自动执行启动窗体的   A   事件过程。


A.Load    B.Click    C.Unload       D.GotFocus


6.当文本框的ScrollBars属性设置了非None值,却没有效果,原因是    B   。


A.文本框中没有内容    B.文本框的MultiLine属性为False


C.文本框的MultiLine属性为True    D.文本框的Locked属性为True


7.要判断在文本框中是否按了Enter键,应在文本框的    D   事件中判断。


A.Change    B.KeyDown    C.Click    D.KeyPress


8.在VB.NET集成环境中创建VB.NET应用程序时,除了工具箱窗口、窗体窗口、属性窗口外,必不可少的窗口是    C    。


A.窗体布局窗口    B.立即窗口    C.代码窗口    D.监视窗口


9.当创建一个项目名为“引例”的项目时,该项目的所有代码文件将保存在 A   文件夹下。


A.My Documents    B.VB.NET    C.\引例    D.Windows


10.将调试通过后生成的.exe可执行文件到其他机器上不能运行的主要原因是    A    。


A.运行的机器上无VB.NET系统    B.缺少.frm窗体文件  


C.该可执行文件有病毒    D.以上原因都不对


11.对初学者而言,调试程序方便、有效的手段是   A    。


A.在可疑的代码处设置断点点,逐语句跟踪    B.查看资料


C.通过“立即”窗口显示变量的值    D.找老师问原因


12.当需要上下文帮助时,选择要帮助的“难题”,然后按   A  键,就可出现MSDN窗口及显示所需“难题”的帮助信息。


A.Help     B.F10    C.Esc    D.F1


13.______A____属性用来设置窗体的背景图案。


A.BackgroundImage      B.GroundImage    C.Image    D.Icon


14.能够获得一个文本框中被选取文本的内容的属性是___C_______。


A.Text    B.SelectionLength    C.SelectedText    D. SelectionStart


15.关于数组的声明,正确的是___C_______。


A.Dim a(5) As Integer = {1,2,3,4,5,6}        B.Dim a(1,6) As Integer = {1,2,3,4,5,6}


C.Dim a( ) As Integer = {1,2,3,4,5,6}        D.Dim a(1 to 6) As Integer = {1,2,3,4,5,6}


16.如下数组声明语句中正确的是____B______。


A.Dim a[3,4]  As Integer    B.Dim a(3,4)  As Integer


C.Dim a{3,4}  As Integer    D.Dim a(3 4)  As Integer


17.数组声明语句Dim a(4,0 To 2)中的数组a包含了_____A____个数组元素。


A.12    B.15    C.16        D.20


18.下面语句说明不合法的是__C_______。


A. Function f1%(ByVal n%)    B. Sub s1(ByVal n As Integer )


C. Sub s1(ByVal n%(10))    D. Function f1%()


19.下列子过程最合理的是  B    。


A.Sub f1(ByVal  n%())    B.Sub f1(ByRef  n%) As Integer


C.Function f1%(ByRef  f1%)    D.Function f1(ByVal  n%)


20.下列过程的定义正确的是___C_______。


A.Public Function a( ByVal b!) As Double    B.Public Sub a( ByVal b!) As Double


C.Public Function a( ByRef a!) As Double   


D.Public Function a( ByRef b!(5)) As Double


21.设有如下说明


Public Sub F1(ByRef n%)


  …


  n=3*n+4


  …


Eed Sub


Sub Button1_Click(……) Handles Button1. Click


Dim n%,m%


  n=3


  m=4


  ‘调用F1的语句


  …


Eed Sub


则在Button1_Click事件中有效的调用语句是    B    。


A.F1(n+m)    B.F1(m)   C.F1(5)    D.F1(m,n)


22.如下程序输出的结果是    。


    Dim i As Integer


    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.程序出错  


23.如下程序输出的结果是    。


Private Sub Button1_Click(……) Handles Button1.Click


    Dim i%, j%


    Dim a() As Integer = {0, 1, 2, 3, 4, 5, 6, 7, 8, 9}, b(3, 3) As Integer


    Label1.Text = ""


    For i = 1 To 3


    Label1.Text &= Space(i * 3)


    For j = i To 3


    b(i, j) = a(i * j)


    Label1.Text &= Space(6 - Len(b(i, j))) & b(i, j)


    Next


    Label1.Text &= vbCrLf


    Next


    End Sub


A. 1  2  3        B.1    C.1  4  7    D.1  2  3   


    4  5  6    4  5    2  4  6    4  6


    7  8  9    7  8  9    3  6  9    9


24.在过程中定义的变量,若希望在离开该过程后还能保存过程中局部变量的值,则应使用关键字    在过程中定义过程级变量。


A.Dim    B.Private    C.Public    D.Static


25.如下程序输出的结果是    。


   Private Sub Button1_Click(……) Handles Button1.Click


    MsgBox(p1(3.0, 7))


    End Sub


    Public Function p1!(ByVal x!, ByVal n%)


    If n = 0 Then


    p1 = 1


    Else


    If n Mod 2 = 1 Then


    p1 = x * p1(x, n \ 2)


    Else


    p1 = p1(x, n \ 2) \ x


    End If


    End If


    End Function


A.18    B.7    C.14    D.27  


26.如下程序,运行后各变量的值依次为    。


  Public Sub Proc(ByRef a%())


     Static i%


     Do


    a(i) = a(i) + a(i + 1)


    i = i + 1


      Loop While i < 2


  End Sub


  Sub Button_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:MsgBox(x(i)):Next i


  End sub


A.3 4 7 5 6       B.3 5 7 4 5     C.2 3 4 4 5    D. 4 5 6 7 8




懂做的做了,不包全对!

全部回答
  • 1楼网友:废途浑身病态
  • 2021-04-27 16:35

今天去学校招聘,发现学生都是不读书的主。

这样的问题也用来问,试问用人单位如果会用你们。

好好读书吧,不要花钱浪费青春。谢谢!

我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
点此我要举报以上问答信息!
大家都在看
推荐信息