Калькулятор

@AlexsDX7 · Регистрация: 07.11.2009

Студворк — интернет-сервис помощи студентам

Как сделать чтобы можно было вводить цифры с кнопок которые я сделал?

@BasicMan · 07.11.2009, 23:40

1. куда вводить? как имя обьекта куда вводишь и чо за обьект
2. чо за кнопки? имя кнопок

@arch-vile · 08.11.2009, 00:20

AlexsDX7, хотите сделать что-то похожее на калькулятор Windows? Попробуйте создать переменную, которая при нажатии, скажем на кнопку 7 принимает в качестве значения число 7, а потом дописывает его куда нужно (в текстовое поле, надо полагать)...

@BasicMan · 08.11.2009, 00:24

посмотри здесь https://www.cyberforum.ru/visu... 52681.html

@Renya · 08.11.2009, 18:19

Каждой переменной Button нужно присвоить своё число.

@prog13 · 10.11.2009, 14:42

Вот, что я наклепал

@Toxa33rus · 10.11.2009, 20:29

Сообщение от prog13

Вот, что я наклепал

А смысл?

Если б топикстартер показал что натворил то оценить можно было бы и что-то посоветовать или похвалить, а так ему пользы нет же от голого ехе. Сорцы бы

@prog13 · 10.11.2009, 22:21

полный комплект

12.11.2009, 14:07

А действительно, подскажите как сделать калькулятор аналогичный калькулятору Windows. Я попытался начать вот что получилось:

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
Dim a, b As Double
Private Sub Command1_Click(Index As Integer)
Text1.Text = Text1.Text & Command1(Index).Caption
b = Val(Text1.Text)
End Sub
Private Sub Command2_Click()
Text1.Text = ""
End Sub
Private Sub Command3_Click()
a = Val(Text1.Text)
Text1.Text = ""
Label1.Caption = "+"
End Sub
Private Sub Command4_Click()
a = Val(Text1.Text)
Text1.Text = ""
Label1.Caption = "-"
End Sub
Private Sub Command5_Click()
a = Val(Text1.Text)
Text1.Text = ""
Label1.Caption = "*"
End Sub
Private Sub Command6_Click()
a = Val(Text1.Text)
Text1.Text = ""
Label1.Caption = "/"
End Sub
Private Sub Command7_Click()
If Label1.Caption = "+" Then Text1.Text = a + b And b = Val(Text1.Text)
If Label1.Caption = "-" Then Text1.Text = a - b And b = Val(Text1.Text)
If Label1.Caption = "*" Then Text1.Text = a * b And b = Val(Text1.Text)
If Label1.Caption = "/" Then Text1.Text = a / b And b = Val(Text1.Text)
End Sub

Понимаю, что программа очень примитивная... в ней есть несколько недочетов:
1) Нужно учесть возможность проделывания нескольких операций без многократного нажатия равно.
2) Нужно каким то образом избавиться от округления, когда получаются нецелый результат.
Если кто то сможет помочь в решении этих проблем, буду очень благодарен...

@ArmiN · 15.11.2009, 20:24

Если у кого есть готовая программа для написания калькулятора на Visual Basic, то будьте добры скиньте!

@BasicMan · 15.11.2009, 20:29

ArmiN, слабо по разделу поискать

@Toxa33rus · 15.11.2009, 21:07

Сообщение от ArmiN

Если у кого есть готовая программа для написания калькулятора на Visual Basic

Тут по определению нужен непосредственно сам Visual Basic

@zhanas · 15.11.2009, 21:39

вот это сойдет с кнопок наж.

@AlexsDX7 · 16.11.2009, 14:54 **[ТС]**

Как сделать так чтобы все вычесления производились в одном текстовом поле?
Как в обычном калькуляторе windows XP?

@ilimdar · 15.12.2009, 22:09

Сообщение от AlexsDX7

Как сделать так чтобы все вычесления производились в одном текстовом поле?
Как в обычном калькуляторе windows XP?

Вот зайди на [сторонний] сайт в Исходниках он есть

12.12.2010, 20:09

prog13,
napishi sro4no v agent monk_1@inbox.ru

Новые блоги и статьи Все статьи Все блоги /
Контроль заполнения и очистка дат в зависимости от значения перечислений Maks 12.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: реализовать контроль корректности заполнения дат назначения. . .	Архитектура слоя интернета для сервера-слоя. Hrethgir 11.04.2026 В продолжение https:/ / www. cyberforum. ru/ blogs/ 223907/ 10860. html Знаешь что я подумал? Раз мы все источники пишем в голове ветки, то ничего не мешает добавить в голову такой источник, который сам. . .	Подстановка значения реквизита справочника в табличную часть документа Maks 10.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: при выборе сотрудника (справочник Сотрудники) в ТЧ документа. . .	Очистка реквизитов документа при копировании Maks 09.04.2026 Алгоритм из решения ниже применим как для типовых, так и для нетиповых документов на самых различных конфигурациях. Задача: при копировании документа очищать определенные реквизиты и табличную. . .
модель ЗдравоСохранения 8. Подготовка к разному выполнению заданий anaschu 08.04.2026 https:/ / github. com/ shumilovas/ med2. git main ветка * содержимое блока дэлэй из старой модели теперь внутри зайца новой модели 8ATzM_2aurI	Блокировка документа от изменений, если он открыт у другого пользователя Maks 08.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в конфигурации КА2. Задача: запретить редактирование документа, если он открыт у другого пользователя. / / . . .	Система безопасности+живучести для сервера-слоя интернета (сети). Двойная привязка. Hrethgir 08.04.2026 Далее были размышления о системе безопасности. Сообщения с наклонным текстом - мои. А как нам будет можно проверить, что ссылка наша, а не подделана хулиганами, которая выбросит на другую ветку и. . .	Модель ЗдрввоСохранения 7: больше работников, больше ресурсов. anaschu 08.04.2026 работников и заданий может быть сколько угодно, но настроено всё так, что используется пока что только 20% kYBz3eJf3jQ

@AlexsDX7 0 / 0 / 0 Регистрация: 07.11.2009 Сообщений: 4

	Калькулятор 07.11.2009, 22:36. Показов 26400. Ответов 15 Метки нет (Все метки) Как сделать чтобы можно было вводить цифры с кнопок которые я сделал? 0

@BasicMan 19318 / 2626 / 84 Регистрация: 17.02.2009 Сообщений: 30,364
	07.11.2009, 23:40
	1. куда вводить? как имя обьекта куда вводишь и чо за обьект 2. чо за кнопки? имя кнопок 0

@arch-vile 3215 / 774 / 26 Регистрация: 12.07.2009 Сообщений: 3,184
	08.11.2009, 00:20
	AlexsDX7, хотите сделать что-то похожее на калькулятор Windows? Попробуйте создать переменную, которая при нажатии, скажем на кнопку 7 принимает в качестве значения число 7, а потом дописывает его куда нужно (в текстовое поле, надо полагать)... 0

@BasicMan 19318 / 2626 / 84 Регистрация: 17.02.2009 Сообщений: 30,364
	08.11.2009, 00:24
	посмотри здесь https://www.cyberforum.ru/visu... 52681.html 0

@Renya 0 / 0 / 0 Регистрация: 07.11.2009 Сообщений: 6
	08.11.2009, 18:19
	Каждой переменной Button нужно присвоить своё число. 0

@ArmiN 0 / 0 / 0 Регистрация: 17.04.2009 Сообщений: 40
	15.11.2009, 20:24
	Если у кого есть готовая программа для написания калькулятора на Visual Basic, то будьте добры скиньте! 0

@BasicMan 19318 / 2626 / 84 Регистрация: 17.02.2009 Сообщений: 30,364
	15.11.2009, 20:29
	ArmiN, слабо по разделу поискать 0

@AlexsDX7 0 / 0 / 0 Регистрация: 07.11.2009 Сообщений: 4
	16.11.2009, 14:54 [ТС]
	Как сделать так чтобы все вычесления производились в одном текстовом поле? Как в обычном калькуляторе windows XP? 0

monk_1
	12.12.2010, 20:09
	prog13, napishi sro4no v agent monk_1@inbox.ru