Перейти к содержанию

Программирование вне тематики форума


Рекомендуемые сообщения

С формой разобрался. Спасибо светлана!

Мне нужно чтоб при нажатии на кнопку открывался файл или url.

И нужно чтоб в форме писалось сколько времени осталось до срабатывания таймера.

Ссылка на комментарий
Поделиться на другие сайты

Реклама: ООО ТД Промэлектроника, ИНН: 6659197470, Тел: 8 (800) 1000-321

  • Ответов 187
  • Создана
  • Последний ответ

Топ авторов темы

Топ авторов темы

Изображения в теме

C таймером вообще всё просто...

Вот я в VB6 сейчас сделала минут за 10, правда потом около часа наводила красоту. Люблю, чтобы всё было чётко и красиво :rolleyes:

Таймер.rar

Если хотите, чтобы жизнь улыбалась вам, подарите ей своё хорошее настроение

Ссылка на комментарий
Поделиться на другие сайты

20% скидка на весь каталог электронных компонентов в ТМ Электроникс!

Акция "Лето ближе - цены ниже", успей сделать выгодные покупки!

Плюс весь апрель действует скидка 10% по промокоду APREL24 + 15% кэшбэк и бесплатная доставка!

Перейти на страницу акции

Реклама: ООО ТМ ЭЛЕКТРОНИКС, ИНН: 7806548420, info@tmelectronics.ru, +7(812)4094849

сделала минут за 10, правда потом около часа наводила красоту. Люблю, чтобы всё было чётко и красиво :rolleyes:

да, страдаю такой же болезнью, люблю качественный и красивый интерфейс. Это очень плохая болезнь.

С недавних пор начал поддерживать утверждение М.Фленова, в котором говориться: "Хочешь создать качественный интерфейс? - Посмотри как это делают в Майкрософт" Хоть самих МС не очень уважаю, но признаю что успех свой они завоевали отчасти именно этим. Во всех программах можно разобраться интуитивно, благодаря использованию стандартных компонентов, меню и тп. Все знают где искать пункты открыть -закрыть-сохранить- выход? Конечно, в меню Файл :rolleyes: Все должно быть по минимуму и удобству, всетаки приложение это не картина, основная польза от него заключается в эффективности кода.

пс Усиленно лечусь, пока получается.

абыр абыр абырвалг...

Ссылка на комментарий
Поделиться на другие сайты

Выбираем схему BMS для заряда литий-железофосфатных (LiFePO4) аккумуляторов

Обязательным условием долгой и стабильной работы Li-FePO4-аккумуляторов, в том числе и производства EVE Energy, является применение специализированных BMS-микросхем. Литий-железофосфатные АКБ отличаются такими характеристиками, как высокая многократность циклов заряда-разряда, безопасность, возможность быстрой зарядки, устойчивость к буферному режиму работы и приемлемая стоимость. Но для этих АКБ очень важен контроль процесса заряда и разряда для избегания воздействия внешнего зарядного напряжения после достижения 100% заряда. Инженеры КОМПЭЛ подготовили список таких решений от разных производителей. Подробнее>>

Реклама: АО КОМПЭЛ, ИНН: 7713005406, ОГРН: 1027700032161

Сейчас случайно набрала не цифирки, а буковки и своей программульке...

Пришлось кое что добавить. :P

Не люблю незаконченности... :rolleyes:

Если хотите, чтобы жизнь улыбалась вам, подарите ей своё хорошее настроение

Ссылка на комментарий
Поделиться на другие сайты

Ну раз говорится о закончености - я бы начал с того что приделал бы ещё англ язык :) А то блин даже посмотреть не могу :) (правда ещё не пробовал)

Ссылка на комментарий
Поделиться на другие сайты

Хм... и правда... :unsure:

Я не так хорошо знаю английский, чтобы всё правильно написать в программе.

Стыдно будет за свой английский :unsure:

Если хотите, чтобы жизнь улыбалась вам, подарите ей своё хорошее настроение

Ссылка на комментарий
Поделиться на другие сайты

Я имею ввиду разные выражения, которые я вывожу в разных TextBox и Label

Если хотите, чтобы жизнь улыбалась вам, подарите ей своё хорошее настроение

Ссылка на комментарий
Поделиться на другие сайты

Для учебной программки и так сойдет. Это просто показать, как работать с таймером, ну и как запускать приложения, например браузер.

Если хотите, чтобы жизнь улыбалась вам, подарите ей своё хорошее настроение

Ссылка на комментарий
Поделиться на другие сайты

C таймером вообще всё просто...

Вот я в VB6 сейчас сделала минут за 10, правда потом около часа наводила красоту. Люблю, чтобы всё было чётко и красиво :rolleyes:

Таймер.rar

Спасибо! В этой программе мне нужно только чтоб писало сколько осталось времени(29 28 27 ..итд.) а кнопка ПУСК, стоп, и открытия барузера - не надо. Просто если вам не сложно дайте код в этот форум.

Также не нужно отчет запушен, остановлен и не нужно кнопок. Просто во время окончания - запускается новая форма(или следующая страница)

Изменено пользователем Влад
Ссылка на комментарий
Поделиться на другие сайты

Ну все же есть в коде...

Само отображение здесь:

Private Sub Timer1_Timer()

Label1.Caption = Label1.Caption - 1

If Label1.Caption = 0 Then

...

Timer1.Enabled = False

End If

...

End Sub

Но, чтобы показать работу, нужно предварительно установить начальное время в Label1 и запустить таймер строкой: Timer1.Enabled = True, что и делается кнопкой.

Если вам не нужен запуск IE, зачем тогда просили

Мне нужно чтоб при нажатии на кнопку открывался url

Если хотите, чтобы жизнь улыбалась вам, подарите ей своё хорошее настроение

Ссылка на комментарий
Поделиться на другие сайты

Ну все же есть в коде...

Само отображение здесь:

Private Sub Timer1_Timer()

Label1.Caption = Label1.Caption - 1

If Label1.Caption = 0 Then

Timer1.Enabled = False

End If

End Sub

Но, чтобы показать работу, нужно предварительно установить начальное время в Label1 и запустить таймер строкой: Timer1.Enabled = True, что и делается кнопкой.

Если вам не нужен запуск IE, зачем тогда просили

Мне нужно чтоб при нажатии на кнопку открывался url

но я кое что изменил в программе.

еще мне нужно код для окрытия/исполнения файла. В инете нашел но он на Бейсик 2005 . А с кодом не выходит, толи я его нитуда вписываю, все сделал. ничё даже не отображает. Если у вас есть время, можно пример с кодом.

Вот то , что я сделал

Public Class Form4
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
	Close()
End Sub

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs)
	Me.Hide()
	Form5.Show()
End Sub

Private Sub Timer1_Tick_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
	Timer1.Enabled = True
	Me.Hide()
	Form5.Show()
	Timer1.Enabled = False
End Sub

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
End Sub
End Class

Ссылка на комментарий
Поделиться на другие сайты

Я уже говорила, что у меня Visual Studio 2008 не стоит, поэтому с кодом помочь не могу, негде проверять, а наобум я не могу...

Если хотите, чтобы жизнь улыбалась вам, подарите ей своё хорошее настроение

Ссылка на комментарий
Поделиться на другие сайты

Я уже говорила, что у меня Visual Studio 2008 не стоит, поэтому с кодом помочь не могу, негде проверять, а наобум я не могу...

А можете написать пример с таймером на VB 6 у меня идет от 6 на 8

Ссылка на комментарий
Поделиться на другие сайты

Извините, забыла, что в VB записывается проект не совсем по обычному...

Исправила

Если хотите, чтобы жизнь улыбалась вам, подарите ей своё хорошее настроение

Ссылка на комментарий
Поделиться на другие сайты

Извините, забыла, что в VB записывается проект не совсем по обычному...

Исправила

Спасибо!

А как сделать так чтоб юзер не мог передвинуть форму?

Изменено пользователем Влад
Ссылка на комментарий
Поделиться на другие сайты

Свойство формы Moveable = false

PS: Ой, засветился :)

Великие возможности приходят ко всем, но многие даже не подозревают, что встречались с ними.

Ссылка на комментарий
Поделиться на другие сайты

Правильно, нет. Ето свойство формы а не функция!

Среда программирования Microsoft Visual Basic 6.0

скриншот в архиве :)

Текстовый_документ.rar

Великие возможности приходят ко всем, но многие даже не подозревают, что встречались с ними.

Ссылка на комментарий
Поделиться на другие сайты

А этого я не знал :) не знаком м 8-кой

Если в ней есть событие "при перетаскивании формы" или как оно там называется, то всавь такой код:

Dim OldX As Long
Dim OldY As Long

Private Sub Form_Load()
OldX = Form1.Left
OldY = Form1.Top
End Sub

а в обработку события "при перетаскивании" соответственно такой

Form1.Left = OldX

Form1.Top = OldY

в 6-ке такого "при перетаскивании" нету.. Если не заработает есть еще идейка, но сейчас извините, мне пора, сегодня еще зайду...

Великие возможности приходят ко всем, но многие даже не подозревают, что встречались с ними.

Ссылка на комментарий
Поделиться на другие сайты

А этого я не знал :) не знаком м 8-кой

Если в ней есть событие "при перетаскивании формы" или как оно там называется, то всавь такой код:

Dim OldX As Long
Dim OldY As Long

Private Sub Form_Load()
OldX = Form1.Left
OldY = Form1.Top
End Sub

а в обработку события "при перетаскивании" соответственно такой

Form1.Left = OldX

Form1.Top = OldY

в 6-ке такого "при перетаскивании" нету.. Если не заработает есть еще идейка, но сейчас извините, мне пора, сегодня еще зайду...

Не работает :(

Ссылка на комментарий
Поделиться на другие сайты

Присоединяйтесь к обсуждению

Вы можете написать сейчас и зарегистрироваться позже. Если у вас есть аккаунт, авторизуйтесь, чтобы опубликовать от имени своего аккаунта.
Примечание: Ваш пост будет проверен модератором, прежде чем станет видимым.

Гость
Unfortunately, your content contains terms that we do not allow. Please edit your content to remove the highlighted words below.
Ответить в этой теме...

×   Вставлено с форматированием.   Восстановить форматирование

  Разрешено использовать не более 75 эмодзи.

×   Ваша ссылка была автоматически встроена.   Отображать как обычную ссылку

×   Ваш предыдущий контент был восстановлен.   Очистить редактор

×   Вы не можете вставлять изображения напрямую. Загружайте или вставляйте изображения по ссылке.

Загрузка...
  • Последние посетители   0 пользователей онлайн

    • Ни одного зарегистрированного пользователя не просматривает данную страницу

  • Сообщения

    • Какие доводы имеете против принципа разумной достаточности? Михайло Василич на сей предмет сказал бы: "В электронику уже затем вникать следует, чтобы легче было без неё обходиться"
    • Во-первых, усилитель от нагрузки 48 Ом может возбудиться, во-вторых звук будет искаженный за счет высокого сопротивления источника. Надо такую схемку применить (если усилитель рассчитан на нагрузку 4 Ом:
    • Постараюсь не сильно. Но пнуть в нужном направлении надо. Такое безобразие надо срочно исправлять.   В таком виде - разве что любителям головоломок и ребусов. Вы более запутанно и небрежно схемы не пробовали рисовать?  Вот на такой "схеме" и то лучше видно, что с чем соединено: На схемах электрических принципиальных все элементы обозначаются в виде УГО (Условных Графических Изображений). И схема рисуется как минимум с соблюдением основных правил, чтобы всем понятно было. Ну ладно, ГОСТы - это сложно. Но хотя бы что-то популярное на эту тему почитайте (ссылка).
    • для автогенераторов? У Амелиных речь идет об усилителях, подаче на их  вход сигнала синусоиды и т.д. Про автогенераторы что-то ничего не нашел. Книга 2013 г. Может, можно нагрузить источник sine на какой-нибудь резистор, никуда к автогенератору не подключать (общим будет только общий провод) и далее смотреть анализ искажений? Покажет ли Microcap правду после такого обмана? 
    • Доброй ночи. Столкнулся с неожиданной трудностью.  Косой мост.  На затворе транзистора такая картинка( синий- напряжение на коллекторе, желтый- напряжение на затворе), в момент включения ключа.  Предположительно, на полке Миллера, так быть не должно. RC цепи между истоком и стоком не помогают, в затворной цепи, так же. Верхний ключ немного сильнее греется нижнего, при этом осциллограммы на затворах идентичные. Подскажите пож., куда смотреть? STW26nm60n.pdf     KosoyR50.asc
    • Для этого надо как минимум схему схему приложить.  Без неё все ваши изыскания не имеют никакой практической ценности. Мало ли какая хрень с какими ошибками у вас собрана. Можно только догадываться, что у вас сетевой полумост. Но вообще-то и это не факт...
×
×
  • Создать...