在进行截面设计时,ξ尚属未知,用ηe0初步判别构件的偏心类型,()时,可按大偏心受压情况计算;当()时,则按小偏心受压情况计算。
第1题:
A、Pa0/sub2/supsubno<60mHl.PaCO/sub2/supsubno>50mmlg
B、Pa0/sub2/supsubno<60mHgPaCO/sub2/supsubno<45mmg
C、Pa0/sub2/supsubno<60mmHgPaCO/sub2/supsubno>50mmH
D、Pa0/sub2/supsubno<60mHg、PaCO/sub2/supsubno<45mmHg
E、Pa0/sub2/supsubno<60mHg、PaC0/sub2supsubno45mmHg
第2题:
阅读以下说明和Visual Basic 码,将应填入(n)处的字名写在对应栏内
[说明] 设计一个计时程序。该程序用户界面由一个文本框(text 1),两个按钮——命令按钮1 (Command 1)按钮、命令按钮(Command 2)组成。程序运行后,用户按开始按钮,则开始计时,文本框中显示秒数,按停止按钮,则计时停止。单击窗口则退出。
Option Explicit
Dim I
Private Sub Command1 _ Click( )
i=0
Timer1. Interval = 1000
(1)
End Sub
Private Sub Command2_ Click( )
Timer1. Enabled = False
End sub
Private Sub Form. Click(
(2)
End Sub
Private Sub Form. _Load( )
Timer1. Enabled = False
(3)
End Sub
Private Sub Timer1 _ Timer( )
i=i+1
(4)
End Sub
第3题:
下列关于Sub过程的叙述正确的是A.一个Sub过程必须有一个Exie Sub语句B.一个Sub过程必须有一个Enb Sub语句C.在Sub过程中可以定义一个Function过程D.可以用Goto语句退出Sub过程
第4题:
有如下程序。
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
第5题:
设程序中有如下数组定义和过程调用语句:
Dim a(10) as integer
……
Call p(a)
如下过程定义中,正确的是
A)Private Sub p(a as integer)
B)Private Sub p(a() as integer)
C)Private Sub p(a(10) as integer)
D)Private Sub p(a(n) as integer)
第6题:
有如下程序: 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
第7题:
设计一个计时程序。该程序用户界面如图所示,由一个文本框(Text1)、两个按钮:命令按钮1(Command1)、命令按钮2(Command2)组成。程序运行后,单击开始按钮,则开始计时,文本框中显示秒数,单击停止按钮,则计时停止。单击窗口则退出。请在【 】、【 】和【 】处填入适当的内容,将程序补充完整。
Option Explicit
Dim i
Private Sub Command1_Click()
i=0
Timer1.Interval=1000
TimerEnabled=True
End Sub
Private Sub Command2_Click()
TimerEnabled=False
End Sub
Private Sub Form_Click()
【 】Me
End Sub
Private Sub Form_Load()
TimerEnabled=False
TextText=0
End Sub
Private Sub Timer1_【 】()
i=i+1
TextText=【 】
End Sub
第8题:
设程序中有如下数组定义和过程调用语句: Dim a(10)As Integer … Call D(a) 如下过程定义巾,正确的是( )。
A.Private Sub p(a As Integer)
B.Private Sub p(a( )As Integer)
C.Private Sub p(a(10)As Integer)
D.Private Sub p(a(n)As Integer)
第9题:
有如下程序。 Private Sub Commandl_Click() Dim a As Single Dim b As Single a=5:b=4 Call Sub1 ( a,B)End Sub Sub Subl(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
D.1 2
第10题:
( 11 )有 “ 数字时钟 ” 窗体如下:
在窗口中有按钮 “ [ 开 / 关 〕 时钟 ” , 单击该按钮可以显示或隐藏时钟 。 其中按钮的名称为 “ 开关 ” , 显示时间的文本框名称为 “ 时钟 ” ,计时器间隔己设置为 500 。请在空白处填入适当的语句,使程序可以完成指定的功能。
Dim flag As integer
Private Sub Form. Load ()
flag=1
End Sub
Private Sub Form. Timer () ’“ 计时器触发 ” 事件过程
时钟 =Time , 在 “ 时钟 ” 文本框中显示当前时间
End Sub
Private Sub 开关 Click (), “ 开关 ” 按钮的单击事件过程
If 【 11 】 Then
时钟 .Visible=False
flag=0
Else
时钟 .Visible=True
flag=1
End If
End Sub