相关试卷

  • 1、输入一个成绩, 若大等90显示“优”,否则若大等80显示“良”,否则若大等70显示“一般”,否则若大等60显示“及格”,否则显示“不及格”

    PRIVATESUB FORM_CLICK( )

        DIM X AS SINGLE

        X=VAL(INPUTBOX(“请输入一个成绩”))

        SELECT CASE 

            CASE 

                PRINT “优”

            CASE 

                PRINT “良”

            CASE

                PRINT “一般”

            CASE

                PRINT “及格”

            CASE 

                PRINT “不及格”

       

    END SUB

  • 2、清除窗体上的内容,清除TEXT1中的内容,清除LABEL2上的内容.

    PRIVATE SUB FORM_CLICK( )

       

       

       

    END SUB

  • 3、输入两个数,交换后在窗体上输出这两个数.

    PRIVATE SUB FORM_CLICK( )

        A=VAL(INPUTBOX(“请输入第一个数”))

        B=VAL(INPUTBOX(“请输入第二个数”))

        T=A

       

       

       

    END SUB

  • 4、第一个单选按钮的默认名称是
  • 5、用户使用对窗体上的单选按钮分组。
  • 6、IF语句的配对语句是
  • 7、VB中按从高到低的优先级,写出三个布尔运算符 , OR
  • 8、条件表达式成立时,用表示,不成立时用表示
  • 9、通常条件表达式分为两类,分别是表达式和表达式
  • 10、选择结构程序设计的主导思想是从多个分支中选择
  • 11、VB中的六种关系运算符是>,<,=,
  • 12、当CHECK1被选中时,其VALUE属性取值为(     )
    A、1 B、0 C、TRUE D、FALSE
  • 13、在单选 按钮上放图片,首先设置(     )属性
    A、Picture B、Alignment C、Style D、Caption
  • 14、不能实现分支结构程序设计的语句是(      )
    A、IF       THEN  B、SELECT      END  SELECT C、IF    ELSEIF      END  IF D、DO    LOOP
  • 15、下列程序的执行结果是(       )

    PRIVATE SUB FORM_CLICK( )

        X=INT(RND)+6

        SELECT CASE X

            CASE IS>5

                PRINT 5

            CASE IS >4

                PRINT 4

            CASE IS>3

                PRINT 3

            CASE ELSE

                PRINT 2

        END SELECT

    END  SUB

    A、5 B、4 C、3 D、5   4   3
  • 16、PRIVATE SUB FORM_CLICK( )

        A=VAL(INPUTBOX(“请输入第一个数”))

        B=VAL(INPUTBOX(“请输入第二个数”))

        C=VAL(INPUTBOX(“请输入第三个数”))

        M=A

        IF M>B THEN M=B

        IF M>C THEN M=C

        PRINT M

    END SUB

    A、给出三个数中的大数 B、给出三个数中的小数 C、给出三个数中的某个数 D、出错
  • 17、在窗体上画一个名称为Command1的命令按钮和两个名称分别为Text1、Text2的文本框,然后编写如下事件过程:

    PrivateSubCommand1_Click()

        n=VAL(Text1.Text)

        SelectCasen

            Case1To20

                x=10

            Case2,4,6

                x=20

            CaseIs<10

                x=30

            Case10

                x=40

        EndSelect

        Text2.Text=x

    EndSub

    程序运行后,如果在文本框Text1中输入10,然后单击命令按钮,则在Text2中显示的内容是(      )

    A、10 B、20 C、30 D、40
  • 18、执行下面的程序段后,x的值为(    )

    x=1

    For i=1 to 20 step 2

      x=x+i\5

    Next i

    A、17 B、18 C、19 D、20
  • 19、用N代表数值型,D代表日期型,下列表达式不合法的是(     )
    A、D+N B、D-N C、D-D D、D+D
  • 20、IF TRUE THEN PRINT 1  ELSE PRINT  2

    这段代码的执行结果是(     )

    A、1 B、0 C、无输出 D、出错
上一页 503 504 505 506 507 下一页 跳转