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

Les_PURE Newbie Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору gifin   Как транслировать думаю инфы куча, один из вариантов - это заменить каждый символ его кодом ASCII Всего записей: 10 | Зарегистр. 24-10-2007 | Отправлено: 23:38 01-12-2007

DIMICH Advanced Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору   Advanced Member    Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модераторуРебят плиз помогите решить задачу по информатике! Вы конечно извините но я в этом ничерта не понимаю, а здавать нужно! Извините что беспокою вас такими тупыми запросами, но я по професии дизайнер и в этом нихера не шарю   Задача №1   Решить систему ленейных уровнений   |   A1X + B1Y + C1Z + D1 = 0  <   A2X + B2Y + C2Z + D2 = 0     |   A3X + B3Y + C3Z + D3 = 0          A1 = -1         A2 = 0        A3 = -0.5    B1 = 0          B2 = 1.5     B3 = 1    C1 = -1.79    C2 = 8.7     C3 = 3.5    D1 = 4.2       D2 = -2.25  D3 = 0.6     Задача №2 Решить систему ленейных уровнений    K1X1 + L1X2 + M1X3 + N1X4 + S1 = 0    K2X2 + L2X2 + M2X3 + N2X4 + S2 = 0      K3X3 + L3X3 + M3X3 + N3X4 + S3 = 0      K4X4 + L4X4 + M4X4 + N4X4 + S4 = 0          K1 = 0        K2 = 1        K3 = 2        K4 = 2    C1 = 8        C2 = 12      C3 = -1      C4 = 7    M1 = 4.2     M2 = 0        M3 = 2.5     M4 = -3    N1 = -4.2    N2 = 0.5      N3 = 0       N4 = 0    S1 = 0        S2 = -3.6     S3 = -5.5   S4 = 0     Задача №2 Решить систему ленейных уровнений    E1X + F1Y + G1Z + H1U + A1 = 0    E2X + F2Y + G2Z + H2U + A2 = 0      E3X + F3Y + G3Z + H3U + A3 = 0      E4X + F4Y + G4Z + H4U + A4 = 0          L1 = 4.5         L2 = 0          L3 = 6.5       L4 = -4.5    F1 = -4.7        F2 = -9.2      F3 = 8.1       F4 = 7.3    G1 = 0           G2 = -4.7     G3 = 0         G4 = 1.5    H1 = 2           H2 = -4         H3 = 0         H4 = 0    A1 = 0.9        A2 = -1.4      A3 = -6.5     A4 = 3   Если можно то напишите код задач   Зарание благодорю за помощь! Если чтото надо по дизайну обращайтесь Всего записей: 1363 | Зарегистр. 06-03-2004 | Отправлено: 17:23 03-12-2007

kalinakrasnay Member Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору упс...перепутала топик... Всего записей: 351 | Зарегистр. 04-01-2007 | Отправлено: 20:21 05-12-2007 | Исправлено: kalinakrasnay, 20:24 05-12-2007

5555555 Silver Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору kalinakrasnay Цитата: нужно чтоб вводились только цифры. почти стандартная функция, к тому же - универсальная Private Sub txtSum_KeyPress(KeyAscii As Integer)   KeyAscii = Only_Number(KeyAscii)   End Sub   Function Only_Number(theParam As Integer) If InStr("1234567890" & Chr(8), Chr(theParam)) > 0 Then Only_Number = theParam   Else   Only_Number = 0   End If   End Function Цитата: форма и вся ерунда находится в экселе, так что я точно по теме... как раз не по теме, это в теме VBA   Добавлено: Цитата: упс...перепутала топик... а я успел Всего записей: 2593 | Зарегистр. 01-04-2004 | Отправлено: 20:27 05-12-2007

kalinakrasnay Member Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору 5555555 скоростной! спасибо за оперативность и помощь!!!!!!!!!! Всего записей: 351 | Зарегистр. 04-01-2007 | Отправлено: 23:33 06-12-2007

lypky Advanced Member Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору Как на VBA написать программку. Что бы она брала слова (3-10 символов) из определенных ячеек - генерировали все возможные комбинации: к примеру есть слова слово1, слово2, слово3: на выходе что бы было: 1.) слово1слово2слово3 2.) слово2слово3слово1 3.) слово3слово2слово1 4.) слово2слово1слово3   5.) и т.д.   Ну и потом заносило их поочереди в строки сверху вниз...   Вот озадачили меня - а я в ВБА уже давно ничего не делал - поэтому смотрю щас на все это дело как баран на новые ворота...     Помогите кто чем может =) Всего записей: 699 | Зарегистр. 19-10-2006 | Отправлено: 03:43 08-12-2007

bonya19 Junior Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору   Как это делать? о_0 Всего записей: 116 | Зарегистр. 23-05-2007 | Отправлено: 18:41 10-12-2007

Diana Stereogum Newbie Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Помогите решить задачу, пожалуйста!   В матрице размером 5*3 поменять местами строки с наибольшим и наименьшим номерами Всего записей: 1 | Зарегистр. 10-12-2007 | Отправлено: 21:58 10-12-2007

BrdGuest Junior Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору bonya19 Для вычисления числа e разложением в ряд воспользуйся примерно следующим кодом   Добавлено: Diana Stereogum 5 * 3 - 5 строк и 3 столбца Цитата: поменять местами строки с наибольшим и наименьшим номерами это как? 1ю с 5й? Уточни, что надо сделать. Всего записей: 43 | Зарегистр. 07-12-2007 | Отправлено: 18:11 14-12-2007 | Исправлено: BrdGuest, 18:19 14-12-2007

Bersa Junior Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Подскажите пожалуйста, как сделать чтобы при использовании DataGridView можно было выбрав определенную строку открыть вложенную форму с детальными данными, относящимися к этой строке? Например: имеется база данных по заказам, необходимо выбрав в таблице строку с заказом, открыть данные по этому заказу. Используется Visual Basic 2005. Каксделать связанный Dataset, включить в него связанные таблицы, чтобы содержимое автоматически менялось на основании выбранной позиции в родительской таблице... как в MS Access. Подскажите пожалуйста новичку. Всего записей: 58 | Зарегистр. 20-12-2006 | Отправлено: 22:30 19-12-2007

BrdGuest Junior Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Yfcntyf Держи: Код: Const N = 10     Dim Matrix(N, N) As Integer   Dim IsSymmetric As Boolean   Dim Str As String     OutStr = ""   ' заполняем матрицу случайными числами   Randomize   For i% = 0 To N - 1     For j% = 0 To N - 1       Matrix(i%, j%) = CInt(Int(101 * Rnd()))       OutStr = OutStr & vbTab & Matrix(i%, j%)     Next j%     OutStr = OutStr & vbLf   Next i%     ' проверяем матрицу на семмитричность   IsSymmetric = True   For i% = 1 To N - 1     For j% = 0 To i% - 1       If Matrix(i%, j%) <> Matrix(j%, i%) Then         IsSymmetric = False         GoTo BeforeLoops       End If     Next j%   Next i%   BeforeLoops:   OutStr = OutStr & vbLf & ("Matrix is " & IIf(IsSymmetric, "", "not ") & "symmetric")   MsgBox OutStr Всего записей: 43 | Зарегистр. 07-12-2007 | Отправлено: 17:34 24-12-2007

Bersa Junior Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Ребята, откликнитесь на мою просьбу двумя постами выше - я уже давно не знаю, как это сделать. Всего записей: 58 | Зарегистр. 20-12-2006 | Отправлено: 01:04 25-12-2007

BrdGuest Junior Member Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Yfcntyf Шапку видел? Цитата: Обсуждение задач на VBA (а именно, Excel, Word, Access) строго запрещено!   Пишите в соответствующих топиках. Всего записей: 43 | Зарегистр. 07-12-2007 | Отправлено: 15:57 25-12-2007

Страницы: 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).

Переход по форумам  Закладки   » Компьютеры Цифровое изображение Программы Microsoft Windows UNIX Другие OS Hardware В помощь сисадмину Прикладное программирование Игры Форумные игры   » Интернет Web-программирование В помощь вебмастеру Графика Хостинг Зацените-ка!   » Тематические Ikonboard v.2 Ikonboard v.3 Invision Board Другие форумы PHP-Nuke и другие порталы Мобила   » Общие Спорт Флейм Темы по региональным встречам Музыка и Кино Юмор Литература и Живопись   » Ru.Board Новости Помощь по форуму   » Андеграунд eBookz Варезник Раздачи и акции Мобильный варезник Андеграунд Игры и фильмы   » Специальные Тестирование