VERSION 5.00 Begin VB.Form frmSplash BackColor = &H00FFC0C0& BorderStyle = 3 'Fixed Dialog ClientHeight = 5205 ClientLeft = 4020 ClientTop = 2880 ClientWidth = 7320 ClipControls = 0 'False ControlBox = 0 'False Icon = "frmSplash.frx":0000 KeyPreview = -1 'True LinkTopic = "Form2" MaxButton = 0 'False MinButton = 0 'False ScaleHeight = 5205 ScaleWidth = 7320 ShowInTaskbar = 0 'False Begin VB.Frame Frame1 BackColor = &H00FFC0C0& Height = 5130 Left = 120 TabIndex = 0 Top = 0 Width = 7080 Begin VB.Label Label9 AutoSize = -1 'True BackStyle = 0 'Transparent Caption = "Уфимский государственный авиационный технический университет" Height = 195 Left = 840 TabIndex = 9 Top = 600 Width = 5235 End Begin VB.Label Label8 AutoSize = -1 'True BackStyle = 0 'Transparent Caption = "Уфа 2005" Height = 195 Left = 3120 TabIndex = 8 Top = 4680 Width = 735 End Begin VB.Label Label7 BackStyle = 0 'Transparent Caption = "Проверил: преподаватель Рамбургер О. Л. " Height = 495 Left = 4560 TabIndex = 7 Top = 3960 Width = 2295 End Begin VB.Label Label6 AutoSize = -1 'True BackStyle = 0 'Transparent Caption = "Кафедра информатики" Height = 195 Left = 5160 TabIndex = 6 Top = 1080 Width = 1755 End Begin VB.Label Label5 AutoSize = -1 'True BackStyle = 0 'Transparent Caption = "Министерство образования и науки Российской Федерации" Height = 195 Left = 1080 TabIndex = 5 Top = 240 Width = 4635 End Begin VB.Label Label4 BackStyle = 0 'Transparent Caption = "Выполнил: студент ФАП группы ТКС-107 Иваноов А. В." Height = 795 Left = 4560 TabIndex = 4 Top = 3000 Width = 2115 End Begin VB.Label Label3 AutoSize = -1 'True BackStyle = 0 'Transparent Caption = """РЕШЕНИЕ НЕЛИНЕЙНЫХ УРАВНЕНИЙ МЕТОДОМ НЬЮТОНА""" Height = 195 Left = 840 TabIndex = 3 Top = 2280 Width = 4995 End Begin VB.Label Label2 AutoSize = -1 'True BackStyle = 0 'Transparent Caption = "на тему:" Height = 195 Left = 3120 TabIndex = 2 Top = 1920 Width = 630 End Begin VB.Label Label1 Alignment = 2 'Center AutoSize = -1 'True BackStyle = 0 'Transparent Caption = "КУРСОВАЯ РАБОТА" BeginProperty Font Name = "MS Sans Serif" Size = 12 Charset = 204 Weight = 700 Underline = -1 'True Italic = 0 'False Strikethrough = 0 'False EndProperty Height = 300 Left = 2145 TabIndex = 1 Top = 1560 Width = 2595 End End End Attribute VB_Name = "frmSplash" Attribute VB_GlobalNameSpace = False Attribute VB_Creatable = False Attribute VB_PredeclaredId = True Attribute VB_Exposed = False Private Sub Form_KeyPress(KeyAscii As Integer) Unload Me Form1.Show End Sub Private Sub Frame1_Click() Unload Me Form1.Show End Sub