Отправляет email-рассылки с помощью сервиса Sendsay

Программирование на Visual Basic, VB .NET и VBA

Разделы форума: Visual Basic 6.0 Microsoft VB.Net Visual Basic for Applications (VBA) Visual Basic FAQ Другие рассылки, подпишись: Анекдот на каждый день | Видео юмор - смешное бесплатное онлайн видео | Фото Тюмени - фотографии города Тюмень Скачать: Visual Basic , ActiveX , MSDN , видео уроки , утилиты , модули , книги по программированию Форум: Программирование на Visual Basic делает анонс свежих тем. Если у Вас есть вопросы - задавате их на нашем форуме. Не умеете решать задачи? Нужно решить курсовую? З...

2009-11-26 05:54:04 + Комментировать

Программирование на Visual Basic, VB .NET и VBA

Разделы форума: Visual Basic 6.0 Microsoft VB.Net Visual Basic for Applications (VBA) Visual Basic FAQ Другие рассылки, подпишись: Анекдот на каждый день | Видео юмор - смешное бесплатное онлайн видео | Фото Тюмени - фотографии города Тюмень Скачать: Visual Basic , ActiveX , MSDN , видео уроки , утилиты , модули , книги по программированию Форум: Программирование на Visual Basic делает анонс свежих тем. Если у Вас есть вопросы - задавате их на нашем форуме. Не умеете решать задачи? Нужно решить курсовую? З...

2009-11-25 10:39:13 + Комментировать

Вывести на экран все четные элементы массива

Вывести на экран все четные элементы массива 2009-11-25 07:00 Александр Вывести на экран все четные элементы массива и определить количество нечетных элементов. Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim n As Integer Dim A(n) As Integer Dim uneven As Integer Dim x As Integer For x = 0 To UBound(A) A(x) = x ^ 2 + 1 If A(x) Mod 2 = 0 Then TextBox1.Text = ] ...

2009-11-25 08:31:14 + Комментировать

Программирование на Visual Basic, VB .NET и VBA

Разделы форума: Visual Basic 6.0 Microsoft VB.Net Visual Basic for Applications (VBA) Visual Basic FAQ Другие рассылки, подпишись: Анекдот на каждый день | Видео юмор - смешное бесплатное онлайн видео | Фото Тюмени - фотографии города Тюмень Скачать: Visual Basic , ActiveX , MSDN , видео уроки , утилиты , модули , книги по программированию Форум: Программирование на Visual Basic делает анонс свежих тем. Если у Вас есть вопросы - задавате их на нашем форуме. Не умеете решать задачи? Нужно решить курсовую? З...

2009-11-24 10:18:05 + Комментировать

Вывести все четные числа от m до М

Вывести все четные числа от m до М 2009-11-24 07:00 Александр Вывести все четные числа от m до М Даны целые числа а1.аn. Пусть m и М- наибольшее и наименьшее из них. Вывести все четные числа от m до М, не встречающиеся среди данных в порядке убывания. Для вывода массива пользоваться элементом управления List. Dim a(0 To 20) As Integer Dim i As Byte Dim k As Integer Dim max As ] ...

2009-11-24 08:30:32 + Комментировать

Программирование на Visual Basic, VB .NET и VBA

Разделы форума: Visual Basic 6.0 Microsoft VB.Net Visual Basic for Applications (VBA) Visual Basic FAQ Другие рассылки, подпишись: Анекдот на каждый день | Видео юмор - смешное бесплатное онлайн видео | Фото Тюмени - фотографии города Тюмень Скачать: Visual Basic , ActiveX , MSDN , видео уроки , утилиты , модули , книги по программированию Форум: Программирование на Visual Basic делает анонс свежих тем. Если у Вас есть вопросы - задавате их на нашем форуме. Не умеете решать задачи? Нужно решить курсовую? З...

2009-11-23 12:42:35 + Комментировать

Ввод произвольной цифры и вывод её названия

Ввод произвольной цифры и вывод её названия 2009-11-23 07:00 Александр Ввод произвольной цифры и вывод её названия. dim digit as String digit = Me.Text1.Text Select Case digit Case is = "0" MsgBox"Ноль) Case is = "1" MsgBox"Один) Case is = "2" MsgBox"Два) Case is = "3" MsgBox"Три) Case is = "4" MsgBox"Четыре) Case is = "5" MsgBox"Пять) Case is = "6" MsgBox"Шесть) Case is = "7" MsgBox"Семь) Case is = "8" MsgBox"Восемь) Case is = "9" MsgBox"Девять) Case Else MsgBox"Ошибочный ввод) End Select ...

2009-11-23 07:53:34 + Комментировать

В одномерном массиве x(n) поменять местами максимальный и минимальные элементы

В одномерном массиве x(n) поменять местами максимальный и минимальные элементы 2009-11-22 07:00 Александр В одномерном массиве x(n) поменять местами максимальный и минимальные элементы Dim y) As Integer minPos = 1 maxPos = 1 Min = x(1) Max = x(1) For i = 2 To n If x(i) Max Then Max = x(i) maxPos = i End If Next i x(minPos) = Max x(maxPos) = Min For i = 1 To n ReDim Preserve ] ...

2009-11-22 08:36:39 + Комментировать

Программирование на Visual Basic, VB .NET и VBA

Разделы форума: Visual Basic 6.0 Microsoft VB.Net Visual Basic for Applications (VBA) Visual Basic FAQ Другие рассылки, подпишись: Анекдот на каждый день | Видео юмор - смешное бесплатное онлайн видео | Фото Тюмени - фотографии города Тюмень Скачать: Visual Basic , ActiveX , MSDN , видео уроки , утилиты , модули , книги по программированию Форум: Программирование на Visual Basic делает анонс свежих тем. Если у Вас есть вопросы - задавате их на нашем форуме. Не умеете решать задачи? Нужно решить курсовую? З...

2009-11-21 09:36:10 + Комментировать

В одномерном массиве найти среднее арифметическое четных чисел

В одномерном массиве найти среднее арифметическое четных чисел 2009-11-21 07:00 Александр В одномерном массиве B, состоящего из N элементов, найти среднее арифметическое четных чисел. Option Base 1 Private Sub Command1_Click) Dim B) As Long Dim N As Integer N = Val(InputBox"Введите размеренность от 1 до 10 массива, "Задача No1, "N) Select Case N Case Is ...

2009-11-21 09:31:19 + Комментировать

Рекомендуем подписаться: