Извештај о случајном одабиру у ВБА
Изјава ВБА Рандомизе је једноставна једнослојна изјава коју додајемо пре примене функције РНД. Кад год се радна свеска поново отвори, изјава Рандомизе даје нови почетни број функцији РНД у зависности од системског времена рачунара.
Пре него што говорим о изјави Рандомизе, дозволите ми да вас упознам са једноставном функцијом РНД са ВБА.
Као функција радног листа „РАНД“, у ВБА, и „РНД“ ће генерисати случајне бројеве који су већи од 0, али мањи од 1.
Сада погледајте синтаксу функције „РНД“.
(Број): Аргумент можемо проследити на три начина.
- Ако број проследимо као <0, сваки пут генерише исти случајни број.
- Ако број додамо као 0, он ће поновити најновији број који је дао.
- Ако проследимо број> 0, он вам стално даје различите случајне бројеве, тј. Следећи случајни број у низу.
Пример
На пример, погледајте доњи код.
Шифра:
Суб РНД_Екампле () Дебуг.Принт Рнд Енд Суб
Када покренем код у прозору Одмах, видећу доњи број.
Слично томе, када извршим овај код још 3 пута, могу видети доње бројеве.
Сада ћу затворити радну свеску и поново је отворити.
Сада ћу се вратити на прозор основног визуелног уређивача.
Сада је непосредни прозор празан и чист.
Сад ћу поново извршити код четири пута и видети који су бројеви које ћемо добити у непосредном прозору.
Добили смо исте бројеве као и горе.
Ово не изгледа као случајан број, јер сваки пут када поново отворимо датотеку, обично добијамо исте бројеве почевши од нуле.
Па, како генерирати случајне бројеве без обзира на то да ли је радна свеска поново отворена или не?
Морамо да користимо изјаву „Рандомизе“.
Како се користи Изјава о случајном одабиру ВБА?
Пример # 1
Да бисмо добили случајне бројеве, све што треба да урадимо је да додамо једноставну линију „Рандомизе“ пре функције РНД.
Шифра:
Суб Рандомизе_1 () Рандомизе Дебуг.Принт Рнд Енд Суб
Сада ћу покренути код 4 пута и видети шта ћу.
Генерисао је горње бројеве у мом локалном прозору.
Сада ћу затворити датотеку и поново је отворити.
Као и обично, започињемо са чистом плочицом у прозору висуал висуал.
Сада ћу поново извршити код и видети које бројеве ћемо добити овај пут.
Вау !!! Овог пута имамо различите бројеве.
Будући да смо додали израз Рандомизе пре функције РНД, добијамо различите случајне бројеве сваки пут када поново отворимо датотеку.
Ово изгледа као случајан број, зар не ???
Пример # 2
Случајни бројеви већи од једног
Као што смо видели, функција „РНД“ може генерисати бројеве од 0 до 1. Али да бисмо генерисали бројеве веће од једног случајног броја, морамо да користимо „СЛУЧАЈ ИЗМЕЂУ“, који је доступан са функцијском класом радног листа.
Дакле, да бисмо генерисали случајне бројеве веће од једног, морамо да користимо доњи код.
Шифра:
Суб Рандомизе_2 () Рандомизе Дебуг.Принт Рнд * 100 Крај Суб
Сада ћу извршити код и видети шта ћемо добити.
Овако, можемо да користимо израз „Рандомизе“ у ВБА за генерисање случајних бројева сваки пут када поново отворимо екцел датотеку.
