题目内容

在窗体上画一个文本框,其名称为Text1,然后编写如下事件过程:
Private Sub Text1_KeyPress(KeyAscii As Integer)
Dim str As String
Str=Chr(KeyAscii)
KeyAscii=Asc(UCase (str))
Textl.Text=String(2, KeyAscii)
End Sub
程序运行后,如果在键盘上输入字母"b",则在文本框Text1中显示的内容是

A. bbb
BBB
C. BB
D. bb

查看答案

搜索结果不匹配？点我反馈

更多问题

听力原文：Man: Good morning. Maxton Products.
Woman: Oh, hello. I saw in the paper last week that you've got a vacancy for a secretary in your production department.
Man: Well, actually that vacancy was in the personnel department but the position's filled now. We are looking for a secretary in the sales department, though.
Woman: Thanks, but I'm not really interested...
？For questions 1-8 you will hear eight short recordings.
？For each question, mark one letter (A, B, or C) for the correct answer.
After you have listened once, replay each recording.
Which department has a vacancy at the moment？

A. Personnel
B. Sales
C. Production

Which chart are the two women talking about？

有如下程序。
Private Sub Command1_Click()
Dim a As Single
Dim b As Single
a=5: b=4
Call Sub1(a, b)
End Sub
Sub Sub1(x As Single, y As Single)
t=x
x=t \ y
y=t Mod y
End Sub
在调用运行上述程序后,a和b的值分别为

A. 0 0
B. 1 1
C. 2 2
D. 1 2

Which car park will close during repair work？