Mert_Kurt
Demir Madencisi
- En iyi cevaplar
- 0
doğru bildinBen yazayım:
<-------------------------------------------------------------------------------------------------------------------------------------->
Dim rastgele As New Random
Dim kelimeler() As String = {"Aptal", "Zeki", "Akıllı"}
MsgBox(kelimeler(rastgele.Next(0, kelimeler.Count)))
End Sub