Главная    Почта    Новости    Каталог    Одноклассники    Погода    Работа    Игры     Рефераты     Карты
  
по Казнету new!
по каталогу
в рефератах

Сызыктык алгоритмдер



 Другие рефераты
Сыртқы экономикалық қызметі және сыртқы сауда түсінігі Инвестициялық қызметтің экономикалық мәні мен мазмұны Девиантное поведение в молодежной среде Қазақстан Республикасының Үкіметі

VBA-даѓы программа туралы жалпы мәліметтер

Әдістемелік нұсқаулар:VBA программасы бір немесе бірнеше модульден тұрады. Модуль – жұмыс кітапқа тіркелген программа жазылған парақ.

 

Программа айнымалыларды сипаттаудан басталады. Глобальды айнымалылар мен тұрақтылар сипатталады. Сосын функция  немесе процедура денесі орналасады. Комментарий қою үшін апострофты әрбір жолға қою керек.

 

Option Explicit – инструкциясы модульдегі айналыммен сипатталуы тиіс дегенді білдіреді. Мәнді хабарлама терезесіне шығару формасы Msg Box

Функцияның жалпы форматы:

Function<функция аты> (параметрлер тізімі)                                                           

                                функцияның денесі

End Function

Exit Function – формуласының орындалуы тоқтатуға қолданылады. Нәтиже формула атына меншіктеледі.

Optional – қызметші сөзі арқылы кейбір айнымалының функцияны шақырғанды енгізбей-ақ қоюға болатынын ескерту жүзеге асады.

Ондай айнымалылар Variant типте сипатталуы керек. Және олармен жұмыс жасау барысында isMissing функциясын қолдану қажет, бұл

 

функция көрсетілген айнымалы мәні процедураға берілсе FALSE, әйтпесе TRUE мәнін меншіктейді.

Мысалы, есептеу керек.

а) Function z(y)

           

    End Function

 

б) Function  (As Double) As Double

           

   End Function

 

Функциялар мен процедураларда айнымалыны сипаттау үшін Dim қызметші сөзі  жазылмайды.

«=» таңбасымен  меншіктеу әрекеті орындалады.

Тұрақтылар. 

Мысалы, const <айналым аты> = <өрнек>

Const  PI AS Double = 3.14

 

VBA-дағы типтер кестесі:

 

Типтер

Жадыдағы мөлшері

Мәндері

Boolean

2 байт

False, true

INTEGER

2 байт

-32768…+32767

Long

4 байт

-2000000000…+2000000000

Single

4 байт

1,401298E-45…3,402823E38

Date

8 байт

1.01.100¼31.12.9999

Array(массив)

 

Массив өлшемі мен мәнінің типіне қарай

Double

8 байт

4,9406545841247E-324¼1,7976931348232E308

Object

4 байт

кез-келген

String

10

Символдар тізбегі

Currency (ақшалық)

8 байт

-922397203685477,5808¼922337203685477,5807

Variant

 

Айнымалы мәнінен тәуелді

 

Айнымалылар сипатталуының жалпы түрі:

            Dim <айнымалы аты> AS <айнымалы типі>       

Мысалы, Dim A AS integer

                   Dim C,D AS integer, E AS Single

                   Dim S AS String*25

Массивтер сипатталуы:

1) Dim D(3,3) AS Single

    Dim A(0)    AS integer

9 элемент 0,...,8   0-базалық индекс

Базалық индексті модульдің басында OptionBase1 операторын жазу арқылы өзгертуге болады.  Ондағы D, A массивтерінің индекстері 1-ден басталады.

2) Басқаша

    Dim D (1 to 3, 1 to 3) AS integer

    Dim A (1 to 9) AS Single

Программада массив жеке элементтері арқылы анықталады.

Мысалы, Dim D (1 to 3, 1 to 3) AS integer

            D (1,1) =10

            D (1,1)=11

            D (1,3)=4

            D (3,3)=b

Бір өлшемді массивтерді анықтау үшін array функциясы тиімді, яғни үтірмен ажыратылып берілген элементтер тізімін осы мәндерден тұратын Variant типті векторға айналдырады.

Мысалы, Dim A AS Variant

                  A=Array (11,3,20)

Амалдар мен математикалық функциялар

·        ABS (x) – x-тің модулі

·        ATR (x) – x санының арктангенсі

·        cos (x) – x санының косинусы

·        Exp (сан) – експоненциялдық функция (ех)

·        Log (x) – х-тің натурал логарифмі

·        Sgn (x) – x-тің таңбасы (егер x>0 – 1, x=0 – 0, x<1 – 1)

·        Sin (x) – x-тің синусы

·        SQR (x) – x-тің түбірі

·        Tan (x) – x-тің тангенсі

1-тапсырма

Мына өрнектерді VBA тілінде жазыңыз.

 

2-тапсырма

Сабақтың ұзақтығы – 45 минут. Сабақтың үштен бір бөлігін есепті шығаруға, бестен бір бөлігін өткен материалды қайталауға, ал тоғыздан бір бөлігін теңдеуді шешуге жіберді. Есепті шешуге, қайталауға және теңдеуді шешуге қанша уақыт кетті?

Private Sub CommandButton1_Click()

Dim a, b, c, d As Integer

a = 45

b = a / 3

c = a / 5

d = a / 9

MsgBox ("Есепті шешуге: ") & b & ("минут, өткен материалды қайталауға ") & c & ("минут, теңдеуді шешуге ") & d & ("минут жіберілді.")

End Sub

 

3-тапсырма

Батыс Қазақстанның темір жолының ұзындығы – 420 км, ал Маңғыстаудікі – 217 км-ге ұзындау. Маңғыстаудың жолының ұзындығы қандай?

Private Sub CheckBox1_C

12
скачать работу


 Другие рефераты
БАЭ - Біріккен Араб Эмираттары
Емделу жаттығуларының жалпы денсаулық жүйесінде алатын орны
Гипотеза как форма развития знания
Организация кассовой работы в коммерческом банке


 

Отправка СМС бесплатно

На правах рекламы


ZERO.kz
 
Модератор сайта RESURS.KZ