From bfba757b6aa13231fe7b0a471a60af7278d09b28 Mon Sep 17 00:00:00 2001 From: JackCarterSmith Date: Wed, 31 May 2017 12:12:51 +0200 Subject: [PATCH] Update and optimise some codes --- ISEN-Repair Inventory Manager/Main.vb | 14 +++++++++++++- .../My Project/AssemblyInfo.vb | 4 ++-- .../SplashScreen.Designer.vb | 2 +- 3 files changed, 16 insertions(+), 4 deletions(-) diff --git a/ISEN-Repair Inventory Manager/Main.vb b/ISEN-Repair Inventory Manager/Main.vb index 2fd3e61..df3bdaa 100644 --- a/ISEN-Repair Inventory Manager/Main.vb +++ b/ISEN-Repair Inventory Manager/Main.vb @@ -45,7 +45,7 @@ Public Class Main CREATE TABLE `credits` ( `pseudo` TEXT DEFAULT 'JackCarterSmith' UNIQUE, `contact` TEXT DEFAULT 'j@bfnt.io' UNIQUE, - `commentaire` TEXT DEFAULT 'Vous m avez trouvé !' UNIQUE + `commentaire` TEXT DEFAULT 'Vous avez trouvé un EasterEgg félicitation !' UNIQUE );" Try @@ -149,6 +149,18 @@ Public Class Main End Sub Private Sub IDBox_TextChanged(sender As Object, e As EventArgs) Handles IDBox.TextChanged + If IDBox.Text = "666" Then + manualID_selected = True + StatusLabel.Text = "ID trouvé !" + NameBox.Text = "DELL Fuel Burning Serial - Complete collection" + EtatBox.Text = "Detonator armed" + SerieCheckBox.Checked = True + DetailsBox.Text = "DEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEADDEAD" + EmpruntCheckBox.Checked = False + EmprunterName.Text = "Fuyez pauvre fou !" + GivenByBox.Text = "Enfer" + StatusLabel.Text = "Vous avez trouvé un EasterEgg félicitation !" + End If If IDBox.Text.Length() = 10 Then Dim dtr As SQLiteDataReader diff --git a/ISEN-Repair Inventory Manager/My Project/AssemblyInfo.vb b/ISEN-Repair Inventory Manager/My Project/AssemblyInfo.vb index 56ed8a6..e6f61eb 100644 --- a/ISEN-Repair Inventory Manager/My Project/AssemblyInfo.vb +++ b/ISEN-Repair Inventory Manager/My Project/AssemblyInfo.vb @@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices ' en utilisant '*', comme indiqué ci-dessous : ' - - + + diff --git a/ISEN-Repair Inventory Manager/SplashScreen.Designer.vb b/ISEN-Repair Inventory Manager/SplashScreen.Designer.vb index a463647..163d3e5 100644 --- a/ISEN-Repair Inventory Manager/SplashScreen.Designer.vb +++ b/ISEN-Repair Inventory Manager/SplashScreen.Designer.vb @@ -79,7 +79,7 @@ Partial Class SplashScreen Me.Version.Name = "Version" Me.Version.Size = New System.Drawing.Size(241, 20) Me.Version.TabIndex = 1 - Me.Version.Text = "Version 1.00" + Me.Version.Text = "Version 0.7" ' 'Copyright '