From 14b74242182122c819683a7264e1362214048601 Mon Sep 17 00:00:00 2001
From: Syndamia <kami02882@gmail.com>
Date: Fri, 29 Nov 2019 15:35:13 +0200
Subject: Added "Who wants to be a millionare?" - Africa PowerPoint project

Added the presentation, some README files to explain a bit and added the code (extracted it from the presentation)
---
 .../Extracted code/Slide18.cls                     | 22 ++++++++++++++++++++++
 1 file changed, 22 insertions(+)
 create mode 100644 Who wants to become a millionare - Africa (BG)/Extracted code/Slide18.cls

(limited to 'Who wants to become a millionare - Africa (BG)/Extracted code/Slide18.cls')

diff --git a/Who wants to become a millionare - Africa (BG)/Extracted code/Slide18.cls b/Who wants to become a millionare - Africa (BG)/Extracted code/Slide18.cls
new file mode 100644
index 0000000..8cc25d1
--- /dev/null
+++ b/Who wants to become a millionare - Africa (BG)/Extracted code/Slide18.cls	
@@ -0,0 +1,22 @@
+VERSION 1.0 CLASS
+BEGIN
+  MultiUse = -1  'True
+END
+Attribute VB_Name = "Slide18"
+Attribute VB_GlobalNameSpace = False
+Attribute VB_Creatable = False
+Attribute VB_PredeclaredId = True
+Attribute VB_Exposed = True
+Public Sub SetPrizeMoney(value As Long)
+
+lblPrize.Caption = value
+
+End Sub
+
+Private Sub cmdPlayAgain_Click()
+
+SlideShowWindows(1).View.GotoSlide 2
+
+End Sub
+
+'Kamen Mladenov 2019
-- 
cgit v1.2.3

