2. 计算机
  3. 单击命令按钮时，下列程序代码的执行结果为( )。 Private Function PickMid(xStr As String)As Sting Dim tempStr As String Dim strLen As Intege

单击命令按钮时，下列程序代码的执行结果为( )。 Private Function PickMid(xStr As String)As Sting Dim tempStr As String Dim strLen As Intege

admin2012-03-22  86
问题 单击命令按钮时，下列程序代码的执行结果为(    )。    Private Function PickMid(xStr As String)As Sting    Dim tempStr As String    Dim strLen As Integer    TempStr=" "    StrLen=Len(xStr)    i=1    Do While i＜=strLen/2    　tempStr=tempStr+Mid(xStr,i,1)+Mid(xStr,strLen-i+1,1)    　i=i+1    Loop    PickMid=tempStr    End Function    Private Sub Command1_Click()    Dim FirstStr As String    FirstStr="abcdef"    Print PickMid(FirstStr)    End Sub   
选项 A、abcdef  
B、afbecd   
C、fedcba  
D、defabc
答案B
解析
转载请注明原文地址:https://kaotiyun.com/show/BFhp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)