下列程序的功能是:当x<50时,y=0.8*Π;当50≤x≤100时,y=0.7*Π;当x>100时,没有意义。请填空。 Private Sub Command1_Click()Dim x As Single x=InputBox("请输入x的值!") Select Case x Case Is < 50 y=0.8 * x Case 50 To 100 y=0.7 * x 【 】 Print "输入的数据出界!" End Select Print x, y End Sub
查看答案
追究责任主体的法律责任的法理依据在于行为人的行为危害了法律所保护的社会关系。
再拍卖是指 。
A. 两次以上的拍卖
B. 多次拍卖
C. 不断地拍卖
设a=5,b=4,c=3,d=2,则表达式3>2*b Or a=c And b<>c Or c>d的值是
A. 1
B. True
C. False
D. 2
编写如下两个事件过程: Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) Print Chr(KeyCode) End Sub Private Sub Form_Keypress(KeyAscii As Integer) Print Chr(KeyAscii) End Sub 在一般情况下(即不按住Shift键和锁定大写键时) 运行程序,如果按"A"键,则程序输出的结果是
AA
B. aA
C. Aa
D. aa