登录
首页
资讯
APP
Toggle navigation
JAVA题库
hot
BASIC题库
new
您所在的当前位置:
计算机等级考试题库
>
BASIC题库
问题:
[填空题] 有以下程序段,当在消息框中输入8后,y的值为______。
x=InputBox("Enter an Integer")
x=CInt(x)
Select Case x
Case Is<=0
y=0
Case Is<=10
y=5+2*x
Case Is<=15
y=x-5
Case Is>15
y=0
End Select
参考答案:
题目声明
答案有错?我要纠错
提问用户:2e***M5y
查看答案(免费不限制)
提交纠错答案
可能感兴趣的题目:
1
[填空题] 有如下事件过程:
Private Sub Form_Adivate()
Dim Score(1 to 3 ) As Integer
Dim i As Integer
Dim t As Variant
For i=3 To 1 step-1
Score(i)=2*1
Next
For Each t In Score
Print t
Next
End Sub
程序运行后窗体上显示的值为
(10)
2
[填空题] 在窗体上有一个“背景色变换”按钮和一个“结束”按钮。单击“背景色变换”按钮,背景色变为红色;再单击,背景色变为绿色;再单击,背景色变为蓝色;再单击背景色变为红色 ……如此循环。单击“结束”按钮,程序运行结束。请填空。 Private Sub cmdChange_Click() If Mark=0 Then 【 】 Mark=1 ElseIf【 】Then Forml.BackColor=vbGreen Mark=2 ElseIf Mark=2 Then Form1.BackColor;vbBlue 【 】 End If End Sub Private Sub cmdExit_Click() End End Sub
3
[填空题] 在窗体上画1个命令按钮和1个文本框,其名称分别为Commandl和Textl,然后编写如下代码: Dim Save All As String Private Sub Commandl_C1iCk() Text1.Text=Left(UCase(SaveAU),4) End Sub Private Sub Textl_KeyPress(KeyAscii As Intege) SaveA11=Save All+Chr(KeyAscii) End Sub 程序运行后,在文本框中输入abcdefg,单击命令按钮,则文本框中显示的内容是______。
4