小金條18號真棒2019-09-29 04:01:49

可以透過計次迴圈得到一串字串，達到你想要的結果。 以下提供的程式碼具有通用性。 程式碼如下： 。版本 2 。子程式 取隨機長度文字， 文字型 。引數 取漢字的文字， 文字型 。引數 取出的數目， 整數型 。區域性變數 Temp， 整數型 。區域性變數 取出的文字， 文字型 置隨機數種子 （） 。計次迴圈首 （取出的數目， ） 取出的文字 ＝ 取出的文字 ＋ 取文字中間 （取漢字的文字， 取隨機數 （1， 取文字長度 （取漢字的文字） ÷ 2） × 2 － 1， 2） 。計次迴圈尾 （） 返回 （取出的文字） 呼叫程式碼如下（例項）： 編輯框_輸出結果。內容 ＝ 取隨機長度文字 （編輯框_姓。內容， 到整數 （編輯框_姓長度。內容）） ＋ 取隨機長度文字 （編輯框_名。內容， 到整數 （編輯框_名長度。內容）） 在我的演示程式中，演示結果如下： 如果你不想讓字重複，請使用以下程式碼，此程式碼同樣具有通用性： 。版本 2 。子程式 取隨機長度文字， 文字型 。引數 取漢字的文字， 文字型 。引數 取出的數目， 整數型 。區域性變數 Temp， 整數型 。區域性變數 臨時文字， 文字型 。區域性變數 隨機文字， 文字型 。區域性變數 取出的文字， 文字型 置隨機數種子 （） 臨時文字 ＝ 取漢字的文字 。計次迴圈首 （取出的數目， ） 隨機文字 ＝ 取文字中間 （臨時文字， 取隨機數 （1， 取文字長度 （臨時文字） ÷ 2） × 2 － 1， 2） 取出的文字 ＝ 取出的文字 ＋ 隨機文字 臨時文字 ＝ 子文字替換 （臨時文字， 隨機文字， “”， ， ， 真） 。計次迴圈尾 （） 返回 （取出的文字） 此程式碼即符合你的要求。 如有疑問請追問。