Форум программистов, компьютерный форум, киберфорум
Visual Basic
Войти
Регистрация
Восстановить пароль
Другие темы раздела
VB Матрица: поменять местами в каждой строке положительные элементы главной и побочной диагонали Преобразовать матрицу размера 4 Х 4, поменяв местами в каждой строке положительные элементы главной и побочной диагонали. https://www.cyberforum.ru/ visual-basic/ thread559874.html VB Пятнашки - двигать на несколько костей
Здравствуйте, есть проект пятнашки, его прилагаю, как сделать, чтобы после нажатия на любой номер пятнашки мышью в случае если есть возможность вверх вниз вправо влево двигались 2, 3 или 4 кости...
VB Записи в txt: сделать так, чтобы к каждой добавленной записи соответствовала своя картинка форма добавляет информацию в txt файл (заполняешь все поля - жмешь кнопку). надо сделать так, чтобы к каждой добавленной записи соответствовала своя картинка. картинка добавляется по дабл клику по... https://www.cyberforum.ru/ visual-basic/ thread559784.html VB Расчитать точки безубыточности продаж используя условный переход и цикл https://www.cyberforum.ru/ visual-basic/ thread559707.html
Есть парочка задач Задача 1. Составить программу расчета точки безубыточности от продажи продукции (ц) по формуле: Т=СПИ/(Ц-ПИ) где СПИ − совокупные постоянные издержки, руб.;...
VB Шифрование: исправить приложенный код
Подскажите как заставить его работать, не могу не как понять =( Option Explicit ' ....----==== API Declarations ====----.... Private Declare Function CryptAcquireContext Lib "advapi32.dll" _...
VB Создать собственный класс с возможностью графического представления обьекта Создать собственный класс с возможностью графического представления обьекта графически.на vb 6.0 https://www.cyberforum.ru/ visual-basic/ thread559646.html
VB Точка получается не в центре https://www.cyberforum.ru/ visual-basic/ thread559571.html
У меня такая проблема, есть код Option Explicit Private Declare Function GetDesktopWindow Lib "User32" () As Long Private Declare Function GetWindowDC Lib "User32" (ByVal hwnd As Long) As Long...
VB Вычислить значение выражения
Помогите пожалуйста! Плохо разбираюсь но очень нужно!
VB Выяснить, попала ли точка в прямоугольник https://www.cyberforum.ru/ visual-basic/ thread559435.html
Напишите пожалуйста любой пример с прямоугольником и точкой которая движется, так что бы когда точка попадала в прямоугольник выскакивало сообщение.
VB Изменить междустрочный интервал в MS Word https://www.cyberforum.ru/ visual-basic/ thread559259.html
Возникла проблема по изменению междустрочного интервала в MS Office. Пробовал функции: DocWord.Application.Selection.ParagraphFormat.Space1 DocWord.Application.Selection.ParagraphFormat.Space15...
Форма по размеру экрана VB
Привет всем! Подскажите как сделать форму по размеру экрана. Спасибо!
VB Как в vsFlexGrid сделать скроллинг мышкой https://www.cyberforum.ru/ visual-basic/ thread559171.html
Добрый день. кто нибудь знает как сделать в vsFlexGrid сделать скроллинг мышкой ?
6031 / 3438 / 335
Регистрация: 14.06.2009
Сообщений: 8,136
Записей в блоге: 2
27.04.2012, 11:12 0

Расчетная программа. Добавить комментарии к коду - VB - Ответ 2961885

27.04.2012, 11:12. Показов 954. Ответов 2
Метки (Все метки)

Лучший ответ Сообщение было отмечено как решение

Решение

Цитата Сообщение от Dimakol1 Посмотреть сообщение
Закоментировать программный код как можно подробнее
Ок, ща закоментруем
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
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
62
63
64
65
66
67
68
69
70
71
72
73
'Option Explicit
'Dim polyTest As New Polygon, PredX As Single, PredY As Single
'Public di As Long, CentX As Integer, CentY As Integer
 
 
'Private Sub CenterMass_Click()
'polyTest.Triangulation
'Raschet.Visible = True
'End Sub
'Private Sub Raschet_Click()
'polyTest.ОтобразитьРассчётЦентраМасс
'End Sub
 
'Private Sub TextSetting_Click()
'TextWork.Show
'End Sub
'Private Sub Form_Load()
'Randomize
'With picTest
'.Move 0, 0, ScaleWidth, ScaleHeight
'.FillStyle = vbSolid
'End With
'End Sub
'Private Sub new_poligon_Click()
'picTest.Cls
'polyTest.new_poligon
'PredX = 0
'PredY = 0
'Raschet.Visible = False
'End Sub
 
'Private Sub picTest_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
'****************полином*****************
'picTest.Line (X, Y - 2)-(X, Y + 2)
'picTest.Line (X - 2, Y)-(X + 2, Y)
 
'If PredX <> 0 And PredY <> 0 Then
'picTest.Line (PredX, PredY)-(X, Y)
'End If
 
'PredX = X
'PredY = Y
 
'polyTest.Point X, Y
 
'If Button = 2 Then
'picTest.Cls
'Set polyTest.Device = picTest
'With picTest
'.FillColor = RGB(Rnd * 256, Rnd * 256, Rnd * 256)
'polyTest.Draw
'End With
'End If
 
'****************траектория*****************
'If PredX <> 0 And PredY <> 0 Then
'picTest.Line (PredX, PredY)-(X, Y)
'End If
 
'PredX = X
'PredY = Y
'List1.AddItem (X & "_" & Y)
 
'polyTest.Point X, Y
 
'If Button = 2 Then
'Beep
'Set polyTest.Device = picTest
'picTest.
'polyTest.Draw
'End If
'***************
'End Sub
Всё огонь! закоментировал
Теперь код стал еще интереснее

Вернуться к обсуждению:
Расчетная программа. Добавить комментарии к коду VB
4
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
27.04.2012, 11:12
Готовые ответы и решения:

Добавить комментарии к коду
нужно прокомментировать код mov ax,@data mov ds,ax mov cx,br mov si,offset mas xor ax, ax ...

Добавить комментарии к коду
Здравствуйте. Кто сможет закомментировать код? &lt;script language=&quot;JavaScript&quot;&gt; var elements =...

Добавить комментарии к коду
Кто нибудь напишите подробный комментарий к коду ни СИ. Можно подробней по &quot;#define size 5&quot; и int...

Добавить комментарии к коду. Сравнение чисел
Здравствуйте, очередной вопрос от меня. Нужно разобрать код (добавив комментарии) Задание:...

2
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
27.04.2012, 11:12

Добавить комментарии к коду (список - стек)
//Список вида &quot;стек&quot; #include &lt;iostream&gt; using namespace std; //объявляем структуру с...

LPC214X. Нужно добавить комментарии к коду на Си и АСМ.
Недавно начал изучать программирования процессоров, и наткнулся на ассемблер и в книги по которой...

LPC214X. Нужно добавить комментарии к коду на Си и АСМ (задание 2)
Закомментируйте пожалуйста эту программу, а то в книги нету толкового объяснения #include...

Объясните что делает данная программа и напишите комментарии к коду
Что эта программа делает и если можно комментарии к ней (C++) #include &lt;stdio.h&gt; #include...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.