Skip to main content

Posts

Showing posts from February, 2016

Catch Me Version 2.0.0

Hello guys sorry I didn't write more tutorials but I was very busy but now I am Free let's make Catch me Version 2.0.0  OK , If you didn't make Catch me Version 1.0.0 go here and make it Now our improvement in this version is :- Full Screen Mode Green effect Highest Results 1-Full Screen Mode Change WindowState property to Maximized and Add This Code under  Public Class Form1 Dim screenWidth As Integer = Screen.PrimaryScreen.Bounds.Width Dim screenHeight As Integer = Screen.PrimaryScreen.Bounds.Height and in Timer1_Tick change this :- x = CInt(Rnd() * 800 - 0) y = CInt(Rnd() * 600 - 0) to :- x = CInt(Rnd() * screenWidth - 0) y = CInt(Rnd() * screenHeight - 0) Change  Start Button Anchor property to Down , Right Change  Quit Button Anchor property to Down , Left 2- Green Effect In PictureBox1_Click add this code :-         Me.BackColor = Color.Green After Public Class Form1 Dim tempcolor As Color = Me.BackColor I

How to change PC resolution with VB.NET

Ok, Hi guys, After very long time I back with a surprise a code to change resolution of PC with VB.NET just copy this and past it and Call it with ChangeRes( 1024 , 768 , 32 ) The CODE  function generate() { Public Class Form1 ' change resolution Constants, Types and Declares ' Using this option to shutdown windows does not send ' the WM_QUERYENDSESSION and WM_ENDSESSION messages to ' the open applications. Thus, those apps may loose ' any unsaved data. ' Const EWX_FORCE As Short = 4 Const CCDEVICENAME As Short = 32 Const CCFORMNAME As Short = 32 Const DM_BITSPERPEL As Integer = &H40000 Const DM_PELSWIDTH As Integer = &H80000 Const DM_PELSHEIGHT As Integer = &H100000 Const CDS_UPDATEREGISTRY As Short = &H1S Const CDS_TEST As Short = &H2S Const CDS_FULLSCREEN As Short = &H4S Const DISP_CHANGE_SUCCESSFUL As Short = 0 Const DISP_CHANGE_RESTART As Short = 1