##book id=473//book name= Müasir proqramlaşdırmanın əsasları Excel&vba

T4

23. Kateqoriyalar üzrə düzgün uyğunluqları göstərin

I- Riyazi funksiyaları

II- Sətri funksiyaları

III- Tarix/zaman funksiyaları

1- Time

2- Abs

3- InStr

4- Date

5- Atn

6- LCase

7- Cos

8- Now

9- Left

A) I-2,6,8; II-3,5,9; III-1,4,7;

B) I-3,5,7; II-2,6,8; III-1,4,9;

C) I-2,5,7; II-3,4,9; III-1,6,8;

D) I-1,5,7; II-3,6,9; III-2,4,8;

E) I-2,5,7; II-3,6,9; III-1,4,8;

24. Kateqoriyalar üzrə düzgün uyğunluqları göstərin

I- Riyazi funksiyaları

II- Sətri funksiyaları

III- Tarix/zaman funksiyaları

1- Exp

2- LTrim

3- Month

4- Int

5- Year

6- Fix

7- Len

8- Day

9- Mid

A) I-2,5,7; II-3,6,9; III-1,4,8;

B) I-1,4,6; II-2,7,9; III-3,5,8;

C) I-1,3,4; II-2,7,8; III-5,6,9;

D) I-1,5,7; II-3,6,9; III-2,4,8;

E) I-2,6,9; II-3,5,8; III-1,4,7;

25. Kateqoriyalar üzrə düzgün uyğunluqları göstərin

I- Riyazi funksiyaları

II- Sətri funksiyaları

III- Tarix/zaman funksiyaları

1- Minute

2- Log

3- Hour

4- Rnd

5- Space

6- Sgn

7- Right

8- Now

9- RTrim

A) I-2,5,8; II-3,6,9; III-1,4,7;

B) I-1,4,6; II-2,7,9; III-3,5,8;

C) I-2,4,6; II-5,7,9; III-1,3,8;

D) I-2,4,5; II-6,7,9; III-1,3,8;

E) I-2,4,6; II-5,7,8; III-1,3,9;

26. Uyğunluğu göstərin

I- Str funksiyası nəyi ifadə edir?

II- Val funksiyası nəyi ifadə edir?

III- TypeName funksiyası nəyi ifadə edir?

1- Mətni veriləni ədədi verilənə çevirir.

2- Verilənin tipini göstərir.

3- Ədədi veriləni mətni verilənə çevirir.

A) I-1; II-3; III-2;

B) I-3; II-2; III-1;

C) I-3; II-1; III-2;

D) I-1; II-2; III-3;

E) I-2; II-3; III-1;

##num=9// level= 1// sumtest=20 // name= Kateqoriyalar üzrə VBA-nın daxili funksiyaları .

T1

1. VBA-nın riyazi funksiyaları hansılardır?

A) Rnd, Month, Sgn

B) CSng, Sin, Right

C) Rnd, Sin, CVar

D) Rnd, Sin, Sgn

E) Rnd, RTrim, Sgn

2. VBA-nın sətri funksiyaları hansılardır?

A) Rnd, Month, Space

B) CSng, Sin, Right

C) Rnd, Sin, Sgn

D) RTrim, Right, Space

E) Rnd, RTrim, Sgn

3. VBA-nın tarix/zaman funksiyaları hansılardır?

A) Rnd, Sin, Now

B) RTrim, Right, Space

C) CSng, Sin, Right

D) Month, Now, Year

E) Rnd, Month, Space

4. VBA-nın çevirmə funksiyaları hansılardır?

A) Rnd, Month, Space

B) Month, Now, Year

C) RTrim, Right, CStr

D) Rnd, Sin, Now

E) CSng, CStr, CVar

5. Proqram nə çap edəcək?



A) -2, -3, 2, 3

B) -3, 3, 2, -3

C) -2, 2, -2, 3

D) -2, -3, 2, 2

E) 2, 2, 2, 2

6. Proqram kodu nə çap edir?

A) “MySub1”

B) MySub1

C) MySub1()

D) MySub

E) Empty

7. Proqram kodu nə çap edir?



A) 21

B) 10

C) Empty

D) “21.10.2009”

E) 21/10/2009

8. Proqram kodu nə çap edir?

A) 23

B) 12

C) 0

D) 1223

E) Empty

T2

9. VBA-nın çevirmə funksiyalarını seçin?

1- Rnd

2- CVar

3- Month

4- CSng

5- RTrim

6- Year

7- CStr

A) 3, 4, 7

B) 2, 4, 7

C) 3, 5, 6

D) 5, 6, 7

E) 2, 4, 6

10. VBA-nın sətri funksiyaları hansılardır?

1- Space

2- Now

3- CVar

4- Sgn

5- RTrim

6- Sin

7- Right

A) 3, 5, 6

B) 3, 4, 6

C) 1, 5, 7

D) 5, 6, 7

E) 2, 4, 7

T3

11. Aşağıdakı çap informasiyasına görə proqramı bərpa edin

1- Debug.Print InStr(“Salam Azerbaycan programmer!!!”, “Az”)

2- Sub e_InStr2()

3- Debug.Print InStr(“Salam Azerbaycan programmer!!!”, “G”)

4- Debug.Print InStr(“Salam Azerbaycan programmer!!!”, “g”)

5- End Sub

6- Debug.Print InStr(“Salam Azerbaycan programmer!!!”, “al”)

A) 2, 6, 3, 1, 4, 5

B) 2, 6, 1 3, 4, 5

C) 2, 5, 1, 3, 6, 4

D) 2, 6, 4, 3, 1, 5

E) 5, 6, 1, 4, 3, 2

12. Aşağıdakı çap informasiyasına görə proqramı bərpa edin

1- Debug.Print Mid(“Salam Azerbaycan programmer!!!”, 7)

2- Sub e_Mid2()

3- Debug.Print Mid(“Salam Azerbaycan programmer!!!”, 7, 10)

4- Debug.Print Mid(“Salam Azerbaycan programmer!!!”, 7, 4)

5- End Sub

6- Debug.Print Mid(“Salam Azerbaycan programmer!!!”, 1, 5)

A) 2, 4, 6, 3, 5, 1

B) 2, 6, 4, 3, 1, 5

C) 4, 2, 3, 4, 1, 5

D) 2, 4, 6, 1, 3, 5

E) 2, 4, 6, 3, 1, 5

13. Aşağıdakı çap informasiyasına görə proqramı bərpa edin

1- Debug.Print “Uzunlug:”; Len(setrNEW)

2- Dim setr, setrNEW

3- setr = “ Bu setri melumatdir ! “

4- Sub ProblemSpace3()

5- Debug.Print “Bizim setr:”; setr

6- End Sub

7- Debug.Print “Bizim setr:”; setrNEW

8- setrNEW = LTrim(RTrim(setr))

9- Debug.Print “Uzunluq:”; Len(setr)

A) 4, 2, 3, 5, 9, 8, 7, 1, 6

B) 4, 3, 2, 5, 9, 1, 7, 8, 6

C) 4, 2, 5, 3, 9, 8, 7, 1, 6

D) 4, 2, 3, 9, 5, 8, 1, 7, 6

E) 4, 2, 3, 5, 8, 9, 7, 1, 6

14. Aşağıdakı çap informasiyasına görə proqramı bərpa edin

1- Debug.Print Sqr(169)

2- Function e_Sqr2()

3- Debug.Print Sqr(100)

4- End Function

5- Debug.Print Sqr(144)

A) 2, 3, 1, 4, 5

B) 3, 2, 1, 5, 4

C) 2, 1, 3, 5, 4

D) 2, 3, 5, 1, 4

E) 2, 3, 1, 5, 4

15. Aşağıdakı çap informasiyasına görə proqramı bərpa edin

1- For i = Len(s) To 1 Step -1

2- Sub e_Str1()

3- Debug.Print s

4- s = “Salam Azerbaycan programmer!!!”

5- Next i

6- Debug.Print Mid(s, i, 1);

7- End Sub

A) 2, 6, 3, 4, 1, 5, 7

B) 2, 3, 4, 1, 6, 5, 7

C) 4, 2, 1, 3, 6, 7, 5

D) 2, 4, 3, 1, 6, 5, 7

E) 7, 4, 3, 1, 6, 5, 2

16. Aşağıdakı çap informasiyasına görə proqramı bərpa edin

1- Debug.Print “Reqemlerin ASCII kodlari”

2- StrNum = Str(i)

3- For i = 0 To 9

4- Sub e_ASCII_Numeric2()

5- End Sub

6- Debug.Print i, Asc(Trim(StrNum))

7- Next i

A) 4, 1, 2, 3, 6, 7, 5

B) 1, 4, 2, 3, 5, 7, 6

C) 3, 4, 1, 2, 6, 7, 5

D) 4, 1, 3, 2, 6, 7, 5

E) 5, 1, 2, 3, 6, 7, 4

17. Aşağıdakı çap informasiyasına görə proqramı bərpa edin

1- Debug.Print “Latin elifbasinin ilk 5 herifinin ASCII kodlari”

2- For i = 65 To 69

3- Debug.Print i,

4- End Sub

5- Sub e_ASCII_Simvol()

6- Debug.Print Chr(i)

7- Next i

A) 5, 3, 2, 6, 7, 1, 4

B) 5, 1, 2, 3, 6, 7, 4

C) 2, 5, 3, 7, 6, 1, 4

D) 5, 2, 3, 6, 7, 1, 4

E) 3, 2, 6, 5, 7, 4, 1