Advertisement
6_2008-2009 Miscellaneous #203308

A REAL RANDOM NUMBER GENERATOR

This code will create completely random numbers for you!

AI

สรุปโดย AI: This codebase represents a historical implementation of the logic described in the metadata. Our preservation engine analyzes the structure to provide context for modern developers.

ซอร์สโค้ด
original-source
Sub Command1_Click ()
Randomize 'makes it random
  'makes a random number, 1 - 100 in Label1
  Value = Int(100 * Rnd)
  Label1.Caption = Str$(Value)
End Sub
ความคิดเห็นดั้งเดิม (3)
กู้คืนจาก Wayback Machine