Dim i As Long, n As Long, c As Long c = 0 n = InputBox("Enter a number:") For i = 1 To n If n > 0 Then n = n / 10 c = c + 1 End If Next i MsgBox ("Number Of Digits Is: ") & c
نمونه سوالات امتحان عملی "نرم افزار اداری" مطابق با تمرینات کلاسی که قبلا انجام شده است می باشد.
مانند: (در word) طراحی جدول / چارت و. - ایجاد سکشن / ایجاد لینک : مثلا از صفحه چهار لینک می شود به صفحه یک - تغییر هدر یا سربرگ در هر سکشن بصورت مجزا
(در پاورپوینت) ایجاد تب های فعال(طراحی دکمه هایی که با استفاده از خاصیت اکشن بصورت لینک در آمده می باشند)
موفق باشید.
نمونه سوالات یک (در این فایل زیر جواب درست خط کشیده شده است)
نمونه سوالات دو
نمونه سوالات سه
سوالات امتحان عبارتند از: 3نمره جای خالی را پر کنید - 2نمره صحیح / غلط - 7نمره تستی - و 8نمره تشریحیموفق باشید.
درباره این سایت