正文

隨機(jī)生成句子（隨機(jī)生成句子的程序）

發(fā)布時間：2023-04-23 14:28:40 稿源：創(chuàng)意嶺閱讀： 74

大家好！今天讓創(chuàng)意嶺的小編來大家介紹下關(guān)于隨機(jī)生成句子的問題，以下是小編對此問題的歸納整理，讓我們一起來看看吧。

開始之前先推薦一個非常厲害的Ai人工智能工具，一鍵生成原創(chuàng)文章、方案、文案、工作計(jì)劃、工作報告、論文、代碼、作文、做題和對話答疑等等

只需要輸入關(guān)鍵詞，就能返回你想要的內(nèi)容，有小程序、在線網(wǎng)頁版、PC客戶端和批量生成器

官網(wǎng)：https://ai.de1919.com。

本文目錄:

隨機(jī)生成句子的c++問題，困惑啊
EXCEL抽取制定列隨機(jī)5個短句，不重復(fù)
易語言如何隨機(jī)生成一句話

隨機(jī)生成句子（隨機(jī)生成句子的程序）

隨機(jī)生成句子的c++問題，困惑啊

void makeSntence(char*s1,char*s2,char*s3,char*s4,char*s5,char*s6)
接收的參數(shù)為指針，即char*，而你調(diào)用的時候makeSentence(article,noun,verb,preposition,string1,string2);傳的是指針的指針，即char **。因?yàn)閍rticle定義為了2維數(shù)組
更改的話可以把你的char* article[]={"the","a","one","some","any"};改成
char article[]="the a one some any";或者char* article="the a one some any";
這樣傳參數(shù)就對了。

EXCEL抽取制定列隨機(jī)5個短句，不重復(fù)

用自定義函數(shù)可以完成。

舉例說明。例如有數(shù)據(jù)表如圖：

如圖在A列有30句斷句，要求在C1得到隨機(jī)抽取的5個句子組合。

第一步：點(diǎn)擊開發(fā)工具-visual basic。如圖：

第二步：插入模塊并編制代碼如下：

Public temp(1 To 5) As Integer

Function sjf()

sjf = ""

Call RndNumberNoRepeat

For i = 1 To 5

? ?sjf = sjf & Cells(temp(i) + 1, 1).Text

? ?If i < 5 Then sjf = sjf & ","

Next i

End Function

Public Sub RndNumberNoRepeat()

? ? ??

? ? Dim RndNumber, i, k, Maxrec As Integer

? ? Randomize (Timer) ? ? ? ? ? '初始化隨機(jī)數(shù)生成器

? ? Maxrec = 30

? ? k = 1

? ? Do While k <= 5

? ? ? ? RndNumber = Int(Maxrec * Rnd) + 1

? ? ? ? temp(k) = RndNumber

? ? ? ? For i = 1 To k

? ? ? ? ? ? If temp(i) = RndNumber Then Exit For

? ? ? ? Next i

? ? ? ? If i = k Then k = i + 1

? ? ? ??

? ? Loop

? ??

End Sub

第三步：在C1輸入公式：=sjf()。結(jié)果如圖：

隨機(jī)生成句子（隨機(jī)生成句子的程序）

易語言如何隨機(jī)生成一句話

.版本 2
.程序集窗口程序集1
.子程序取隨機(jī)漢字, 文本型
.局部變量文本, 文本型
置隨機(jī)數(shù)種子 ()
文本＝到文本 (字符 (－取隨機(jī)數(shù) (38, 80)) ＋字符 (－取隨機(jī)數(shù) (38, 80)))
返回 (文本)
.子程序 _按鈕1_被單擊
編輯框1.內(nèi)容＝取隨機(jī)漢字 () ＋取隨機(jī)漢字 () ＋取隨機(jī)漢字 () ＋取隨機(jī)漢字 () ＋取隨機(jī)漢字 () ＋取隨機(jī)漢字 ()追問

我試了，取出來的全是亂碼。或者看不懂的字

以上就是關(guān)于隨機(jī)生成句子相關(guān)問題的回答。希望能幫到你，如有更多相關(guān)問題，您也可以聯(lián)系我們的客服進(jìn)行咨詢，客服也會為您講解更多精彩的知識和內(nèi)容。