Форум программистов, компьютерный форум, киберфорум
Visual Basic
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.73/11: Рейтинг темы: голосов - 11, средняя оценка - 4.73
0 / 0 / 0
Регистрация: 21.05.2013
Сообщений: 9

Сгенерировать случайное двоичное число типа Long

13.11.2013, 09:29. Показов 2216. Ответов 11

Студворк — интернет-сервис помощи студентам
HELP!!!
Подскажите пожалуйста, как в VB при помощи датчика случайных чисел сгенерировать случайное двоичное число типа Long?
0
Лучшие ответы (1)
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
13.11.2013, 09:29
Ответы с готовыми решениями:

Сгенерировать случайное число типа long
Доброго времени суток. Вопрос такой: как сгенерировать 64-битное число (long) при помощи Random ?

Сгенерировать случайное число + двоичное представления
Подключить библиотеку cstdlib и ctime. В начале функции main сделать иницеализацию генератора случайных чисел srand(time(0)). Сгенерировать...

Как сгенерировать случайное число типа я double имея на входе 2 числа типа double - минимальное и максимальное
Например: public class ExtendedRandom : Random { public ExtendedRandom() : base() { ...

11
 Аватар для Апострофф
9908 / 3924 / 742
Регистрация: 11.10.2011
Сообщений: 5,904
13.11.2013, 10:29
Лучший ответ Сообщение было отмечено The trick как решение

Решение

Visual Basic
1
2
3
4
5
6
7
8
9
Sub main()
Dim L As Long, i As Long, s As String
L = Rnd * 2 ^ 24
For i = 0 To 31
  s = (L And 1) & s
  L = L \ 2
Next i
Debug.Print s
End Sub
1
Заблокирован
13.11.2013, 10:34
класический 32-х разрядный, случайный Long
первая еденица будет означать минус

Кликните здесь для просмотра всего текста
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Option Explicit
 
Function Bin$()
    Const c = 32
    Dim s$, f&
    Randomize Timer
    Bin = Space$(c)
    For f = 1 To c
        Mid$(Bin, f, 1) = Fix(Rnd * 2)
    Next
End Function
 
Sub main()
    MsgBox Bin$
End Sub
2
0 / 0 / 0
Регистрация: 21.05.2013
Сообщений: 9
13.11.2013, 10:37  [ТС]
Спасибо!
Можно с пояснениями?
Не совсем понятно почему *2^24 и знак & в 5ой строке(
0
Заблокирован
13.11.2013, 10:40
пока писал
Апострофф меня опередил
у него почти тоже самое но Long это
число от -2^31 до +2^31
1
 Аватар для Апострофф
9908 / 3924 / 742
Регистрация: 11.10.2011
Сообщений: 5,904
13.11.2013, 10:43
Цитата Сообщение от novi4hok Посмотреть сообщение
почему *2^24
Потому что именно столько различных значений способен выдать Rnd.
Поэтому выбрось мой код и возьми от JoraVoenyjHakerа.
Цитата Сообщение от novi4hok Посмотреть сообщение
знак &
- конкатенация (склеивание) двух значений.

Добавлено через 1 минуту
Цитата Сообщение от JoraVoenyjHaker Посмотреть сообщение
Long это
число от -2^31 до +2^31
Не совсем так.

Long это число от -2^31 до +2^31 - 1
1
Заблокирован
13.11.2013, 10:53
Цитата Сообщение от novi4hok Посмотреть сообщение
Не совсем понятно почему *2^24 и знак & в 5ой строке(
знак & это конкатенация
присоединение символов

в моём примере в 10 раз быстрее...
копирование в стринг !

Добавлено через 1 минуту
опять я долго писал..... )))

Добавлено через 8 минут
если еще точнее
от -2147483647 до 2147483647

знак ^ это степень !
1
0 / 0 / 0
Регистрация: 21.05.2013
Сообщений: 9
13.11.2013, 11:16  [ТС]
А в строке Dim s$, f&, что означаю символы $ и &?
Я правильно понимаю, что это аналоги as ......?
0
Заблокирован
13.11.2013, 12:07
да это вариант записи s as string // f as long

Добавлено через 3 минуты
% - Integer
# - Double
! - Single

arr$() - Список строк

Добавлено через 39 минут
к сожалению не смог прикрепить учебник,
в формате .chm
произошла внутренняя ошибка при закачке файла сюда
файл около 3мб качался 5 мин
наверное маркер безопасности включили....

Добавлено через 1 минуту
зря трафик потратил
настроения теперь испотилось ((((((

Добавлено через 4 минуты
учебник был очень хороший
я по нему за один день сразу
всем основам научился
там очень удобная форма описаний была (((
1
0 / 0 / 0
Регистрация: 21.05.2013
Сообщений: 9
13.11.2013, 13:02  [ТС]
А что за учебник? Как называется?
0
Заблокирован
14.11.2013, 11:04
я его год назад закачал...
полностью на русском языке
там в названии были ироглифы примерно такие:
近似名.chm я потом переименовал по своему

Добавлено через 1 минуту
ща в нём-же пошарюсь может там ссылки на домашнюю страницу есть...

Добавлено через 6 минут
не нашол ссылак
вот...

первая страница текста Введение


О Visual Basic 6 написано достаточно много книг, раскрывающих в разной степени возможности данной версии популярного языка программирования. В этой книге мы постарались в первую очередь доступно и подробно показать все новое, что предоставляет пользователю версия Visual Basic 6, не забывая конечно и о возможностях, унаследованных от предыдущих версий.

Обычно Basic ассоциируется с каким-то очень простым в освоении и использовании средством программирования. Это действительно так. На заре компьютерных технологий язык Basic был создан для создания простых программ и использовался в качестве учебного языка для первых шагов при изучении основ программирования с последующим переходом на более сложные и универсальные языки. Это было заложено в название языка BASIC — Beginners All-purpose Symbolic Instructional Code, то есть многоцелевой код символьных инструкций для начинающих. С прогрессом компьютерных технологий развивался и Basic. В настоящее время версия Visual Basic 6 дает возможность решать любые современные задачи разработки приложений. При этом Visual Basic 6 остался достаточно простым в освоении, став в то же время одним из мощных современных языков программирования.

По сути дела последняя версия языка Visual Basic 6 представляет собой интегрированную среду разработки — IDE (Integrated Development Environment). Это означает, что в Visual Basic 6 интегрирован набор инструментов, облегчающих и значительно ускоряющих процесс разработки готового приложения. Такая реализация языка Visual Basic 6 с полным правом позволяет отнести его к средствам быстрой разработки приложений — RAD (Rapid Application Development) и ставит практически в один ряд с такими средствами разработки, как Visual C++, Delphi и другими.

С помощью Visual Basic 6 можно создавать приложения практически для любой области современных компьютерных технологий: бизнес-приложения, игры, мультимедиа, базы данных. При этом приложения могут быть как простыми, так и очень сложными, в зависимости от поставленной задачи.

Простота и мощность языка Visual Basic 6 позволили сделать его встроенным языком для приложений Microsoft Office. Многие независимые разработчики, как например известная своими программами в области бухгалтерского учета фирма "1С", приобретают лицензии на использование языка

Visual Basic в качестве внутреннего языка своих приложений. Поэтому в настоящее время Basic уже не считается учебным языком — знание Visual Basic и его диалектов (VBA, VBScript) становится необходимостью для современного программиста любого уровня.

С появлением версии Visual Basic 6 сбылась мечта программиста — простые приложения можно создавать практически не прибегая к написанию программного кода, а в сложных приложениях рутинный процесс создания программного кода сведен к минимуму. Мастера Visual Basic 6 дают возможность быстро создавать прототипы приложений, готовых для обсуждения и согласования с заказчиком.

В Visual Basic 6 используются все самые современные методы программирования: модель составных объектов СОМ (Component Object Model), распределенная модель составных объектов DCOM (Distributed Component Object Model), технология программных компонентов ActiveX и другие. Суть этих подходов и их реализацию на примерах можно изучить, прочитав посвященные им главы из этой книги.

Книга рассчитана на широкий круг пользователей. Начинающему программисту материалы данной книги помогут быстро изучить язык и все основные возможности Visual Basic 6. Книга будет полезна и читателю, имеющему опыт работы с предыдущими версиями Visual Basic.



Добавлено через 21 час 48 минут
Нашол ссылку !!!
0
Кормпилятор
 Аватар для Quiet Snow
5044 / 1718 / 409
Регистрация: 25.04.2010
Сообщений: 4,827
Записей в блоге: 2
15.11.2013, 22:28
как в VB
Вопрос некорректен. В разных версиях разная размерность LONG, в современных он уже 8-ми байтовый.

http://visualbasic.freetutes.c... sson2.html
http://msdn.microsoft.com/en-u... s.90).aspx

+ Зависит от платформы.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
15.11.2013, 22:28
Помогаю со студенческими работами здесь

Нужно написать программу выполняющее преобразование:Десятичное число типа unsigned long (0...4294967295) в двоичное 32-разрядное представление регистр
Всем добрый вечер!Очень нужна помощь по решению задачек.хотябы одну из них 1.нужно написать программу выполняющее...

Вывести число типа long long int
Друзья! код взят у Стивена Праты "программирование на языке C" #include <stdio.h> int main () { long long int L =...

Сгенерировать случайное число по формуле
Привет, не пойму задание кто может помочь? Сгенерировать 100 случайных чисел способом, указанным в варианте. Построить гистограмму...

Сгенерировать случайное число в диапазоне от 1 до 2
Нужно зарандомить 1 число - либо 1, либо 2. Как это можно сделать?

Сгенерировать 1 случайное число в диапазоне от 1 до 20
Всем привет! Подскажите как можно сгенерировать 1 случайное число в диапазоне от 1 до 20. пробовал так for i:=1 to 1 do begin ...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
12
Ответ Создать тему
Новые блоги и статьи
SDL3 для Web (WebAssembly): Работа со звуком через SDL3_mixer
8Observer8 08.02.2026
Содержание блога Пошагово создадим проект для загрузки звукового файла и воспроизведения звука с помощью библиотеки SDL3_mixer. Звук будет воспроизводиться по клику мышки по холсту на Desktop и по. . .
SDL3 для Web (WebAssembly): Основы отладки веб-приложений на SDL3 по USB и Wi-Fi, запущенных в браузере мобильных устройств
8Observer8 07.02.2026
Содержание блога Браузер Chrome имеет средства для отладки мобильных веб-приложений по USB. В этой пошаговой инструкции ограничимся работой с консолью. Вывод в консоль - это часть процесса. . .
SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве
8Observer8 02.02.2026
Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .
Философия технологии
iceja 01.02.2026
На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .
SDL3 для Web (WebAssembly): Вывод текста со шрифтом TTF с помощью SDL3_ttf
8Observer8 01.02.2026
Содержание блога В этой пошаговой инструкции создадим с нуля веб-приложение, которое выводит текст в окне браузера. Запустим на Android на локальном сервере. Загрузим Release на бесплатный. . .
SDL3 для Web (WebAssembly): Сборка C/C++ проекта из консоли
8Observer8 30.01.2026
Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .
SDL3 для Web (WebAssembly): Установка Emscripten SDK (emsdk) и CMake для сборки C и C++ приложений в Wasm
8Observer8 30.01.2026
Содержание блога Для того чтобы скачать Emscripten SDK (emsdk) необходимо сначало скачать и уставить Git: Install for Windows. Следуйте стандартной процедуре установки Git через установщик. . . .
SDL3 для Android: Подключение Box2D v3, физика и отрисовка коллайдеров
8Observer8 29.01.2026
Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами. Версия v3 была полностью переписана на Си, в. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru