ctiveDocument.Shapes.AddShape (msoShapeOval, 138.4, 135.6, 245.9, _
120.6). Select.ShapeRange.Fill.Solid.ShapeRange.Fill.ForeColor.ObjectThemeColor = _.ShapeRange.Fill.ForeColor.TintAndShade = 0 #. ShapeRange.Fill.BackColor.RGB = RGB ( 255, 255, 255). ShapeRange.Fill.Visible = msoTrue.ShapeRange.Line.ForeColor.ObjectThemeColor = _.ShapeRange.Line.ForeColor.TintAndShade =-0.05.ShapeRange.Line.Weight = 3 #. ShapeRange.Line.Style = msoLineSingle.ShapeRange.Line.Visible = msoTrue.ShapeRange.Shadow.Type = msoShadow3.ShapeRange.Shadow.ForeColor.ObjectThemeColor = _.ShapeRange.Shadow.ForeColor.TintAndShade =-0.5.ShapeRange.Shadow.Transparency = 0.5.ShapeRange. Shadow.OffsetX = 1 #. ShapeRange.Shadow.OffsetY = 2 #. ShapeRange.Shadow.Visible = msoTrue.ShapeRange.ThreeD.Visible = msoFalse.ShapeRange.Fill.ForeColor.RGB = RGB (255, 255, 0). ShapeRange . Fill.Visible = msoTrue.ShapeRange.Fill.SolidSub
2.2.6 VBA Hello
Sub MY () "VBA HELLO @"
End Sub
В
2.2.7 Обчислення радіуса
Sub Радіус ()
Радіус Макрос
Макрос створено 20.06.2012 Антон.ShowSub
'Оголошуємо змінні радіуса і довжини окружності
Dim Radius As IntegerLenght As Integer
'Оголошення постійного числа PiPi = 3.14159Sub cmdCalc_Click ()
'Зчитування чисел у вікні введення
Radius = txtRadius.Text
'Вважаємо ...
Lenght = 2 * Radius * Pi
'Отриманий результат виводимо на Label.Caption = LenghtSub
В
2.2.8 Інформація про вільну пам'яті
Private Declare Sub GlobalMemoryStatus Lib "kernel32" (lpBuffer As MEMORYSTATUS)
Private Type MEMORYSTATUSAs LongAs LongAs LongAs LongAs LongAs LongAs LongAs LongTypeSub UserForm_Initialize () w1 As MEMORYSTATUSq1 As Singleq2 As Singled2 As Stringe As Integer.dwLength = Len (w1) w1 = w1.dwMemoryLoad = w1.dwTotalPhys
d2 = (q2 - q1 * 0.01 * q2)/1024 ^ 2 = Int (d2 * 10)/10 = d2 & "Mb" = MsgBox ("Вільно:" & d2, vbOKOnly + vbInformation, "Інформація про RAM")
If e = 1 ThenIf
End Sub
В
Висновок
На закінчення хочу зробити короткий висновок про вищевикладене: програмне забезпечення - це сукупність програм, що дозволяють здійснити на комп'ютері автоматизовану обробку інформації. Програмне забезпечення ділиться на системне (загальне) і прикладне (спеціальне). p align="justify"> Системне програмне забезпечення забезпечує функціонування та обслуговування комп'ютера, а також автоматизацію процесу створення нових програм. До системно...
