|
Реферат: Работа в программе Excel (Программирование)
Формирование таблицы по решению квадратного уравнения вида Ах2+Вх+С=0
Создание файла.
Файл создается из пункта меню ФАЙЛ опцией СОЗДАТЬ. Появляется
таблица,
Устанавливаем параметры страницы через опцию ПАРАМЕТРЫ СТРАНИЦЫ меню
ФАЙЛ (установка полей, размера бумаги, колонтитулов и т.д.). На листе
появляется пунктирная линия, обозначающая границы листа.
Набор таблицы.
В ячейку А1 набираем фразу «Решение квадратного уравнения вида
Ах2+Вх+С=0, и выделяем ячейки строки А от 1 до той которая находится перед
пунктирной линией. Форматируем расположение, начертание и размер букв через
опцию ЯЧЕЙКИ меню ФОРМАТ. В подпанели Выравнивание устанавливаем значение
«Центрировать по выделению». В подпанели Шрифт - размер и начертание букв
(у нашем варианте это полужирный курсив и размер 14). Устанавливаем курсор
на ячейке В4 и набираем А=, в ячейке В5 - В=, в ячейке В6 - С=, и
производим форматирование по описанному выше методу. Ячейки С4, С5 и С6
выделяем рамкой в подпанели Рамка панели ЯЧЕЙКИ меню ФОРМАТ. Эти ячейки
предназначены для ввода в них значений А, В, С.
Набор формулы.
В ячейках Е4 и Е6 пишем соответственно х1= и х2=, и форматируем по
методу, описанному выше.
А в ячейки F4 и F6 записываем формулы так. Сначала ставится равно,
потом значение ячейки В5 нажатием на ней мышки, функция Корень вставляется
из пункта меню ВСТАВКА - ФУНКЦИЯ... Выбираем из математических функций -
КОРЕНЬ. И нажимаем кнопку Далее - для ввода значения, находящегося под
корнем. Следуя формуле дискриминанта вводим B5^2-(4*B4*B6), а общий вид
формулы -
=(-B5 + КОРЕНЬ(B5^2-(4*B4*B6)))/(2*B4)
Такую же формулу вставляем и в ячейку F6, но сознаком минус:
=(-B5 - КОРЕНЬ(B5^2-(4*B4*B6)))/(2*B4)
Теперь после ввода пользователем значений А,В,С в ячейки В4, В5 и В6,
в ячейках F4 и F6 будут выводится соответственно значения х1 и х2.
Сам Лист сохраняется опцией СОХРАНИТЬ КАК... из меню ФАЙЛ. Оттуда же
производится и печать Листа.
Вид таблицы в программе Excel.
[pic]
Макрос набора таблицы.
'
' Макрос1 Макрос
' Макрос записан 29.05.00 ()
'
'
Sub Макрос1()
ActiveCell.FormulaR1C1 = "Решение квадратного уравнения вида
Ах2+Вх+С=0"
Range("A2").Select
With ActiveSheet.PageSetup
.PrintTitleRows = ""
.PrintTitleColumns = ""
End With
ActiveSheet.PageSetup.PrintArea = ""
With ActiveSheet.PageSetup
.LeftHeader = ""
.CenterHeader = ""
.RightHeader = ""
.LeftFooter = ""
.CenterFooter = ""
.RightFooter = ""
.LeftMargin = Application.InchesToPoints(0.787401575)
.RightMargin = Application.InchesToPoints(0.787401575)
.TopMargin = Application.InchesToPoints(0.984251969)
.BottomMargin = Application.InchesToPoints(0.984251969)
.HeaderMargin = Application.InchesToPoints(0.5)
.FooterMargin = Application.InchesToPoints(0.5)
.PrintHeadings = False
.PrintGridlines = False
.PrintNotes = False
.PrintQuality = 600
.CenterHorizontally = False
.CenterVertically = False
.Orientation = xlPortrait
.Draft = False
.PaperSize = xlPaperA4
.FirstPageNumber = xlAutomatic
.Order = xlDownThenOver
.BlackAndWhite = False
.Zoom = 100
End With
Range("A1:I1").Select
With Selection
.HorizontalAlignment = xlCenter
.VerticalAlignment = xlBottom
.WrapText = False
.Orientation = xlHorizontal
End With
With Selection
.HorizontalAlignment = xlCenterAcrossSelection
.VerticalAlignment = xlBottom
.WrapText = False
.Orientation = xlHorizontal
End With
With Selection.Font
.Name = "Arial Cyr"
.Size = 14
.Strikethrough = False
.Superscript = False
.Subscript = False
.OutlineFont = False
.Shadow = False
.Underline = xlNone
.ColorIndex = xlAutomatic
End With
Selection.Font.Bold = True
Selection.Font.Italic = True
Range("A4").Select
ActiveCell.FormulaR1C1 = "А="
Range("A5").Select
ActiveCell.FormulaR1C1 = "В="
Range("A6").Select
ActiveCell.FormulaR1C1 = "С="
Range("A4:A6").Select
With Selection
.HorizontalAlignment = xlRight
.VerticalAlignment = xlBottom
.WrapText = False
.Orientation = xlHorizontal
End With
With Selection.Font
.Name = "Arial Cyr"
.Size = 14
.Strikethrough = False
.Superscript = False
.Subscript = False
.OutlineFont = False
.Shadow = False
.Underline = xlNone
.ColorIndex = xlAutomatic
End With
Range("B4:B6").Select
With Selection.Borders(xlLeft)
.Weight = xlThin
.ColorIndex = xlAutomatic
End With
With Selection.Borders(xlRight)
.Weight = xlThin
.ColorIndex = xlAutomatic
End With
With Selection.Borders(xlTop)
.Weight = xlThin
.ColorIndex = xlAutomatic
End With
With Selection.Borders(xlBottom)
.Weight = xlThin
.ColorIndex = xlAutomatic
End With
Selection.BorderAround Weight:=xlThin, ColorIndex:=xlAutomatic
Range("E4").Select
ActiveCell.FormulaR1C1 = "х1="
Range("E6").Select
ActiveCell.FormulaR1C1 = "х2="
Range("E4:E6").Select
With Selection.Font
.Name = "Arial Cyr"
.Size = 14
.Strikethrough = False
.Superscript = False
.Subscript = False
.OutlineFont = False
.Shadow = False
.Underline = xlNone
.ColorIndex = xlAutomatic
End With
With Selection
.HorizontalAlignment = xlRight
.VerticalAlignment = xlBottom
.WrapText = False
.Orientation = xlHorizontal
End With
Selection.Font.Bold = True
Range("F4").Select
ActiveCell.FormulaR1C1 = _
"=-R[1]C[-4]+SQRT(R[1]C[-4]^2-(4*RC[-4]*R[2]C[-4]))/(2*RC[-4])"
Range("F4").Select
Selection.Copy
Range("F6").Select
ActiveSheet.Paste
Application.CutCopyMode = False
ActiveCell.FormulaR1C1 = _
"=-R[1]C[-4]-SQRT(R[1]C[-4]^2-(4*RC[-4]*R[2]C[-4]))/(2*RC[-4])"
Range("B4").Select
ActiveCell.FormulaR1C1 = "1"
Range("B5").Select
ActiveCell.FormulaR1C1 = "3"
Range("B6").Select
ActiveCell.FormulaR1C1 = "-2"
Range("B6").Select
ActiveCell.FormulaR1C1 = "2"
Range("F4").Select
ActiveCell.FormulaR1C1 = _
"=(-R[1]C[-4]+SQRT(R[1]C[-4]^2-(4*RC[-4]*R[2]C[-4])))/(2*RC[-4])"
Range("F4").Select
Selection.Copy
Range("F6").Select
ActiveSheet.Paste
Range("F6").Select
Application.CutCopyMode = False
ActiveCell.FormulaR1C1 = _
"=(-R[1]C[-4]-SQRT(R[1]C[-4]^2-(4*RC[-4]*R[2]C[-4])))/(2*RC[-4])"
Range("F6").Select
ActiveCell.FormulaR1C1 = _
"=(-R[-1]C[-4]-SQRT(R[-1]C[-4]^2-(4*R[-2]C[-4]*RC[-4])))/(2*R[-2]C[-
4])"
Range("F7").Select
ActiveWorkbook.SaveAs Filename:="C:My Documents1.xls", FileFormat _
:=xlNormal, Password:="", WriteResPassword:="", _
ReadOnlyRecommended:=False, CreateBackup:=False
End Sub
Реферат на тему: Работа в сети Windows 95
МОРДОВСКИЙ ГОСУДАРСТВЕННЫЙ УНИВЕРСИТЕТ им Н. П. Огарева
РЕФЕРАТ
на тему:
«Работа в сети Windows 95»
Выполнила: Резакова Н. Г.
Проверила:
Саранск 1999г.
План.
1. Введение.
2. Совместное использование ресурсов.
3. Осмотр сети:
Работа с удаленным принтером.
Подключение сетевого диска.
Отключение сетевого диска.
4. Допуск пользователей к папкам и принтерам:
Совместное использование папки.
Отключение совместного доступа.
Совместное использование принтера.
Отключение совместного использования.
Удаленный доступ к сети Windows 95.
5. Отслеживание обращений пользователей сети к вашей системе.
6. Заключение.
Введение.
Сейчас, в условиях многократно возрастающих каждый год информационных
потоков, уже практически невозможно вообразить четкое взаимодействие
банковских структур, торговых и посреднических фирм, государственных
учреждений и других организаций без современной вычислительной техники и
компьютерных сетей. В противном случае пришлось бы содержать гигантский
штат обработчиков бумажных документов и курьеров, причем надежность и
быстрота функционирования такой системы все равно была бы значительно ниже
предоставляемой модемной связью и компьютерными сетями. А ведь каждая
минута задержки в пересылке важных информационных сообщений может
вылиться в весьма ощутимые денежные потери и имиджевые крахи.
Цель этого реферата осветить работу в локальной сети с использованием
операционной системы Windows 95, так как именно эта система наиболее
распространена в разных учреждениях и предприятиях. А так же мы рассмотрим
работу при удаленном доступе к сети Windows 95.
Совместное использование ресурсов.
Концепция совместного использования ресурсов, лежащая в основе сетей
Windows 95 и множества других локальных сетей, заключается в следующем. С
помощью локальной сети пользователи обмениваются информацией и ресурсами –
папками, файлами и принтерами. В локальной сети у пользователе нет
неограниченного доступа к файлам и принтерам всех и каждого. Можно
обращаться только к тем объектам, которые определены другими пользователями
как совместно используемые. Если пользователь хочет чтобы кто-нибудь имел
или не имел доступ к какому-либо ресурсу, нужно просто установить
соответствующие атрибуты данному объекту.
Осмотр сети.
Проще всего увидеть, какими ресурсами располагает сеть, с помощью папки
«Сетевое окружение», которая открывается двойным щелчком соответствующего
значка на рабочем столе. В этой папке Windows 95 выводит список компьютеров
и принтеров, составляющих сеть. Чтобы увидеть, какие ресурсы предоставляет
конкретный компьютер, нужно дважды щелкнуть по его значку. Windows 95
откроет папку, в которой приведены его совместные папки и принтеры.
рисунок 18.1
При совместном ипользовании ресурса можно указать способ доступа к
нему:
а) на уровне ресурсов – для доступа используется пароль;
б) на уровне пользователей – определяются пользователи, которым
разрешен доступ.
Чтобы указать тип доступа, нужно открыть элемент «Сеть» панели
управления и выбрать вкладку «Управление доступом».
Работа с удаленным принтером.
При соединении компьютеров сетью появляется возможность использовать
принтеры, подключенные к другим компьютерам сети. При выборе удаленного
принтера может потребоваться пароль.
Подключение сетевого диска.
Мы уже знаем, что можно использовать файлы и папки другого
компьютера. Но если приходится очень часто работать с одной и той же
папкой, будет удобней подключить сетевой диск.
При подключении сетевого диска нужно выбрать его имя, и это имя
должно быть уникальным для данного компьютера. После этого к данной папке
можно обращаться как к локальному диску компьютера, что намного облегчает
использование этой папки.
Процедура подключения диска производится следующим образом:
а) запускается проводник;
рис18.3
б) выбирается команда «Подключить сетевой диск» меню «Сервис» и появляется
новое диалоговое окно;
рис 18.4
в) в списке дисков выбирается буква, которую нужно назначить сетевому
диску;
г) в поле «Путь» указывается имя папки;
д) нажимается «ОК».
Если требуется, чтобы Windows 95 автоматически подключал эту папку,
выберете опцию «Автоматически подключать при входе в систему».
Отключение сетевого диска.
По окончанию работы с файлами сетевого диска, его можно отключить. Это
производится следующим образом:
а) запускается проводник;
б) выбирается команда «Отключить сетевой диск» меню «Сервис» и появляется
новое диалоговое окно;
рис18.5
в) в списке сетевых дисков выбирается отключаемый диск и нажимается
«ОК».
Допуск пользователей к папкам и принтерам.
Чтобы поделиться ресурсами с другими пользователями, нужно настроить
сетевые установки системы для поддержки совместного использования. Это
производится следующим образом:
а) выбирается «Сеть» в «Панели управления»;
рис 18.6
б) нажимается кнопка «Доступ к файлам и принтерам». Появляется новое
диалоговое окно;
рис 18.7
в) отмечаются нужные опции и нажимается «ОК»;
г) в окне свойств сети нажимается «ОК».
Совместное использование папки.
Для совместного использования папки выполняется следующее:
а) выбирается папка;
б) выбирается команда «Доступ» в меню «Файл» и появляется окно
свойств папки;
в) выбираются нужные атрибуты доступа;
г) нажимается «ОК».
рис18.8
Если не указать пароль, к папке может обращаться любой пользователь
сети. Windows 95 совместные папки, добавив к значку изображение руки.
Отключение совместного доступа.
Когда отпадает потребность других пользователей к папке, можно
отключить ее совместное использование. Для этого нужно установить пункт
«Локальный ресурс» в окне свойств папки.
Совместное использование принтера.
Чтобы использовать принтер совместно нужно указать пункт «Общий
ресурс» в окне его свойств и добавить пароль по мере надобности. Windows 95
добавит к значку принтера изображение руки.
Отключение совместного использования принтера.
Чтобы отключить совместное использование принтера нужно указать пункт
«Локальный ресурс» в окне его свойств
Удаленный доступ к сети Windows 95.
С помощью компьютера и модема можно соединиться с сервером сети,
работающей под Windows NT, Novell Netware, Windows 95. Это дает возможность
пользоваться совместными ресурсами сети, находящейся очень далеко.
Понадобится серверное программное обеспечение Windows 95, которое можно
встретить в пакете Windows 95 Plus.
| |
