az
Level
14
Wanderer
100 XP
 
 
Formatia Albatros - Hai pahar pahar
View more info
Currently Offline
Profile Awards  4
Badges  15
Games  112
Inventory   
Screenshots  12
Groups  9
Salty Whites
14 Members
Atomicus's Underground Hideout
143 Members
ARENA.1TAP.RO
32,378 Members
Recent Activity
23.5 hours past 2 weeks
2,048 hrs on record
last played on 14 Oct
Counter-Strike 2
Dusty Veteran
300 XP
Achievement Progress   1 of 1
Screenshots 8
36 hrs on record
last played on 9 Oct
Black Myth: Wukong
Achievement Progress   60 of 81
+55
31 hrs on record
last played on 2 Oct
Project Zomboid
Comments
Congo 3 Apr @ 9:33am 
+rep smells good
WIFE HAVER 30 Oct, 2023 @ 1:16pm 
Sub CreateSecurityAndPatrolVesselPresentation()
Dim pptApp As Object
Dim pptPresentation As Object
Dim pptSlide As Object
Dim slideIndex As Integer

' Create a new PowerPoint application
Set pptApp = CreateObject("PowerPoint.Application")
pptApp.Visible = True

' Create a new presentation
Set pptPresentation = pptApp.Presentations.Add

' Slide 1: Title Slide
slideIndex = 1
Set pptSlide = pptPresentation.Slides.Add(slideIndex, ppLayoutTitle)
pptSlide.Shapes(1).TextFrame.TextRange.Text = "Security and Patrol Vessel"
pptSlide.Shapes(2).TextFrame.TextRange.Text = "An Overview"

' Slide 2: Introduction
slideIndex = slideIndex + 1
Set pptSlide = pptPresentation.Slides.Add(slideIndex, ppLayoutText)
pptSlide.Shapes(1).TextFrame.TextRange.Text = "Introduction"
pptSlide.Shapes(2).TextFrame.TextRange.Text = "Security and patrol vessels play a critical
Bullybașă 12 Oct, 2023 @ 10:57am 
+rep i love being his backpack
Wargix 16 Aug, 2023 @ 1:46pm 
+rep good player
Andrei 14 Dec, 2020 @ 2:43am 
-rep cheater
stefano 10 Nov, 2020 @ 8:18am 
+rep good player nice person