1 / 17

Константи, Променливи и Типове данни

Константи, Променливи и Типове данни. Константи, Променливи и Типове данни. 1. Коментар – ( ‘ ), ( REM ). 2. Продължение на Ред – ( _ ) Range (“ A 1”). _ Font . Bold = True Забележка:

wing-terrell
Download Presentation

Константи, Променливи и Типове данни

An Image/Link below is provided (as is) to download presentation Download Policy: Content on the Website is provided to you AS IS for your information and personal use and may not be sold / licensed / shared on other websites without getting consent from its author. Content is provided to you AS IS for your information and personal use only. Download presentation by click this link. While downloading, if for some reason you are not able to download a presentation, the publisher may have deleted the file from their server. During download, if you can't get a presentation, the file might be deleted by the publisher.

E N D

Presentation Transcript

  1. Константи, Променливи и Типове данни

  2. Константи, Променливи и Типове данни 1. Коментар – ( ‘ ), (REM) 2. Продължение на Ред – ( _ ) Range(“A1”). _ Font.Bold = True Забележка: Не може да бъде поставен символа за нов ред ( _ ) въввътрешността на името в текстове или низове константи.

  3. 3. Константи • 3.1. Текстови – заграждат се в “ “ • Пример: “Пример на VBA” • 3.2. Дати – заграждат се в # • Пример: #3/25/2010# • 3.3. Числови - във формат на число • Пример: 3.14

  4. 4. Дефиниране и деклариране на константи. • Извършва с ключовата дума const: • Const<име на константа> = <число | дата | низ> • Примери: • Числова: Const Pi = 3.14 • Текстова: Const Title = ”Оценка” • Дата: Const ToDay = #3/26/2010#

  5. 5. Служебни константи на VBA. Наричат се Изброител (Enums).Например Еxcel има 152 изброителя, като един от тях е: Enum ColorConstants vbBlack = 0 vbBlue = 16711680 vbMagenta = 16711935 vbCyan = 16776960 vbWite = 16777215 vbRed = 255 vbGreen = 65280 vbYallow = 65535 End Enum Например: Range (“A1”).Font.Color = vbRed Забележка:В редактора на VBA има (object Browser) показва се с клавиша F2, в който могат да се видят всички налични служебни изброители.

  6. 6. Типове в VBA • 6.1.Числови • 6.1.1. Целочислени 6.1.2. Реални

  7. 6.3. ДРУГИ • 6.3.1.Дата 6.3.2. Низ 6.3.3. Неопределен 6.3.4.Обект

  8. 7. Променливи на VBA. Променливите могат да бъдат смятани като местапамет,където могат да се държат стойности от даден тип.Стойностите в променливите могат да се променят през времето на живот на програмата и затова се наричат "променливи“. 7.1. Име, Типи Стойност на променливите.

  9. 7.2.Деклариране на променливи във VBA Декларирането на променливите стават по два начина: 7.2.1. Чрез пряко деклариране със запазената ключова дума Dim Синтаксис за деклариране на променлива Dim <име на променлива1> As <тип1>, .... .......... <име на променлива n> As <типn>. Забележка:Ако не е зададен конкретен тип на променливата се възприема от VBA за неопределен тип Variant. Пример: Dim Name As String Dim Holiday As Date Dim Money As Currency Dim A As Integer, Name As String, Money As Currency Dim Age, Height, Weight As Integer

  10. 7.2. Деклариране на типове чрез суфикси. Суфикса се слага след името на променливите. • % - integer, • & - Long, • ! – Singe, • # - Double, • @ - Currency, • $ - String • Пример: • Dim Name$, Money@, A%, B&, C!, D# • Например, ако реда декларира променлива, наречена Name$: • Dim Name$ • Тогава може да напишем: • Name$ = "Donna"

  11. Таблица: Суфикси за деклариране на тип • 8.Tun данни Boolean(Булеви) • Булевата променлива е променлива, която приема една от двете възможни стойности: True (истина) или False (неистина). • Този изключително полезен тип данни беше неотдавна въведен във VBA. • Преди това VBA разпознаваше 0 като False и всяка друга ненулева стойност като True, което може да видите в по-старите програми.

  12. Задачиза типове променливи

  13. Задачиза типове променливи: • SubPrimer_String‘Низ с произволна дължина • DimImeAs String, PrezimeAs String, _ • FamiliaAs String, PoleAs String • ConstZapis = ”Пълно име: “ • Ime=”Иван” : Prezime=”Стоянов”: Familia=”Христов” • Pole = Zapis+Ime+” “+Prezime+” “+Familia • ‘ Пълно име: Иван Стоянов Христов • Pole = Zapis&Ime& ” “ &Prezime& ” “ &Familia • ‘ Пълно име: Иван Стоянов Христов • MsgboxPole • End sub

  14. Задачиза типове променливи: • SubPrimer_String10 • ‘Низ с фиксирана дължина • DimImeAs String *15 • DimPrezimeAs String * 10 • DimFamiliaAs String * 15 • DimPoleAsString * 45 • ConstZapis = “Пълно име: “ • Ime =”Иван” : Prezime=”Стоянов”: Familia=”Христов” • Pole = Zapis +Ime +” “+Prezime +” “+Familia • ‘ Пълно име: Иван Стоянов Христов • Pole = Zapis&Ime&” “&Prezime&” “&Familia • ‘ Пълно име: Иван Стоянов Христов • Msgbox Pole • Debug.Print Pole • End sub

  15. Задачиза типове променливи: • SubPrimerNumber • DimGrupaAs byte • DimInvNumAs Integer • DimColorRGBNumAs Long • DimOcenkaAs Single • DimRdataAs Date • Grupa = 2: InvNum = 1234: ColorRGBNum = 255 • Ocenka = 5.75: RData = #3/23/2010# • MsgboxGrupa& ” “ &InvNum& ” “ &ColorRGBNum& ” “ _ • & Ocenka&” “&RData • RData = RData+4 • MsgboxRData • End Sub

  16. Задачиза типове променливи: • SubKvU • DimaAs Integer, bAs Integer, cAs Integer • DimDAs Single, x1As Double, x2As Double • a = InputBox(“въведете коефициента а”) • b = InputBox(“въведете коефициента b”) • c = InputBox(“въведете коефициента c”) • D=b*b-4*a*c • x1=(-b+D^0.5)/(2*a) • x2=(-b-D^0.5)/(2*a) • MsgboxD &”, “ & x1 &”, “ & x2 • End Sub

  17. Задачиза типове променливи: • Sub KvUCells • DimaAs Integer, bAs Integer, cAs Integer • DimDAs Single, x1As Double, x2As Double • a= Selection.cells(1) • b=Selection.cells(2) • c= Selection.cells(3) • D=b*b–4*a*c • x1=(-b+D^0.5)/(2*a) • x2=(-b–D^0.5)/(2*a) • MsgBox "D= " & D & vbLf & " x1= " & x1 & vbLf &" x2= " & x2 • End Sub

More Related