塑性指数I<sub>p</sub>是指土颗粒保持结合水的数量,说

题目

塑性指数Ip是指土颗粒保持结合水的数量,说明可塑性的大小,用于确定()的名称和确定单桩极限承载力。

  • A、砂性土
  • B、黏性土
  • C、粉土
  • D、淤泥性土
如果没有搜索结果或未解决您的问题,请直接 联系老师 获取答案。
相似问题和答案

第1题:

阅读程序: Sub p( b () As Integer)For i =1To 4 b(i) = 2(iNext i End Sub Private Sub Command1_Click()Dim a (1 To 4) As Integer a(1)=5 a(2)=6 a(3)=7 a(4)=8 call p (a) For i=1 To 4 Print a(i) Next iEnd Sub运行上面的程序,单击命令按钮,输出结果为。


正确答案:2 4 6 8
【解析】本题综合考查Sub过程的建立与调用以及数组的赋值。P过程为参数b()赋值,赋值方法为b()中的元素值等于其下标的2倍。在事件过程中,数组a(1 to 4)先被逐一赋值,然后以传地址的方式被p过程调用。在调用中,a(i)被重新按照p过程的赋值方式(即元素值等于对应下标值的2倍)赋值。由于是以传地址的方式传送a(1 to 4),故在调用完p过程后,a(1 to 4),故在调用完p过程后,a(1 to 4)中的元素值将保留,故空白处填:2 4 6 8。

第2题:

在窗体画一个命令按钮,然后编写如下事件过程:

Private Sub Command1_CIick()

Dim a(1 To 10)

Dim p(1 To 3)

k=5

For i =1 To 10

a(i)=i

Next i

For i=1 To 3

p(i)=a(i*i)

Next i

For i=1 To 3

k=k+p(i)*2

Next i

Print k

End Sub

程序运行后,单击命令按钮,输出结果是【 】。


正确答案:33
33

第3题:

塑性指数的大下既与土中结合水的含量有关,也与土的颗粒成分有关。()

此题为判断题(对,错)。


答案对

第4题:

在窗体中添加一个名称为Command1的命令按钮,然后编写如下程序:

Private Sub s(ByVal p As Integer)

p=p*2

End Sub

Private Sub Command1_click()

Dim i As Integer

i=3

Call s(i)

If i>4 Then i=i^2

MsgBox i

End Sub

窗体打开运行后,单击命令按钮,则消息框的输出结果为【 】。


正确答案:3
3 解析:由于VBA中,传值调用(ByVal选项)为“单向”作用形式即过程调用只是相应位置实参的值“单向”传送给形参处理,而被调用过程内部对形参的任何操作引起的形参值的变化均不会反馈、影响实参的值。此题中:形参p被说明为ByRef传值形式的整型量,当运行Command1 Click()过程,并调用s()函数,实参i传送其值给形参p,p发生变化p=p*2=3*2=6。但因为使用的是ByVal“单向”传值形式,实参i的的值不发生变化, iF句为假,执行MsgBox i语句后输出3。

第5题:

单击一次命令按钮后,下列程序的执行结果是 Private Sub Command1_Click() s=P(1) +P(2) +P(3) +P(4) Print s End Sub Public Function P(N As Integer) Static Sum For i=1 To N Sum=Sum+i Next i P=Sum End Function

A.15

B.25

C.35

D.45


正确答案:C
解析:在被调用过程中,有这样的语句“StaticSum”,因为变量Sum是局部变量,局部变量除了可以用Dim语句声明外,还可用Static语句将变量声明为静态变量,它在程序运行过程中可保留变量的值,这就是说每次调用过程时,用Static说明的变量保持原来的值。具体过程分析如下:调用P(1),所以在被调过程中N=1,执行ForNext循环,P(1)=Sum=1;调用P(2),所以在被调过程中N=2,执行ForNext循环,P(2)=Sum=4;调用P(3),所以在被调过程中N=3,执行ForNext循环,P(3)=Sum=10;调用P(4),所以在被调过程中N=4,执行ForNext循环,P(4)=Sum=20;不难看出,最后输出的结果S值应为1+4+10+20=35,所以选项C正确。

第6题:

下面程序:________Option Base 1Private Sub Command1_Click() Dim a(10),p(3)As Integer Dim i,k As Integer k=5 For i=1 To 10 a(i)=i Next For i=1 To 3 p(i)=a(i*i) Next For i=1 To 3 k=k+p(i)*2 Next Print kEnd Sub运行后的输出结果为________。

A.33

B.28

C.35

D.37


正确答案:A
解析:此题中共定义了两个数组:a(i),p(i),共用到三次For循环:
  第一个For语句是对数组a(i)赋值,a(1)到a(10)的值分别为1到10;
  第二个For语句是对数组p(i)赋值,p(1)=a(1)=1,p(2)=a(4)=4,p(3)=a(9)=9;
  第三个For语句是对k的值循环相加,三次循环的结果分别为:7,15,33。

第7题:

在窗体中添加一个名称为Com1的命令按钮,然后编写如下程序:

Private Sub s(ByVal p As Integer)

p=p*2

End Sub

Private Sub Com1_Click()

Dim i As Integer

i=3

Call s(i)

If i>4 Then i=i^2

End sub

窗体打开运行后,单击命令按钮,则消息框的输出结果为( )。


正确答案:3
3 解析: 本题考查VBA程序的知识。在VBA的过程调用时,参数有两种传递方式:传址传递和传值传递。如果在过程声明时形参用ByVal声明,说明此参数为传值调用,此时形参的变化不会返回到实参;若用ByRef声明,说明此参数为传址调用,此时形参的变化将会返回到实参:没有说明传递类型,则默认为传址传递。此题中形参p被说明为ByVal传值形式的整型量,当运行Com1_Click()过程时调用s()函数,实参i传送其值给形参p,p发生变化p=p*2=3*2=6。但因为使用的是ByVal传值传递,所以实参i的值不发生变化,if语句中的判断条件为假,所以会直接执行MsgBox i语句后输出3。

第8题:

(16)在窗体上画一个命令按钮,其名称为Commandl.程序运行后,单击命令按钮,输出结果是 Private Sub p1(n As Integer) For i=n To 1 Step -1 x=String(i,"*") Print x Next i End Sub Private Sub Commandl_Click() P1(3) End SubA.*** ** *B.* ** ***C.* * *D.******


正确答案:A
【解析】分析程序可知,命令按钮单击事件调用p1(3)函数,因此循环中的n为3,所以For循环的条件为Fori=3 to l Step-1,所以For循环从3递减到1,输出的“*”号也递减,每一次Print执行后,自动换行。最后输出的结果如选项A)所示。

第9题:

在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Commandl_Click() Dim m As Integer, n As Integer, p As Integer m=3: n=5: p=0 Call Y(m, n, p) Print Str(p) End Sub Sub Y(ByVal i As Integer, ByVal j As Integer, k As Integer) k=i+j End Sub 程序运行后,如果单击命令按钮,则在窗体上显示的内容是( )

A.4

B.6

C.8

D.10


正确答案:C
解析:此程序考查了函数的调用,函数过程有3个形参,功能是将第一个和第二个形参的和赋给第三个形参,其中前两个形参是按值传递,不会影响实参的数值,即在调用函数过程的过程中,不变化实参的数值;而第三个形参是按址传递,传递的是实参的地址,这样实参会随着过程中形参的变化而变化,即改变实参的数值。在主调过程中定义了三个整型变量,分别赋值3、5、0,调用过程后 m,n的数值仍然是3、5,而p的值不再是0而变为8即m、n的和,这也是被调函数的作用。

第10题:

执行下面的程序,消息框的输出结果是 【 】。

Option Basel

Private Sub Commandl Click()

Dim a(10),P(3)As Integer

k=5

For i=1 To 10

a(i)=i

Next i

For i=1 To 3

P(i)=a(i*i)

Next i

For i=1 To 3

k=k+p(i)*2

Next i

MsgBox k

End sub


正确答案:33
33 解析:本题考查VBA中的数组与循环结构。题目中有3个循环,但相互之间并没有嵌套。第一个For循环实现向数组a赋初值,第二个For循环实现对数组a进行相关运算,然后赋给数组p,p(1)=a(1)=1,p(2)=a(4)=4, p(3)=a(9)=9。第三个For循环进行相关计算,然后把结果交给k,i=l时k=5+p(1)*2=7,i=2时k=7+p(2)*2=15,i=3时k=15+p(3)*2=33最后由MsgBox将结果输出。

更多相关问题