浙教版初中信息技术九年级上学期期末试卷(5)

修改时间:2021-05-20 浏览次数:71 类型:期末考试 编辑

选择试卷全部试题 *点击此按钮,可全选试卷全部试题,进行试卷编辑

一、单项选择题

  • 1. 在VB程序中能把数值型转换为字符型需要使用的函数是( )
    A . Str B . Val C . Chr D . Sqr
  • 2. a表示“处理框”,b表示“输入、输出框”,c表示“起、止框”,d表示“判断框”,以下四个图形依次为 (  )

      ②   ③   ④

    A . abcd B . dcab C . bacd D . cbad
  • 3. 在VB程序设计阶段,当双击窗体上的某个控件时,所打开的窗口是( )
    A . 工程资源管理器窗口 B . 工具箱窗 C . 代码窗口 D . 属性窗口
  • 4. 小明想学习一种计算机高级语言,下列哪个属于高级语言(  )
    A . photoshop B . 汇编语言 C . Visual Basic D . flash
  • 5. VB启动后,它的工作环境中的窗体,可用作定制应用程序界面的窗口,保存窗体后它的文件扩展名是( )
    A . .frm B . .exe C . .vbp D . .pdf
  • 6. 下列属于正确的VB赋值语句的是(  )
    A . var=Text1.Text B . x+y=3 C . Label1.Caption=“hello” D . -x=b
  • 7. 小明要用VB语句描述“AB”是小于100的非负数,正确的是(  )
    A . 0<=AB<100 B . 0<=AB Or x<100 C . 0<=AB And AB<100 D . 0≤AB<100
  • 8. 下列哪个属于程序设计的基本结构(  )
    A . 顺序结构 B . 链接结构 C . 分支结构 D . 循环结构
  • 9. 请选出下列书写正确的语句( )
    A . p=5 (a+b+p) B . if a>0 then b=b+1 C . t1.text=”请输入密码:” D . For i=1 to 10 do j=j*2
  • 10. 以下一段VB程序运行后,Y的值是( )

    Dim Y As Integer

    Y=0

    Do While Y<30

        Y=(Y+2)*(Y+3)

    Loop

    A . 60 B . 72 C . 34 D . 156

二、综合题

  • 11. VB中我们常常会碰到控件属性及数据类型的使用,请将下列名称与功能正确连接:

    FontSize             文本颜色

    ForeColor            标题

    Caption              单精度实数

    Single               字体大小

    Font                 字体

  • 12. 请在原程序上指出本程序的语法错误,并写出程序结果

    Private Sub Command1_Click()

        Dim x As Integer

        x = Val(Text1.Text)

        Select Case x

        Case Is >= 450

            Text2.Text = "优秀"

        Case Is >= 400

            Text2.Text = "良好"

        Case Is > 350

            Text2.Text = "中等"

        Case Is >= 300

            Text2.Text = "及格"

        Case Else

            Text2.Text = "不及格"

        End Select

    End Sub

    语法错误:

    该程序运行后,若在文本框中输入350,则输出为:

  • 13. 输入两个数(a,b),输出最大数(max);根据题意完成流程图,并将对应的程序填充完整

    (1) 完成流程图

     ② ③ ④

    (2) 将对应的程序填充完整

    说明:text1.text、text2.text、text3.text分别表示a,b,max的值

    Private Sub Command1_Click()

        Dim a AS Integer, b AS Integer

        Dim max AS Integer

        a= 

        b=

        If  then

           

        Else

           

       

    End Sub

试题篮