S1损伤平面的关键肌为（）A、趾长伸肌B、屈髋肌（髂腰肌）C、伸膝肌（股四头肌）D、足背伸肌（胫骨前肌）E、踝跖屈肌（腓肠肌、比目鱼肌）

题目

S1损伤平面的关键肌为（）

  • A、趾长伸肌
  • B、屈髋肌（髂腰肌）
  • C、伸膝肌（股四头肌）
  • D、足背伸肌（胫骨前肌）
  • E、踝跖屈肌（腓肠肌、比目鱼肌）
相似考题

1.执行下面的程序段，x的值为【 】。Private Sub Command1_Click()For i=1 To 9a=a+iNextx=Val(i)MsgBox xEnd Sub

2.在窗体上画一个命令按钮和两个文本框，其名称分别为Command1、Text1和Text2，然后编写如下程序： Dim S1 As String,S2 As String Private Sub Form_Load() Text1.Text＝"" Text2.Text＝"" End Sub Private Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer) S2=S2 & Chr(Keycode) End Sub Private Sub Text1_KeyPress(KeyAscii As Integer) S1=S1 & Chr(KeyAscii) End Sub Private Sub Command1_Click() Text1.Text=S2 Text2.Text=S1 S1＝"" S2＝"" End Sub 程序运行后，在Text1中输入“abc”，然后单击命令按钮，在文本框Text1和Text2中显示的内容分别为______。A．abc和ABCB．abc和abeC．ABC和abcD．ABC和ABC

3.阅读程序： 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运行上面的程序，单击命令按钮，输出结果为。

4.下列程序的执行结果为Private Sub Command1_Click（）Dim s1 As String, s2 As Strings1= "abcd"Call Transfer（s1, s2）Print s2End SubPrivate Sub Transfer （ByVal xstr As String, ystr As String）Dim tempstr As Stringi=Len（xstr）Do While i >=1tempstr=tempstr + Mid（xstr, i, 1）i=i - 1Loopystr=te mpstrEnd Sub（ ）。A．dcbaB．abdcC．abcdD．dabc

参考答案和解析
正确答案:E
更多“S<sub>1</sub>损伤平面的关键肌为（）”相关问题

  • 第1题：

    下列过程说明合法的是( )

    A、Sub S1(ByVal n!())

    B、Sub S1(n!) as Integer

    C、 Function S1%(S1%)

    D、 Function S1(ByVal n!)


    参考答案D

  • 第2题：

    执行下面的程序，消息框里显示的结果是_______。

    Private Sub Form_Click()

    Dim Str As String

    Str=""

    S="Access"

    Fori=Len(S)To 1 Step-l

    Str=Str&Mid(S，i，1)

    Next i

    MsgBox Str

    End Sub


    正确答案：sseccA
    sseccA 解析：本题考查VBA中字符串的知识。本题中循环次数等于字符串的长度，每次在Str后面连接上一个字符，该字符取自字符串 S的第i位。由于i反向循环，实际上完成的是字符串倒序的功能。

  • 第3题：

    在窗体中添加一个名称为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


    正确答案：B
    解析：本题使用Call关键字调用子过程s1，s2。x=10在调用子过程s1后，x=30，但由于在s1中直接使用变量，所以该值的作用范围是局部的，即只限于s1子过程中，没有传回。在调用s2时，由于s2使用Dim...As关键字定义x，所以其值是模块范围的。故在消息框中输出的值，是从子过程s2传回的值。

  • 第4题：

    假定有如下的Sub过程： Sub S(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 S a，b Print a，b End Sub 程序运行后，单击命令按钮，输出结果为 ______ 。

    A．5 4

    B．1 1

    C．1.25 4

    D．1.25 1


    正确答案：D
    解析：Visual Basic的函数参数默认的方式是传地址的，所以函数S对参数做的改变会反映到原来的变量里。

  • 第5题：

    写出程序运行的结果

    Public class Base

    Public virtual string Hello() {return “Base”;}

    Public class Sub:Base

    Public 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;


    正确答案：
     

  • 第6题：

    执行下面的程序，消息框里显示的结果是( )。

    Private Sub Form_Click()

    Dim Str As String,S As String,k As Integer

    S=Str

    For k=Len(Str) To 1 Step -1

    S=S & (Mid(Str,k,1)

    Next k

    End Sub


    正确答案：abccba
    abccba

  • 第7题：

    编写如下事件过程： Option Base 1 Private Sub Form Click() Dim x1()As Integer Dim i As Integer Dim s As Integer ReDim x1(3) For i = 1 To UBound(x1) x1(i)=i + 1 Next i Call sub1(x1) For i = 1 To UBound(x1) s = s + x1(i) Next i Print s End Sub Private Sub sub1(n()As Integer) Dim i As Integer ReDim Preserve n(5) For i = 3 To 5 n(i)=n(i-1)*2 Next i End Sub 程序运行后，单击窗体，则窗体上显示的内容是

    A．6

    B．12

    C．24

    D．47


    正确答案：D
    解析：在主过程中，数组x1的下标最大值为3，赋初值分别为2、3、4，通过实参和形参的调用，数组x1的值传给了数组n。在子过程中，数组n的下标最大值被重新定义为5，下标3～5的值计算的结果分别为6、12、24。在主过程中，将数组x1的各值相加得：2+3+6+12+24=47。

  • 第8题：

    在窗体上画一个命令按钮和两个文本框，其名称分别为Command1、Text1和Text2，在属性窗口中把窗体的KeyPreview属性设置为True，然后编写如下程序： Diln S1 As String，S2 As String Private Sub Form. Load（ ） Text1．Text="" Text2．Text="" Text1．Enabled=False Text2．Enabled=False End Sub Private Sub Form. KeyDown(KeyCode As Integer，Shift As Integer) S2=S2＆Chr(KeyCode) End Sub Pri vate Sub Form. KeyPress(KeyAscii As Integer) S1=S1＆Chr(KeyAscii) End Sub Private Sub Command1 Click（ ） Text1．Text=S1 Text2．Text=S2 S1="" S2="" End Sub 程序运行后，先后按“a”、“b”、“c”键，然后单击命令按钮，在文本框Text1和Text2中显示的内容分别为（ ）。

    A.abc和ABC

    B.空白

    C.ABC和abc

    D.出错


    正确答案：A
    A。【解析】KeyPrtview属性被设置为True，则一个窗体先于该窗体上的控件接收到此事件。Form_Load事件是窗体载入事件，常用于窗体的初始化，Text1和Text2的属性Enabled设置成false，禁止向文本框里输入。本题中Form_KeyDown，Form_KeyPress事件的作用是将用户按下的按键值分别传给字符串s1、s2，然后通过命令按钮输出。

  • 第9题：

    下列程序的执行结果为 Private Sub Commandl_Click() Dim s1 As String ,s2 As String s1= "abcd" Call Transfer(sl，s2) Print s2 End Sub Private Sub Transfer (ByVal xstr As String，ystr As String) Dim tempstr As String ystr=tempstr End Sub

    A．dcba

    B．abdc

    C．abcd

    D．dabc


    正确答案：A
    解析：主调函数最终输出值是s2值，这就得调用函数过程Transfer函数。被调过程Transfer的参数xstr，ystr从主调函数中收到实参s1，s2传来的值"abcd"，过程Transfer开始声明了两个String型的变量，xstr、ystr。i=Len(xstr)语句的功能是：i的值就是xstr的长度，此题为4。程序代码执行DoWhile…Loop的循环语句。循环体为tempstr=tempstr+Mid(xstr，i，l)，其中变量是I，由I=Len(xstr)开始的，每循环一次减1。此程序的最后输出的是字符串s1的反向输出。

  • 第10题：

    设字符串S1= “ABCDEF”，S2= “PQRS”，则运算S=CONCAT（SUB（S1，2，LEN（S2）），SUB（S1，LEN（S2），2））后的串值为（）。


    正确答案:“BCDEDE”

  • 第11题：

    单选题
    永续盘存法公式为（）
    A

    K<sub>t</sub>＋1＝I<sub>t</sub>－（1－δ）K<sub>t</sub>

    B

    K<sub>t</sub>＋1＝It＋（1－δ）K<sub>t</sub>

    C

    K<sub>t</sub>＋1＝I<sub>t</sub>＋（1＋δ）K<sub>t</sub>

    D

    K<sub>t</sub>＋1＝I<sub>t</sub>－（1＋δ）K<sub>t</sub>


    正确答案： C
    解析： 若用Kt表示第t期初的固定资产存量，It表示第t期投资购建的固定资产数量，δ表示固定资产的折旧率，则有永续盘存法公式为：Kt＋1＝It＋（1－δ）Kt。

  • 第12题：

    填空题
    s=”this is the mainstring”，sub=”string”，strindex（s，sub）是（）

    正确答案： 13
    解析： 暂无解析

  • 第13题：

    阅读如下程序, a = 1: b = 2: plus S, a, b: Print S:不能使其输出结果为3的plus过程为( )。

    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


    参考答案：B

  • 第14题：

    以下程序用于求S=1+3+32+33+…+310的值。

    Private Sub Commandl_Click()

    S=1

    T=1

    ForI=1 To 10

    T=______

    S=S+T

    NextI

    Print"S="；S

    End Sub


    正确答案：T*3
    T*3

  • 第15题：

    假定一个工程由一个窗体文件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


    正确答案：C
    C。【解析】本题考查VisualBasic程序执行过程中各模块和窗体的调用过程。按照本题中代码执行，首先程序调用执行Model2，Model2中调用s1，s1数组属于Model1模块，Model1会调用s2，s2致使Form1执行，可以得出正确答案为选项C。

  • 第16题：

    编写如下事件过程： 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


    正确答案：A
    解析：可以看出，Sub1(ByValx1AsString，y1AsString)的作用是将参数x1的字符逆序处理，然后赋给y1，而y1是传址引用的，可以直接返回处理结果。

  • 第17题：

    下面程序的输出结果是。 Private Sub Commandl_Click ch$=“ABCDEF” proc ch：Print ch End Sub Private Sub proc(ch As Stnng) s=“” For k=Len(ch) TO 1 Step -1 s=s&Mid(ch，k，1) Next k ch=s End Sub A．ABCDEF B．FEDCBA C．A D．F


    正确答案：C

  • 第18题：

    在窗体中添加一个名称为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 Sub

    A．10

    B．30

    C．40

    D．50


    正确答案：B
    解析： 本题考查变量作用域的知识。在整个程序中定义了一个全局变量x，在命令按钮的单击事件中对这个x赋值为10，然后依次调用s1和s2；在s1中对x自加了20；在s2中用Dim定义了一个局部变量 x，按照局部覆盖全局的原则，在s2中的操作都是基于局部变量x而不是全局变量x。故此最终的输出结果为30。

  • 第19题：

    在窗体中添加一个名称为Command1的命令按钮，然后编写如下程序： Public x As Integer Private Sub Command1_Click() x=10 Call s1 Call s2 MsgBox x End Sub Private Sub sl() 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


    正确答案：B
    解析： 本题考查变量作用域的知识。在整个程序中定义了一个全局变量x，在命令按钮的单击事件中对这个x赋值为10，然后依次调用s1和s2；在s1中对x自加了20；在s2中用Dim定义了一个局部变量x，按照局部覆盖全局的原则，在s2中的操作都是基于局部变量x而不是全局变量x。故此最终的输出结果为30。

  • 第20题：

    下列程序的执行结果为 Private Sub Command1_Click() Dim s1 As String，s2 As String S1；="abcdef" Call Invert(s1，s2) Print s2 End Sub Private Sub Invert (ByVal xstr As String，ystr As String) Dim tempstr As String i=Len(xstr) Do While i>=1 tempstr=tempstr+Mid(xstr，i，1) i=i-1 Loop ystr=tempstr End Sub

    A．fedcba

    B．abcdef

    C．afbecd

    D．defabc


    正确答案：A
    解析：被调过程Invert的参数xstr，ystr从主调函数中收到实参s1，s2传来的值“abcdef”，过程Invert开始声明了两个变量，都是String型的：xstr，ystr。I=Len(xstr)以上语句的功能是：i的值就是xstr的长度，此题为6。程序代码执行DoWhile…Loop的循环语句。循环体为tempstr=tempstr+Mid(xstr，i，1)，其中变量是I，由I=Len(xstr)开始的，每循环一次减1，……；此程序段的最后输出的是字符串s1的反向输出，所以正确答案是选项C.

  • 第21题：

    下列程序运行后的输出结果是______。

    Private Sub f(k，s)

    s=1

    For j=1 To k

    s=s*j

    Next

    End Sub

    Private Sub Command1_Click()

    Sum=0

    For i=1 To 3

    Call f(i，s)

    Sum=Sum+s

    Next

    Print Sum

    End Sub


    正确答案：9
    9 解析：本题考查的重点是在子过程的调用过程中，虚实参数的传送问题，变量s按十传送。子过程f()求n!，sum的计算过程为1!+2!+3!=1+2+6=9

  • 第22题：

    s=”this is the mainstring”，sub=”string”，strindex（s，sub）是（）


    正确答案:13

  • 第23题：

    单选题
    酶促反应速度(v)达到最大反应速度(Vmax)的80%时，底物浓度［S］为
    A

    <p>1K<sub>m</sub></p>

    B

    <p>2K<sub>m</sub></p>

    C

    <p>3K<sub>m</sub></p>

    D

    <p>4K<sub>m</sub></p>

    E

    <p>5K<sub>m</sub></p>


    正确答案： E
    解析：

  • 第24题：

    填空题
    设字符串S1= “ABCDEF”，S2= “PQRS”，则运算S=CONCAT（SUB（S1，2，LEN（S2）），SUB（S1，LEN（S2），2））后的串值为（）。

    正确答案： “BCDEDE”
    解析： 暂无解析

相关内容