¨Ï¥Î formula ÅܼƻP¦b Visual Basic ¤¤¼¶¼g¤@Ó¦W¬° formula ªº¨ç¦¡Ãþ¦ü¡C
½Ð¦Ò¼{¤U¦Cªº Basic »yªk¤½¦¡¡G
Rem ¶Ç¦^¦r¦êȪº¤½¦¡ Rem Rnd ¨ç¦¡¶Ç¦^¤@Ó¶Ã¼Æ Rem ¤¶©ó 0 »P 1 ¤§¶¡ If Rnd > 0.9 Then formula = "§AŤF¡I" Else formula = "©êºp¡A½Ð¦A¸Õ¤@¦¸" End If
¥H¤Wªº¤½¦¡¦b Rnd ¶Ç¦^ªºÀH¾÷¸¹½X¤j©ó 0.9 ®É¡A·|¶Ç¦^¤å¦r¦r¦êÈ¡uYou won!¡v¡A§_«h·|¶Ç¦^¤å¦r¦r¦êÈ¡uSorry, try again.¡v¡C
¤Wzªº¤½¦¡¥i¥H¼g¦¨¦p¤Uªº Visual Basic ¨ç¦¡¡G
Rem ¥H¤Uµ{¦¡½X¬° Visual Basic »yªk Function formula() If Rnd > 0.9 Then formula = "§AŤF¡I" Else formula = "©êºp¡A½Ð¦A¸Õ¤@¦¸" End If End Function