[主观题]

程序运行后,若为“甲队”且成绩大于80分,则在窗体上显示“表现优良”,否则显示“表现普通”。

Private Sub Form_Activate()

D.im team1 As String

D.im fen As Integer

team 1="乙队"

fen=86

Print

Print"球队=;"team1

Print"成绩=;"fen

If team1="甲队"Then

If fen>=80 Then

Print"表现优良!"

E.lse

______

E.nd If

E.lse

Print"表现普通"!

E.nd If

E.nd Sub

参考答案与解析:

相关试题

程序运行后,单击窗体,则在窗体上显示的内容是().

[单选题]程序运行后,单击窗体,则在窗体上显示的内容是().A . 6B . 5C . 4D . 3

  • 查看答案
  • 设有如下程序: 程序运行后,单击窗体,则在窗体上显示的是( )。

    [单选题]设有如下程序:程序运行后,单击窗体,则在窗体上显示的是( )。A. 4 3 2 1B. 5 4 3 2C. 6 5 4 3D. 7 6 5 4

  • 查看答案
  • 程序运行后,如果单击命令按钮,则在窗体上显示的内容是()

    [单选题]程序运行后,如果单击命令按钮,则在窗体上显示的内容是()A . BBCCCDDDDEEEEEB . ABBCCCDDDDC . BCCDDDEEEED . AABBBCCCCDDDDD

  • 查看答案
  • 程序运行后,如果单击命令按钮则,在窗体上显示的内容是().

    [单选题]程序运行后,如果单击命令按钮则,在窗体上显示的内容是().A . 10,5B . 20,5C . 20,40D . 10,40

  • 查看答案
  • 执行下面的程序,单击窗体后在窗体上显示的结果是 ______。Private S

    [单选题]执行下面的程序,单击窗体后在窗体上显示的结果是 ______。Private Sub form_ Click() Dim Str1 As String, Str2 As String Dim Str3 As String, I As Integer Str1 = "e" for I = t To 2 Str2 = Ucase (Str1) Str1 = Str2 & Str1 Str3 = Str3 & Str1 str1 = Chr (Asc(Str1) + I) Next

  • 查看答案
  • 程序运行后,要使窗体上仅显示字符,且此字符可被用户修改,可用控件( )

    [单选题]程序运行后,要使窗体上仅显示字符,且此字符可被用户修改,可用控件( )A.LabelB.TextBoxC.CommandbuttonD.Image

  • 查看答案
  • 下面的程序运行时,单击窗体后,窗体上显示的结果是( )。

    [单选题]下面的程序运行时,单击窗体后,窗体上显示的结果是( )。A.9 8 7 6 3 2B.2 3 6 7 8 9C.9 8 7 6 3D.2 3 6 7 8

  • 查看答案
  • 编写如下事件过程: 程序运行后窗体上显示( )。

    [单选题]编写如下事件过程:程序运行后窗体上显示( )。A. 6 4 2B. 2 4 6C. 2D. 6

  • 查看答案
  • ( 27 )下面程序执行时,在窗体上显示的是Private Sub Comman

    [单选题]( 27 )下面程序执行时,在窗体上显示的是Private Sub Command1_Click()D.im a(10)F.or k = 1 To 10a(k) = 11 – kNext kPrint a(a(3)/a(7) Mod a(5))E.nd SubA. ) 3B. ) 5C. ) 7D. )9

  • 查看答案
  • 要在窗体上显示图片,需设置窗体的()属性.

    [单选题]要在窗体上显示图片,需设置窗体的()属性.A . CaptionB . IconC . Picture ;D . ControlBox

  • 查看答案