Перейти из форума на сайт.

НовостиФайловые архивы
ПоискАктивные темыТоп лист
ПравилаКто в on-line?
Вход Забыли пароль? Первый раз на этом сайте? Регистрация
Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » Задачи на Visual Basic (VB).

Модерирует : ShIvADeSt

 Версия для печати • ПодписатьсяДобавить в закладки
Страницы: 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 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61

Открыть новую тему     Написать ответ в эту тему

NEOMATRIX



Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору


Данный топик предназначен только для обсуждения типовых задач на Visual Basic.
Обсуждение задач на VBA (а именно, Excel, Word, Access) строго запрещено!
Пишите в соответствующих топиках.

 
Родственные топики:
  • Excel VBA - часть 1, часть 2 - все вопросы по Excel VBA туда
  • Word VBA все вопросы по Word VBA туда
  • Access все вопросы по программированию в Access туда
  • VBScript - программирование "удобняшек" на VBScript
  • QBasic - типовые задачи на QBasic
     
  • Date Time Functions In Visual Basic
  • VB6's Trig, Math, Financial, Boolean, and Random functions
  • Visual Basic 6 String Functions
  • VB6 Number System Functions (Hex, Oct, Etc)
  • VB6's DateAdd function
     
  • Functions (Visual Basic)
  • Keywords and Members by Task
  • Visual Basic Reference
     
  • Visual Basic String Manipulation Tutorials
     
  • Top 10 Visual Basic Sins

     
    Учебники:
    Visual Basic для студентов и школьников. Культин Н. (2010)
    Занимательное программирование на Visual Basic.NET. Климов А. (2005)
    Visual Basic в задачах и примерах. Сафронов (2009)
    Visual Basic 2012 на примерах. Зиборов В. (2012)

  • Всего записей: 202 | Зарегистр. 29-12-2004 | Отправлено: 19:30 16-11-2005 | Исправлено: XPerformer, 10:07 28-10-2014
    zerkalo77



    Junior Member
    Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
    Ну вообще то можно вообще без D, M, G и pass'ов
     
    Private Sub Command1_Click()  
    Label1.Caption = Val(InputBox("Введите день вашего рождения", "День"))  
    Label2.Caption = Val(InputBox("Введите месяц вашего рождения", "Месяц"))  
    Label3.Caption = Val(InputBox("Введите год вашего рождения", "Год"))  
    End Sub
     
    Как то так. Не?

    Всего записей: 70 | Зарегистр. 02-06-2006 | Отправлено: 01:44 14-12-2009
    blaro



    Member
    Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
    zerkalo77
    Можно и так. Это уже на усмотрение автора программы. Тут даже можно убрать Val, ибо конвертировать строку в число и обратно в строку-глупо. Да и прога будет немножко быстрее работать, имхо.

    Всего записей: 311 | Зарегистр. 29-01-2006 | Отправлено: 02:15 14-12-2009
    Renome19

    Newbie
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    всем добрый день.
    Помогите кто может, скоро сессия, а мне надо сдать программирование на VBScriptе, а я его не знаю((((Пожалуйста....Вот задачка:
     
    1.Вывести на экран диалоговое окно с кнопками Ok, Отмена и значком Stop Mark. Если нажата кнопка Ok, то вывести результат вычисления корней квадратного уравнения, коэффициенты которого передаются в сценарий в качестве параметров. Если нажата кнопка Отмена, вывести сообщение «Вы нажали Отмена».
     

    Всего записей: 1 | Зарегистр. 14-12-2009 | Отправлено: 15:39 14-12-2009
    B16



    Junior Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    zerkalo77, blaro - вообще нужно было один раз ввести дату рождения допустим 12.12.2000 и программа должна была сделать выборку: месяц в первый лейбл, день во второй, а год в третий. Но это оказалось сложновато. В итоге я решил сделать три инпут бокса. Препод сказал нормально и засчитал задачу.
    На 41 странице указана задача полностью. Там уже нет D, M, G, кстати я их использую т.к. мне так проще.  
    Язык вроде не сложный но вот преподаватель не всё объясняет.
     
    Ребята спасибо за то что заметили задачу и ответили. Т.к. когда первый раз задал вопрос ответ был один и тот не по теме.

    Всего записей: 69 | Зарегистр. 31-07-2009 | Отправлено: 19:28 14-12-2009 | Исправлено: B16, 19:29 14-12-2009
    7steeps

    Newbie
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Ребята, прошу прощения, если не в тему или если этот вопрос уже рассматривался. (цитата)
    Хочу создать форму в VB в которой будут текстовые поля, в результате нажатие кнопки, всё что будет в текстовых полях записывалось в Ехсел в заранее заданные клетки и сохранялось там!!! Проблема с реализацией не знаю как заставить данные с текстового поля занести в Ехсел(((!!!         если можно маленький пример плиз)))

    Всего записей: 4 | Зарегистр. 06-01-2009 | Отправлено: 00:59 15-12-2009 | Исправлено: 7steeps, 01:16 15-12-2009
    dneprcomp



    Silver Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    7steeps
    http://www.xtremevbtalk.com/archive/index.php/t-121161.html
    http://forums.devx.com/showthread.php?t=168540

    Всего записей: 3920 | Зарегистр. 31-03-2002 | Отправлено: 02:54 15-12-2009
    Aimerko



    Newbie
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Ребята, помогите срочно решить вот такую задачку (программу составить на Visual Basic нужно, а йа дерево):
     
    СОСТАВИТЬ  ПРОГРАММУ ДЛЯ  ВЫЧИСЛЕНИЯ ЗНАЧЕНИЯ ФУНКЦИИ. РЕЗУЛЬТАТЫ ВЫДАТЬ НА ПЕЧАТЬ:  
     
    N= 5x- 8lnx – 8, для х=2,5; шаг 0,1.
     
     
    если поможете сегодня к 15:00 с меня на выходных пиво ^^

    Всего записей: 3 | Зарегистр. 16-12-2009 | Отправлено: 09:18 16-12-2009
    blaro



    Member
    Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
    Aimerko

    Цитата:
    если поможете сегодня к 15:00 с меня на выходных пиво ^^

    А если я живу в другой стране, обеспечишь мне прописку в Москве?

    Всего записей: 311 | Зарегистр. 29-01-2006 | Отправлено: 11:36 16-12-2009
    Aimerko



    Newbie
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    обеспечу в Питере)

    Всего записей: 3 | Зарегистр. 16-12-2009 | Отправлено: 11:51 16-12-2009
    blaro



    Member
    Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
    Aimerko

    Цитата:
    обеспечу в Питере)

    Тоже хорошо
     
    Вот решение:

    Код:
     
    Dim x, N As Double
            Dim i As Integer
            x = 2.5
            For i = 0 To 10
                N = 5 * x - 8 * Math.Log10(x) - 8
                x += 0.1
                Console.WriteLine("{0}", N)
            Next
            Console.Read()
     

    Всего записей: 311 | Зарегистр. 29-01-2006 | Отправлено: 12:15 16-12-2009 | Исправлено: blaro, 12:17 16-12-2009
    Aimerko



    Newbie
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Спасибо огромное!

    Всего записей: 3 | Зарегистр. 16-12-2009 | Отправлено: 14:21 16-12-2009
    B16



    Junior Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Скоро экзамен, а мне нужно сделать ещё несколько задач.  
    Вот 1я:
    Нужно что бы введённое предложение(в текстбокс) выводилось в следующем текст боксе в виде:
    Вводим: Москва Столица России.
    Выводит:
    Москва
    Столица  
    России.

    При это реализовать всё нужно при помощи циклов вида: Do, loop, until. Думаю понятно.
    Вот 2я:
    Нужно сделать программу используя выше написанные циклы: что бы по форме катался бильярдный шарик(простая точка) и отталкивался от краёв формы.
    У меня точка даже не движется, хотя использовал обычный цикл.

    Всего записей: 69 | Зарегистр. 31-07-2009 | Отправлено: 19:19 16-12-2009
    GenyaMS



    Junior Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Доброго времени суток! вопрос наверное тоже из часто задаваемых...  
    Как получить програмно список файлов и папок(их имен) - по указанной папки?
    Задание:1. указывается путь к папке.
    2. Получаем массив элементов, где значеними элементов явлюются - имена паппок и файлов входящих папку указанную в пункте 1.
     
    Если есть подобные решения, то дайте пожалуйста просто ссылку....

    Всего записей: 184 | Зарегистр. 24-01-2009 | Отправлено: 12:57 17-12-2009
    dneprcomp



    Silver Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    GenyaMS
    http://www.devx.com/vb2themax/Tip/19057
    http://www.freevbcode.com/ShowCode.asp?ID=41
    http://www.blueclaw-db.com/listbox-directory.htm
    http://www.freevbcode.com/ShowCode.Asp?ID=1331

    Всего записей: 3920 | Зарегистр. 31-03-2002 | Отправлено: 00:51 18-12-2009
    IraShum

    Newbie
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Здравствуйте, помогите пожалуйста решить задачку.  
       У меня есть документ Exel с определенными данными, эти данные стоят ссылками на другой документ. Каждый месяц мне нужно данные обновлять (изменением связей на другой месяц). Это не сложно, но все же.  
       Сделала всплывающий список в ячейке с месяцами, теперь хочу чтобы при выборе определенного месяца ссылка сама менялась на документ с данными выбираемого месяца.  
      Приблизительно понимаю как это сделать, но не знаю как написать все условия, так как в VBA не сильна (макрос на изменение ссылки я записала, про формулу "если" знаю, а вот как это все связать не пойму..))  
    Заранее спасибо ))))

    Всего записей: 1 | Зарегистр. 30-12-2009 | Отправлено: 11:32 30-12-2009 | Исправлено: IraShum, 11:33 30-12-2009
    Crazyblind

    Newbie
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    хорошая предновогодняя шутка
     
    Девушка, вам вроде бы сюда http://forum.ru-board.com/topic.cgi?forum=33&topic=8273#1
     
    P.S.: Всех с наступающим!

    Всего записей: 17 | Зарегистр. 20-05-2009 | Отправлено: 11:48 31-12-2009
    h1ka

    Newbie
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Прошу помощи:
    Есть программа SUBARU FAST 2, которая по мнению специалиста написана на VB 5.0

    Цитата:
    В базе страничная адресация,  адрес задаётся 4мя байтами: ZZ YY XX UU
    Абсолютный адрес получается так: (ZZ*0x8CA000 + YY*0x25800 +XX*0x800 + UU*0x8) - 4*0x25800). Индекс выполнен двоичным деревом.
    Такая же база используется для большинства известных японских авто.

    Как правильно экспортировать бд для последующего переформатирования в веб-приложение?

    Всего записей: 29 | Зарегистр. 18-11-2008 | Отправлено: 13:24 05-01-2010
    AndronH



    Newbie
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Читаешь по этому адресу данные записываешь в свою базу. В чем грабли?
    чтоб тебе подробности написали нужно хотяб выложить пример базы данных.
    а чтоб написали конвертор за Вас, указать сумму которую готов заплатить.

    Всего записей: 21 | Зарегистр. 14-12-2006 | Отправлено: 14:13 07-01-2010
    h1ka

    Newbie
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    AndronH
    Какой софт пользовать для чтения данных и конвертации?
    Готов заплатить разумную цену за грамотный конвертер и фак к нему.

    Всего записей: 29 | Зарегистр. 18-11-2008 | Отправлено: 11:02 08-01-2010
    TayPen



    Junior Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Ткните носом, нигде не смог найти нормального мануала как из VB.Net (MS studio 2008) работать с dbf . И вообще неплохобы мануал по работе с базами данных.

    Всего записей: 44 | Зарегистр. 27-10-2009 | Отправлено: 16:34 11-01-2010
    Открыть новую тему     Написать ответ в эту тему

    Страницы: 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 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61

    Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » Задачи на Visual Basic (VB).


    Реклама на форуме Ru.Board.

    Powered by Ikonboard "v2.1.7b" © 2000 Ikonboard.com
    Modified by Ru.B0ard
    © Ru.B0ard 2000-2024

    BitCoin: 1NGG1chHtUvrtEqjeerQCKDMUi6S6CG4iC

    Рейтинг.ru