电力生产“1000个为什么”
有一直管段，外径Dw为360mm，壁厚δ为5mm，长度为4m。求卷制这样的直管段所需钢板的面积S。
题目
有一直管段，外径Dw为360mm，壁厚δ为5mm，长度为4m。求卷制这样的直管段所需钢板的面积S。
相似问题和答案
第1题：
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
第2题：
A.pH上升
B.PaCO/sub2/supsubno上升
C.PaO/sub2/supsubno上升
D.HCO/sub3/supsubno/sup-/supsubno降低
E.HCO/sub3/supsubno/sup-/supsubno升高
第3题：
有一过程如下:
Sub Sub1(m As Integer,total As Long)
Dim i As Integer
total=1
For i=1 To m
total=total*i
Next
End Sub
调用它的事件过程如下:
Private Sub Command1_Click()
Dim tot As Long,a As Integer
a=Val(InputBox("请输入数据"))
Call Sub1(a,tot)
Print tot
End Sub
则输入数据5,运行结果为【 】。
120 解析：考查考生对过程中参数传递方式的掌握情况。本题的难点是实参与形参的传递问题。total按ByRef参数传递。子过程的功能是计算n!,题中输入5,因此5!=120。参数按传值方式传递时,不改变实参中的值;按传地址的方式传递时,实参和形参指向的内容被改变。
第4题：
假定有如下的Sub过程:
Sub Sub1(x As Single, y As single)
t=x
x=t / y
y=t Mod y
End Sub
在窗体上画一个命令按钮,然后编写如下事件过程:
Private Sub Command1_Click()
Dim a As Single
Dim b As Single
a=5
b=4
Sub1 a,b
Print a;b
End Sub
程序运行后,单击命令按钮,输出结果为
A．54
B．] 1]]1
C．] 1.2]]5.4
D．] 1.25]]1
解析：Sub过程与Function过程最根本的区别是：Sub过程的过程参数名称不能有返回值，而Function过程能通过过程名称得到返回值。
第5题：
设有如下过程： Private Sub Form. KeyDpwn(KeyCode As Integer,Shift As Integer) Print Chr(KeyCode) End Sub Private Sub Form. KeyUp(KeyCode As Integer,Shift As Integer) Print Chr(KeyCode+2) End Sub 若把窗体的KeyPreview属性设置为True，程序运行后，如果按“A”键，则输出结果为（ ）。
A. A A
B. A B
C. A C
D. A D
C) 【解析】本题考查窗体的键盘事件。当按下键盘上某个键时，触发KeyPress事件：按卜．键盘某个键过程中，触发事件KeyDown事件；当松开键盘某个键时，触发事件KeyUp。KeyDown和KeyUp事件返回的是键盘的直接状态(返回的是“键”)，KeyCode参数是用户按下的那个键的扫描码，而KeyPress 返回的是“字符”的ASCIl码，两者不同。当窗体的KeyPreview 设置为True时，如果焦点从控件上跳到窗体上，则该控件的键盘事件也会被触发。
题中只有窗体的KeyDown和KeyUp事件，因此当按下“A”键时，触发KeyDown事件执行“Print Chr(KeyCode)”语句，其中Chr函数的功能是将ASCIl码转换成相应的字符，因此输出字母“A”；当松开“A”键时，触发KeyUp事件执行“Print Chr(KeyCode +2)”语句，因此输出字母…C’。
第6题：
A. 内径
B. 内径×壁厚
C. 外径×壁厚
D. 外径
第7题：
A.pH上升
B.PaCO/sub2/supsubno上升
C.Pa0/sub2/supsubno上升
D.HCO/sub3/supsubno/sup-/supsubno降低
E.HCO/sub3/supsubno/sup-/supsubno升高
第8题：
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Sum=0 For x=1 To 5 Call subl(x, s) Sum=Sum+s Next x Print Sum End Sub Private Sub subl(y, w) w=1 For i=1 To y w=w*i Next i End Sub 程序运行后。单击命令按钮，则窗体上显示的内容是______。
A．5
B．120
C．153
D．160
解析：由于参数y、w是ByRef的参数，称为“引用”，所以在过程Subl中改变的值是带回到调用的地方的，因此Sum结果是5次Subl计算结果的和，即sum=(1+2+6+24+120)=153。本题答案为153。
第9题：
假定有如下的Sub过程：
Sub Sub1(x As Single，y As single)
t=x
x=t/y
y=t Mod y
End Sub
在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Command1_click()
Dim a As Single
Dim b As Single
a=5
b=4
Sub1 a，b
Print a；b
End Sub
程序运行后，单击命令按钮，输出结果为
A．
B．
C．
D．
解析：在调用通用过程时要注意的是参数的传递方式。本题中两个变量都是以传值方式传递。根据传值方式的定义不难计算出本题结果。
第10题：
在窗体中添加一个命令按钮，编写如下程序： Private Sub Sub1(p，m，n) p=p+1：m=m+1：n=n+1 Print "sub1："；p；m；n End Sub Private Sub Command1_Click() a1=1：b=2：c1=3 Call Sub1(a，b1+3，c1) Print"Main："；a1；b1；c1 End Sub 程序运行后，输出结果为
A．Sub： 2 6 4 Main： 2 6 4
B．Sub： 2 6 4 Main： 2 6 4
C．Sub： 2 6 4 Main： 1 2 3
D．Sub： 2 6 4 Main： 2 2 3
解析：这是在实现子过程被调用时参数虚实结合的问题。a1为变量按址传送，b1+3和c1为表达式按值传送。