Расчет загрязнения в водоеме, трудности с гистограммой

@Quadest · Регистрация: 17.12.2012

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

Помогите написать программу! Ступор на гистограмме и еще не могу запретить вводить недопустимые символы =(

Спасибо за ваше участие! Буду рад любому совету!

@Quadest · 17.12.2012, 13:29 **[ТС]**

перевернул правильно изображение =)

@Quadest · 19.12.2012, 10:32 **[ТС]**

upupup

SoftIce · 19.12.2012, 14:40

Ну если затруднения только в гистограмме, то я рекомендовал бы сделать примерно так:

@Quadest · 20.12.2012, 22:17 **[ТС]**

Спасибо за идею, но с реализацией у меня не получается, к сожалению. Не сочти за наглость, но не мог бы ты скинуть программу? Хотя бы в личные сообщения! Буду ОЧЕНЬ признателен!

P.S. еще была проблема с запрещением ввода недопустимых символов в текстовое поле.

SoftIce · 20.12.2012, 22:29

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

была проблема с запрещением ввода недопустимых символов в текстовое поле

это еще проще

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
Sub KeyPress(KeyAscii As Integer, Text As TextBox)
   Select Case KeyAscii
      Case 48 To 57, 8  ' цифры и <Backspace>
      Case 44, 46       ' точка и запятая
         KeyAscii = 46
         ' не позволяет вводить знак запятой повторно
         If InStr(Text.Text, ".") <> 0 Then
            KeyAscii = 0
         End If
      Case Else
            MsgBox "Вводите только цифры!"
            KeyAscii = 0   ' остальные символы не отображаются
    End Select
End Sub
 
Private Sub Text1_KeyPress(KeyAscii As Integer)
    Call KeyPress(KeyAscii, Text1)
End Sub
 
Private Sub Text2_KeyPress(KeyAscii As Integer)
    Call KeyPress(KeyAscii, Text2)
End Sub
 
Private Sub Text3_KeyPress(KeyAscii As Integer)
    Call KeyPress(KeyAscii, Text3)
End Sub
 
Private Sub Text4_KeyPress(KeyAscii As Integer)
    KeyAscii = 0
    MsgBox "Редактирование запрещено!"
End Sub

@Quadest · 20.12.2012, 22:44 **[ТС]**

Супер, с текстом получилось!

Добавлено через 5 минут
SpftIce, свяжись со мной в скайпе (kostyakostyakostya) . Я готов заплатить за твою программу.

SoftIce · 20.12.2012, 23:23

Лови .

Новые блоги и статьи Все статьи Все блоги /
Отчёт о затраченных материалах за определенный период с макетом печатной формы Maks 21.04.2026 Отчёт из решения ниже размещён в конфигурации КА2. Задача: разработка отчёта по затраченным материалам за определённый период, с возможностью вывода печатной формы отчёта с шапкой и подвалом. В. . .	Отчёт о спецтехнике находящейся в ремонте Maks 20.04.2026 Отчёт из решения ниже размещен в конфигурации КА2. Задача: отобразить спецтехнику, которая на данный момент находится в ремонте. Есть нетиповой документ "Заявка на ремонт спецтехники" который. . .	Памятка для бота и "визитка" для читателей "Semantic Universe Layer (Слой семантической вселенной)" Hrethgir 19.04.2026 Сгенерировано для краткого описания по случаю сборки и компиляции скелета серверного приложения. И пусть после этого скажут, что статьи сгенерированные AI - туфта и не интересно. И это не реклама -. . .	Запрет удаления строк ТЧ документа при определённом условии Maks 19.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "Аккумуляторы", разработанного в конфигурации КА2. У данного документа есть ТЧ, в которой в зависимости от прав доступа. . .
Модель заражения группы наркоманов alhaos 17.04.2026 Условия задачи сформулированы тут Суть: - Группа наркоманов из 10 человек. - Только один инфицирован ВИЧ. - Колются одной иглой. - Колются раз в день. - Колются последовательно через. . .	Мысли в слух. Про "навсегда". kumehtar 16.04.2026 Подумалось тут, что наверное очень глупо использовать во всяких своих установках понятие "навсегда". Это очень сильное понятие, и я только начинаю понимать край его смысла, не смотря на то что давно. . .	My Business CRM MaGz GoLd 16.04.2026 Всем привет, недавно возникла потребность создать CRM, для личных нужд. Собственно программа предоставляет из себя базу данных клиентов, в которой можно фиксировать звонки, стадии сделки, а также. . .	Знаешь почему 90% людей редко бывают счастливыми? kumehtar 14.04.2026 Потому что они ждут. Ждут выходных, ждут отпуска, ждут удачного момента. . . а удачный момент так и не приходит.

@Quadest 0 / 0 / 0 Регистрация: 17.12.2012 Сообщений: 10

	Расчет загрязнения в водоеме, трудности с гистограммой 17.12.2012, 11:58. Показов 2166. Ответов 7 Метки нет (Все метки) Помогите написать программу! Ступор на гистограмме и еще не могу запретить вводить недопустимые символы =( Спасибо за ваше участие! Буду рад любому совету! 0

@Quadest 0 / 0 / 0 Регистрация: 17.12.2012 Сообщений: 10
	17.12.2012, 13:29 [ТС]
	перевернул правильно изображение =) Миниатюры 0

@Quadest 0 / 0 / 0 Регистрация: 17.12.2012 Сообщений: 10
	19.12.2012, 10:32 [ТС]
	upupup 0

SoftIce es geht mir gut 11274 / 4760 / 1183 Регистрация: 27.07.2011 Сообщений: 11,439
	19.12.2012, 14:40
	Сообщение было отмечено как решение Решение Ну если затруднения только в гистограмме, то я рекомендовал бы сделать примерно так: Миниатюры 3

@Quadest 0 / 0 / 0 Регистрация: 17.12.2012 Сообщений: 10
	20.12.2012, 22:17 [ТС]
	Спасибо за идею, но с реализацией у меня не получается, к сожалению. Не сочти за наглость, но не мог бы ты скинуть программу? Хотя бы в личные сообщения! Буду ОЧЕНЬ признателен! P.S. еще была проблема с запрещением ввода недопустимых символов в текстовое поле. 0

@Quadest 0 / 0 / 0 Регистрация: 17.12.2012 Сообщений: 10
	20.12.2012, 22:44 [ТС]
	Супер, с текстом получилось! Добавлено через 5 минут SpftIce, свяжись со мной в скайпе (kostyakostyakostya) . Я готов заплатить за твою программу. 0

Опции темы

Расчет загрязнения в водоеме, трудности с гистограммой

Решение