Форум программистов, компьютерный форум, киберфорум
Visual Basic
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
VB Вывести игру в форму Возможно ли вывести в форму своей программы компьютерную игру?? :read: https://www.cyberforum.ru/ visual-basic/ thread2221008.html Дополнение множеств VB
Помогите пожалуйста написать дополнение множества. TextBox1 - множество А TextBox2 - множество В TextBox3 - количество чисел множества А TextBox4 - количество чисел множества В TextBox5 - результат (A\B) TextBox1 и TextBox2 - это 2 поля, в которые вводятся числа через пробел.
VB Как подружить с SumIf с массивом? Уважаемые эксперты, Код VBA в Excel. arr1() - одномерный массив, которому присвоены значения Range (Range "динамический" и после передачи значений в массив уничтожается). i = Application.SUM(arr1()) - работает прекрасно i = Application.SUMIF(arr1(),"<0") - ошибка Может кто-то уже сталкивался, и знает? https://www.cyberforum.ru/ visual-basic/ thread2219888.html VB Как сделать код в игре виселица Нужно написать игру "виселица" или "поле чудес" на VB. Вот я начала писать: Private Sub Start_Click() Dim InpName As String For i = 1 To 10 InpName = InputBox("Введите 10 любых слов или завершить для выхода") If InpName = "завершить" Then Exit For: Print InpName Next i End Sub https://www.cyberforum.ru/ visual-basic/ thread2219616.html
VB Вставить строку на листе самой последней в списке
Ребята! подскажите как вставить строку на листе самой последней в списке? Первой у меня получилось, а последней не могу понять как. xl.Sheets("Лист1").Rows("2:2").Insert Shift:=-4121, CopyOrigin:=0 покажите на примере!
VB Объединение множеств https://www.cyberforum.ru/ visual-basic/ thread2219005.html
Помогите пожалуйста написать объединение множеств. А: TextBox1.Text 'множество А n: TextBox3.Text 'кол-во элементов A B: TextBox2.Text 'множество B m: TextBox4.Text 'кол-во элементов B Результат: TextBox5.Text
VB создать сумму кубов, целых, положительных, четных, трехзначных чисел https://www.cyberforum.ru/ visual-basic/ thread2218737.html
создать сумму кубов, целых, положительных, четных, трехзначных чисел Sub Summa_kubov() Dim i, a, s As Single i = InputBox("введите число p и нажмите OK") a = InputBox("введите число n и нажмите OK") Dim Ret As Integer s = (a + i) * ((a ^ 2) - a * i + (i ^ 2))
Шифрование и дешифрование в VB VB
Здравствуйте, можете Вы мне помочь с шифрованием и дешифрованием в Visuai Basic? Так же у меня есть готовый код в Visual Studio,может быть сможете переписать его на языке VB?
VB Кто сможет перевести код из Visual Basic в C++? https://www.cyberforum.ru/ visual-basic/ thread2217858.html VB Поиск по содержимому ячейки Помогите, что я делаю не так!? В ячейке А1 лист(поиск)- будет вводиться фамилия и нужно найти в листе (сбор данных), данную фамилию и копировать все строку в лист(поиск)... Option Explicit Sub Кнопка1_Щелчок() a = ThisWorkbook.Worksheets("сбор данных").Cells(Rows.Count, 1).End(xlUp).Row For i = 1 To a If Worksheets("сбор данных").Cells(i, 3) = Worksheets("поиск")("A1") Then... https://www.cyberforum.ru/ visual-basic/ thread2216690.html
VB Нужно перевести в visual basic
Нужно перевести решение из паскаля в vb , а перевести не получается помогите пожалуйста program s4; var n,a1,a2,b1,b2:integer; begin write('Vvedite 4h znachnoe chislo: '); readln(n); a1:=n div 1000; a2:=(n div 100) mod 10; b2:=n mod 10;
VB Принадлежность точки закрашенной области https://www.cyberforum.ru/ visual-basic/ thread2215791.html
Требуется разработать программу, определяющую, принадлежит ли точка на плоскости с координатами X, Y (значения координат вводятся с клавиатуры) заштрихованной области. Сделать это нужно как минимум двумя способами: с применением логических выражений и с применением вложенных операторов If
695 / 236 / 18
Регистрация: 17.01.2011
Сообщений: 583
Записей в блоге: 1
04.04.2018, 17:33 0

Генератор случайных чисел - VB - Ответ 12279067

04.04.2018, 17:33. Показов 1712. Ответов 8
Метки (Все метки)

Ответ

Цитата Сообщение от snipe Посмотреть сообщение
rnd() без randomize работает коряво
rnd() - это генератор псевдослучайных чисел, т.е. через какое то количество чисел следует точный повтор этой последовательности "случайных чисел" , причём независимо от заданных max и min . И наступает такой момент примерно через 16,7 млн. или 17,6 млн. - точно не помню т.к. писал программу для проверки более 10 лет назад..

Вернуться к обсуждению:
Генератор случайных чисел VB
0
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
04.04.2018, 17:33
Готовые ответы и решения:

Генератор случайных чисел
У меня есть код: Private Sub Command1_Click() Label1 = Array(&quot;1&quot;, &quot;2&quot;, &quot;3&quot;)(Int(Rnd * 3)) End...

Генератор случайных чисел
Друзья, не могли бы вы помочь мне? Мне нужно написать генератор случайных чисел (от минус...

Генератор случайных чисел
Здравствуйте люди!!! Может ли кто нить из вас помочь мне? Нужно создать генератор случайных чисел...

Как использовать генератор случайных чисел
Придумали с другом игру, ну в общем нужна программа, чтобы выпадали случайные цифры, от 1 до 6,...

8
04.04.2018, 17:33
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
04.04.2018, 17:33
Помогаю со студенческими работами здесь

Генератор случайных чисел и одинаковая последовательность
Есть генератор случайных чисел: Function GenXzn(ByVal nLen As Long, Optional ByVal NoZero As...

Создать одномерный массив F (17), используя генератор случайных чисел
Ну вот само задания: &quot;Создать одномерный массив F (17), используя генератор случайных чисел....

Нужен генератор случайных чисел в диапазоне от 5000 до 20000
Нужен генератор случайных чисел в диапазоне от 5000 до 20000 Добавлено через 40 минут Всё,...

Генератор случайных символов
Как создать генератор символов: английские буквы (как строчные, так и прописные). Схема такая: 1)...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru