影音先锋AⅤ天堂资源站,13小箩利洗澡无码视频APP,午夜理论片日本中文在线,最近新免费韩国日本电影

萬能百科  > 計算機?  > 

[填空題] 執(zhí)行下面程序,單擊按鈕CmdRun,窗體上顯示的第一行結(jié)果是(),UBound(a)的值為(),其中a(1)的值為().Option Explici

2021-07-20   

[填空題] 執(zhí)行下面程序,單擊按鈕CmdRun,窗體上顯示的第一行結(jié)果是(),UBound(a)的值為(),其中a(1)的值為().Option ExplicitPrivate Sub CmdRun_Click()Dim St As String,i As IntegerDim a() As String,j As Integer,k As IntegerSt="abcd"Call Sub1(St)Print StFor i=1 To Len(St)For j=i+1 To Len(St)If Mid(St,i,1)=Mid(St,j,1) Then Exit ForNext jIf j>Len(St) Thenk=k+1ReDim Preserve a(k)a(k)=Mid(St,i,1)Print "a(";k;")=";a(k)End IfNext iEnd SubPrivate Sub Sub1(S As String)Dim i As IntegerFor i=1 To Len(S)2Mid(S,i,1)=Mid(S,Len(S)-i+1,1)Next iEnd Sub

正確答案:

dccd;2;c

詞條內(nèi)容僅供參考,如果您需要解決具體問題
(尤其在法律、醫(yī)學等領域),建議您咨詢相關領域?qū)I(yè)人士。

標簽

<蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <蜘蛛词>| <文本链> <文本链> <文本链> <文本链> <文本链> <文本链>