工程上把屈服点与抗拉强度的比值(αs/αb)称为屈强比,其值越高,则强度的利用率越()。
第1题:
A、Sub S1(ByVal n!())
B、Sub S1(n!) as Integer
C、 Function S1%(S1%)
D、 Function S1(ByVal n!)
第2题:
在窗体中添加一个名称为Command1的命令按钮,然后编写如下程序: Public x As Integer Private Sub Command1_Click() x=10 Call s1 Call s2 MSgBox x End Sub Private Sub s1() x=x+20 End Sub Private Sub s2() Dim x As Integer x=X+20 End Sub 窗体打开运行后,单击命令按钮,则消息框的输出结果为______。
A.10
B.30
C.40
D.50
第3题:
在窗体上添加一个按钮(cmd) ,编写如下程序:
Private sub crud_click( )
Dim s, i
Fori = 1 to 10
s=s+i
Next
Msgbox s
End sub
程序运行后,单击按钮,在消息框中显示的信息为 【 】 。
第4题:
编写如下事件过程: Private sub sub1 (ByVal x1 As String, y1 As String) Dim xt As String Dim i As Integer i = Len(x1) Do While i>= 1 xt = xt + Mid(x1, i, 1) i=i-1 Loop y1 = xt End Sub Private Sub Form. Click() Dim s1 As String, s2 As String s1= "teacher" sub1 s1, s2 Print s2 End Sub 程序运行后,单击窗体,则窗体上显示的内容是
A.rehcaet
B.tahreee
C.themee
D.eerthea
第5题:
假定一个工程由一个窗体文件Form1和两个标准模块文件Model1及Model2 组成。 Model1代码如下: Public X As Integer Public Y As Integer Sub S1( ) x=1 S2 End Sub Sub S2( ) y=10 Form1.Show End Sub Model2的代码如下: Sub Main( ) S1 End Sub 其中Sub Main被设置为启动过程。程序运行后,各模块的执行顺序是( )。
A.Form1→Model1→Model2
B.Model1→Model2→Form1
C.Model2→Model1→Form1
D.Model2→Form1→Model1
第6题:
A、Sub plus(sum, a , b ): sum = a + b: End Sub
B、Sub plus(ByVal sum , a , b ): sum = a + b: End Sub
C、Sub plus(sum , ByVal a, ByVal b ): sum = a + b: End Sub
D、Sub plus(sum , ByRef a , ByRef b ): sum = a + b: End Sub
第7题:
把‘今天天气不错!’变为‘今天天气不错’是( )。
A.<sup></sup>
B.<s></s>
C.<tt></tt>
D.<sub></sub>
E.<i></i>
第8题:
有如下SUB过程:
Sub s(x As Single,y As Single)
t=x
x=t / y
y=t Mod y
End Sub
在窗体上添加一个命令按钮,然后编写如下事件过程:
Private Sub Form_Click()
Dim a As Single
Dim b As Single
a=5
b=4
s a,b
Print a,b
End Sub
则程序运行后,单击命令按钮,输出的结果为【 】 。
第9题:
在窗体中添加一个名称为Commandl的命令按钮,然后编写如下程序:Public X As Integer Private Sub Commandl Click( )x=10 Call slCall s2MsgBox x End Sub Private Sub sl( )x=x+20 End Sub Private Sub s2( )Dim x As Integer x=x+20End Sub窗体打开运行后,单击命令按钮,则消息框的输出结果为( )。
A.10
B.30
C.40
D.50
第10题:
设在窗体Forml上有一个列表框Listl,其中有若干个项目。要求单击列表框中某一项时,把该项显示在窗体上,正确的事件过程是。 A.Private Sub Listl_Click B.Private Sub Forml_Click Print Listl.Text Print Listl.Text End Sub End Sub C.Private Sub Listl_Click D.Private Sub Forml_Click Print Forml.Text Listl.Print Listl.Text End Sub End Sub