计算题：有一个直径d0＝10mm，L0＝100mm，低碳钢试样，拉伸试验时测得Fs＝21KN，Fb＝29KN，d1＝5.65mm，L1＝138mm，求此试样的бs、бb、δ、ψ0。

第1题

在窗体中添加一个名称为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．10B．30C．40D．50

点击查看答案

第2题

有如下程序 Private Sub Command1_Chck( ) s=0 DO s=(s+1) *(s+2) N=N+1 Loop Until s＞=10 Prim N；s End Sub 运行后的输出结果是A．0 1B．30 30C．4 30D．2 12

点击查看答案

第3题

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim a As Integer，s As Integer a = 8 s = 1 Do s = s + a a = a - 1 Loop While a＜=0 Print s，a End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是A．7 9B．34 0C．9D．死循环

点击查看答案

第4题

写出程序运行的结果Public class BasePublic virtual string Hello() {return “Base”;}Public class Sub:BasePublic override string Hello() {return “Sub”;}1. Base b = new Base(); b.Hello;2. Sub s = new Sub(); s.Hello;3. Base b = new Sub (); b.Hello;4. Sub s = new Base(); s.Hello;

点击查看答案

第5题

在窗体中添加一个名称为Commandl的命令按钮，然后编写如下程序： Public x As IntegerPrivate Sub Commandl_Click0x=10CaU slCall s2MsgBoxXEndSubPrivate Sub sl0x=X+20EndSubPrivate Sub s20Dim xAs IntegerX=x+20EndSub窗体打开运行后，单击命令按钮，则消息框的输出结果为（ ）。A.10B.30C.40D.50

点击查看答案

第6题

在窗体中添加一个名称为Commandl的命令按钮，然后编写如下程序： Public x As Integer Private Sub Commandl_click() x＝10 Call s 1 Call s 2 MsgBOx x End Sub Pfivate Sub s1() x＝x+20 End Sub Private SubA．10B．30C．40D．50

点击查看答案

第7题

在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Commandl Click() Dim a() a=Array(1,3,5,7) s=0 For i=1 To 3 S=S*10+a(i) Next i Print s End Sub 程序运行后，输出结果为( )。A．135B．357C．531D．753

点击查看答案