题目内容

在窗体上画一个命令按钮和一个文本框(名称分别为Command1和Text1),并把窗体的KeyPreview属性设置为True,然后编写下列代码: Dim SaveAll As String Private Sub Form Load() Show Text1.Text="" Text1.SetFocus End Sub Private Sub Command1 Click() Text1.Text=LCase(SaveAll)+SaveAll End Sub Private Sub Form KeyPress(KeyAscii As Integer) SaveAll=SaveAll+Chr(KeyAscii) End Sub 程序运行后,直接用键盘输入VB,再单击命令按钮,则文本框中显示的内容为( )。

A. vbVB
B. 不显示任何信息
C. VB
D. 出错

查看答案
更多问题

Greenspace facilities are contributing to an important extent to the quality of the urban environment. Fortunately, it is no longer necessary that every lecture or every book about this subject has to start with the proof of this idea. At present it is generally accepted, although more as a self-evident statement than on the base of a closely-reasoned scientific proof. The recognition of the importance of greenspaces in the urban environment is a first step on the right way; this does not mean, however, that sufficient details are known about the functions of greenspace in towns and about the way in which the inhabitants are using these spaces. As to this rather complex subject I shall, within the scope of this lecture, enter into one aspect only, namely the recreative function of greenspace facilities.The theoretical separation of living working, traffic and recreation which for many years has been used in town-and-country planning, has in my opinion resulted in disproportionate attention for forms for improvement of recreative possibilities in the direct neighborhood of the home. We have come to the conclusion that this is not right, because an important part of the time which we do not pass in sleeping or working, is used for activities at and around home. So it is obvious that recreation in the open air has to begin at the street-door of the house. The urban environment has to offer as many recreation activities as possible, and the design of these has to be such that more obligatory activities can also have a recreative aspect.The very best standard of living is nothing if it is not possible to take a pleasant walk in the district, if the children cannot be allowed to play in the streets because the risks of traffic are too great, if during shopping you can nowhere find a spot for enjoying for a moment the nice weather, in short, if you only feel yourself at home after the street-door of your house is closed after you. The author suggests that the recreative possibilities of greenspace should be provided().

A. in special areas
B. in the suburbs
C. in the neighborhood of the house
D. in gardens and parks

Why don’t birds get lost on their long flights from one place to another Scientists have puzzled over this question for many years. Now they’re beginning to fill in the blanks.Not long ago, experiments showed that birds rely on the sun to guide them during daylight hours. But what about birds that fly by night Tests with artificial stars have proved that certain night - flying birds are able to follow the stars in their long- distance flights.A dove (鸽子)had spent its lifetime in a cage and had never flown under a natural sky. Yet it showed an inborn ability to use the stars for guidance. The bird’s cage was placed under an artificial star-filled sky. The bird tried to fly in the same direction as that taken by his outdoor cousins. Any change in the position of the artificial stars caused a change in the direction of his flight.But the stars are apparently their principal means of navigation(航行)only. When the stars are hidden by clouds, they seemingly find their way by such landmarks as mountain ranges, coast lines, and river courses. But when it’s too dark to see these, the doves circle helplessly, unable to find their way. In total darkness, doves().

A. use lights to find their way
B. don’t know which way to fly
C. made their return flight by themselves
D. wait for the stars to appear

阅读下面短文,回答下面问题。 父亲喜欢兰草,过些日子,就要到深山中一趟,带回些野兰来培栽。几年问,家里庭院就有了百十余品种,像要做一个兰草园圃似的。方圆十几里的人就都跑来观赏,父亲并不因此而得意,反而有几分愠怒。以后又进山去、可不再带回那些野生野长的兰草了。这事使我很奇怪,问他,又不肯说,只是有一次再进山的时候,要我和他一块去访兰。 我们走了半天,一直到了山的深处。那里有一道瀑布,从几十丈高的山崖直直垂下,老远就听到了轰轰隆隆的响声,水沫扬起来,弥漫了半个天空,日光在上面浮着,晕出七彩迷丽的虚幻。我们沿谷底走,便看见有很多野兰草,盈尺高的,都开了淡淡的兰花,像就地铺着一层寒烟;香气浓烈极了,气浪一冲,站在峡谷的任何地方都闻到了。 我从未见过这么清妙的兰草,连声叫好,要动手挖。父亲却把我制止了,问道:“你觉得这里的兰草好呢,还是家里的那些好呢” 我说:“这里的好!” “怎么好呢” 我却说不出来。“好像是味儿不同吗” “是的。” “这是为什么一样的兰草,长在两个地方就有两个味儿” 父亲说:“兰草是空谷的幽物,得的是天地自然的原气。长的是山野水畔的趣姿;一经培栽,便成了玩赏的盆景。” “但它确实叶更嫩、花更繁更大了呢!” “样子似乎是美了,但美得太甜、大媚,格调也就俗了。” 父亲的话是对的,但我不禁惋惜:这么精神的野兰在这么个空谷僻野,叶是为谁长的,花是为谁开的,会有几个人欣赏它呢 “这正是它的不俗处。它不为被人欣赏而生长,却为着自己的特色而存在着,所以它才长得叶纯,开得花纯,楚楚的有着它的灵性。” 父亲拉我坐在潭边。他看着兰,也在看着我,说;“做人也是这样啊,孩子!人活在世上,不能失了自己的真性,献媚处事,就像盆景中的兰草一样降了品格;低俗的人不会对社会有贡献的。” 我深深地记着父亲的话。从那以后,已经是15年过去了,我一直未敢忘却过。 (贾平凹《访兰》) 不属于野兰不俗之处的一项是:

A. 不为被人欣赏而生长。
B. 为着自己的特色而存在着。
C. 太甜太媚。
D. 长得叶纯,开得花纯。

设在工程文件中有一个标准模块,其中定义了下列记录类型: Type Books Name As String*10 TelNum As String*20 End,Type 在窗体上画一个名为Command1的命令按钮,要求当执行事件过程Command1 Click 时,在顺序文件Person.txt中写入一条Books类型的记录。下列能够完成该操作的事件过程是 ( )。

A. Private Sub Command1 Click()
B. Dim B AS Books
C. Open"Person txt"For Output As#1
D. Name=InputBox(”输入姓名”)
E. relNum=lnputBox(”输入电话号码”)
F. Wlite#1 B Name,B TelNum
G. Ch,se#1
H. End Sub
I. Private Sub Command1 Click()
J. Dim B AS Books
K. Open"Person txt"For Input As#1
L. Name=InputBox("输入姓名")
M. TelNum=InputBox("输入电话号码")
N. Print#1,B.Name,B.TelNam
O. Close#1
P. End Sub
Q. Private Sub Command1 Click()
R. Dim BAS Books
S. Open"Person txt"For Output As#1
T. Name=InputBox("输入姓名")
U. TelNum=InputBox("输入电话号码")
V. Write#1,B
W. Close#1
X. End Sub
Y. Private Sub Commandl Click()
Z. Open"Person txt"For Input As#1
[. Name=lnputBox("输入姓名")
\. TelNum=lnputBox("输入电话号码")
]. Prim#1 Name TelNum
^. Close#1
_. End Sub

答案查题题库