相关试卷

  • 1、观察下图的工程1代码窗口,可以判断出当前窗口中至少有两个事件过程,它们是: 事件、事件。

  • 2、从左下所给的VB某工程设计的界面图中可以判断出:

    (1)、该图中“输入整数X和Y:”是类(填:按钮/标签/文本框)
    (2)、若要将图中窗体(Form)的左上方的“最小公倍数”改为“求最小公倍数”,则应该先选择(对象名)后,在相应的属性窗口中选择(属性名)进行更改
    (3)、完成代码编写后,想要该程序可以在Windows系统中直接运行,而不需使用VB软件打开,在“文件”菜单中应选择的命令是(填:“保存工程” /“工程另存为” /“生成工程1.exe” /“test.frm另存为”)
  • 3、某地政府为鼓励市民节约用水,实行居民水费梯度制,按年度用水量为计算周期,将每个家庭全年用水里划分为三级,水价分级递增。第一级用水量在216立方米(含)以下,水费为2.60元/立方米;第二级用水量在216~300立方米之间,超出部分水费为3.55元/立方米;第三级用水量为300立方米以上,超出部分水费为6.40/立方米。其中,X表示年用水量,Y表示年度水费。浏览该算法流程图(见下图),回答下列问题。

    程序的算法流程图属于

    (填:选择结构 / 循环结构 / 顺序结构)

    将算法流程图中空缺的部分填上。

  • 4、有如下VB程序段:

    X = 5:Y = Len(“2.345”)

    If  X > Y  Then

       Label1.Caption = “再见!”

    Else

    Label1.Caption = “你好!”

    EndIf

    该程序段运行后,在标签Label1上显示的是

  • 5、执行如下VB程序段时出现下图所示的错误,则引发此错误的语句不可能是(   )

    Private Sub Command1_Click()

    Dim a As Integer, b As Integer

    a =5

    b = Val(Text1.Text)

    b = a + b

    label1.Caption = Str(b)

    End Sub

    A、Private Sub Command1_Click() B、b = Val(Text1.Text)                          C、b = a + b D、label1.Caption = Str(b)
  • 6、执行如下Visual Basic程序段后,a的值范围是(   )

    Private Sub Command1_Click()

    Dim a As Integer

    a = Int(6 * Rnd + 1) * Int(6 * Rnd - 1)

    Print a

    End Sub

     
    A、[0,35] B、[-1,24] C、[-4,35] D、[-6,24]
  • 7、运行如下VB程序段,在文本框Txt1中输入数据76,单击命令按钮Cnd1后,文本框Txt2中显示的内容是(   )

    Private Sub Cnd1_Click( )

       Dim W As Integer,T As String

       W = Val(Txt1.Text)

       T = ”Y”

       If  W < > 100 and W > 80 Then T = ”N”

       Txt2.Text = T

    End Sub

    A、76 B、Y C、N D、T
  • 8、在Visual Basic中,表达式3 ^ 2 Mod 22 \ 2 ^ 3的值是(   )
    A、0 B、1 C、9 D、3
  • 9、在VB中,某同学若想使用变量X存储电子邮箱地址,则X的数据类型应定义为(   )
    A、Boolean B、Double C、Integer D、String
  • 10、下列运算结果中,值最大的是(   )
    A、157\6 B、157/6 C、157 mod 6 D、6 mod 157
  • 11、在VB中,双击窗体中的按钮Command1后,出现的窗口是(   )
    A、项目(工程)窗口 B、工具箱 C、代码窗口 D、属性窗口
  • 12、利用VB设计工程,保存后可生成多个文件,其中能进行代码编写的文件是(   )
    A、XXX.frm B、XXX.vbp C、XXX.exe D、XXX.vbw
  • 13、下列VB程序用于计算10^8的值:

    Private Sub Command1_Click( )

       Dim x As Integer,y As Integer

       x = 8

       y = 10^x

       Text1.Text = Str(y)

    End Sub                                                 

    运行程序时,单击Command1后弹出如上图所示的出错提示,引起该错误的原因是(   )

    A、变量x的数据类型说明不当 B、变量y的数据类型说明不当 C、文本框Text1的宽度不够 D、y值太大,不能在文本框中输出
  • 14、下列关于算法的叙述正确的是(   )
    A、一个算法必须有一个输入 B、一个完整的算法,必须要有输出 C、算法只能用VB语言来表示 D、一个算法的可以无限循环的
  • 15、下列各控件中,没有Caption属性的是(   )
    A、Label B、CommandButton C、TextBox D、Form
  • 16、执行VB语句s=Mid("Hello World",4,4)后,变量s的值为(   )
    A、"o Wo" B、"oWor" C、"lo W" D、"loWo"
  • 17、下列VB的变量定义正确的是(   )
    A、Dim a-b As Integer B、Const d = Single C、Dim c As True D、Dim a,b As Integer
  • 18、已知a的ASCII代码为97,则VB表达式Abs(-5.6) * Sqr(Asc("d"))的值是(   )
    A、56 B、560 C、-56 D、-560
  • 19、VB中,程序段“a=16:b=5:a=a*b:b=a\b:a=a\b”运行后,a和b的值分别是(   )
    A、16,5 B、5,16 C、80,16 D、5,80
  • 20、将数学表达式 b+b24ac2a 写成Visual Basic表达式,正确的是(   )
    A、-b+Sqr(abs(b*b-4ac))/2*a B、-b+Sqr(abs[b*2-4*a*c])\2*a C、(-b+Sqr(abs(b*b-4*a*c)))/(2*a) D、[-b+Sqr[abs(b*b-4*a*c)]]\2*a
上一页 1683 1684 1685 1686 1687 下一页 跳转