编写如下事件过程: Private Sub Form_KeyDown(KeyCode As Integer,Shift As Integer) If(Button And 3)=3 Then Print "AAAA" End If End Sub 程序运行后,为了在窗体上输出“AAAA”,应按下的鼠标键为______。
A.左
B.右
C.同时按下左、右
D.按什么键都不显示
第1题:
编写如下两个事件过程: 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"键,则程序输出的结果是
A.A a
B.a A
C.A A
D.a a
第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键和锁定大写键时)运行程序,若按“T”键,则程序输出的结果是
A.T T
B.t T
C.T t
D.t t
第3题:
8、下面哪些是将分数化为浮点数的正确定义?
A.type Fraction = (Integer, Integer) rateq :: Fraction -> Float rateq (a,b) = a/b###SXB###B.type Fraction = (Integer, Integer) rateq :: Fraction -> Float rateq (a,b) = (fromInteger a)/ (fromInteger b)###SXB###C.type Fraction = (Integer, Integer) rateq :: Fraction -> Float rateq (a,b) = fromInteger (a/b)###SXB###D.type Fraction = (Integer, Integer) rateq :: Fraction -> Float rateq (a,b) = (fromIntegral a)/ (fromIntegral b)###SXB###E.ty第4题:
编写如下事件过程: Private Sub Form_KeyDown (KeyCode As Integer,Shift As Integer) Print Chr(KeyCode) End Sub Private Sub Form_Key Press (KeyAscii As Integer) Print Chr (Key Ascii) End Sub 在一般情况下(即不按住Shift键和锁定大写键时)运行程序,若按“T”键,则程序输出的结果是
A.T T
B.t T
C.T T
D.t t
第5题:
1、编写判断一个整数是否偶数的程序: isEven :: Integer -> Bool
第6题:
11、下面哪些定义是类型正确的?
A.f :: (Integer, Integer) -> Float f (x,y) = x / y
B.f :: (Integer, Integer) -> Float f (x,y) = (fromInteger x) / (fromInteger y)
C.f :: (Integer, Integer) -> Float f (x,y) = 3*x + y
D.f :: (Integer, Integer) -> Integer f (x, y) = 3*x + y