Ultimate Programming Tutorials

How To Make A Aero Form In VB.NET

in aero, tutorial, vb.net - By Mohamed Shimran - on 8/08/2012 - 2 comments

Today i will teach you how to make a aero form in visual basic 2008 / visual basic 2010 but for this program you should have Microsoft Windows Vista or Microsoft Windows 7 so remember you should have one of these operating systems . this is a very simple tutorial and this thing is pretty awesome you will love it . now lets start the work

1 . Now open visual basic 2008 / visual basic 2010
2 . create a new project name it whatever you want
3 . double click on your form
4 . delete everything in the code and paste this



Imports System.Runtime.InteropServices

Public Class Form1
     Public Structure MARGINS
        Public LeftWidth As Integer
        Public RightWidth As Integer
        Public TopHeight As Integer
        Public Buttomheight As Integer
    End Structure

     Public Shared Function DwmExtendFrameIntoClientArea(ByVal hWnd As IntPtr, ByRef pMarinset As MARGINS) As Integer
    End Function

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Try
            Me.BackColor = Color.Black
            Dim margins As MARGINS = New MARGINS
            margins.LeftWidth = -1
            margins.RightWidth = -1
            margins.TopHeight = -1
            margins.Buttomheight = -1
            Dim result As Integer = DwmExtendFrameIntoClientArea(Me.Handle, margins)
        Catch ex As Exception
            MsgBox("you don't have aero enabled", vbCritical, "Fatal Error")
            Application.Exit()
        End Try
    End Sub
End Class

6 . now click debug and you are done

How To Make A PDF Reader In VB.NET

in vb.net - By Mohamed Shimran - on 8/07/2012 - 4 comments

This is a very easy program and to make it you need adobe reader and it should be installed in your pc . now start visual basic and create a new project name it whatever you want and the form will load now click the toolbox and right click inside the tool box and click Choose Items.. then a new tabbed windows will pop up ...

Now click COM Components tab and search for adobe reader and tick it and click ok ..

Text editor with HTML & VB.Net functions - Still in development

in html, releases, vb.net - By AnoPem - on 8/06/2012 - 4 comments

This is a text editor im still working on, you can program VB.Net and HTML in it there is preview for the HTML so you can easier make websites

I just wanted to share this program with you, but remember the program is still in early state and will probaly be updated on the site, the program itself dont have an updater (yet)

The Basics Of HTML (Hyper Text Markup Language)

in html - By Mohamed Shimran - on 8/06/2012 - No comments

HTML - hyper text markup language its the basics of a website so you should learn HTML before you start making website . today i am going to teach you the basics of HTML and to make a simple HTML website using notepad .

1 . open notepad

2 . copy and paste this code into your notepad

<html>

<head>

<title>this is my first web page</title>

</head>

<body>

</body>

</html>

How To Make A Very Simple Web Browser In Visual Basic

in vb.net - By codedrive - on 8/05/2012 - No comments

First add 5 buttons name them

Back
Forward
Refresh
Stop
Go

then add 1 textbox and 1 webbrowser

Now drag the webbrowser to the middle and expand it a little. Then line up the button in this order
___________________
Back Forward Refresh Stop |___________________| Go

Now double click back and add this code

Webbrowser1.GoBack

Now double click forward and add this code

Webbrowser1.GoForward

Now double click refresh add and this code

Webbrowser1.Refresh

Now Double Click Go and add this code

Webbrowser1.Navigate(Textbox1.Text)

Now if you start the app it should work!

How To Make A Folder Locker In VB.NET

in how to make a folder locker, tutorial, vb.net - By AnoPem - on 8/05/2012 - 41 comments

Creating a program that can lock your folders and unlock them again

1. Open Visual Studio or Visual Basic.
2. Create a new windows form project and name it whatever you want.

Now to add the controls.
1. Add 3 buttons set the text on them to "Lock" and the second button "Unlock". And on the last button you write "Browse".
2. Add 2 textboxes and clear them for text.
3. Add 2 labels, write in Label1 "Folder Destination" and put it above Textbox1, Write in Label2 "Folder Name".
4. Add a folderbrowser dialog
6. Add this code to the button that says "Lock".

Dim text1 as string = ".{2559a1f2-21d7-11d4-bdaf-00c04f60b9f0}"
Shell("cmd /c" & "ren " & TextBox1.Text & " " & TextBox2.Text & Text1) 
Shell("cmd /c" & "attrib +s +h " & TextBox1.Text & ".{2559a1f2-21d7-11d4-bdaf-00c04f60b9f0}\*.*" & " /S /D") 
Shell("cmd /c" & "attrib +s +h " & TextBox1.Text & ".{2559a1f2-21d7-11d4-bdaf-00c04f60b9f0}" & " /S /D")

What this does is, it open shell and execute a command in command prompt that will first change the name of the folder and then hide it, it lock the folder and hide it completly, you will NOT be able to find the folder by going to folder options and select show hidden folders, so remember where the folder you lock is.
7. Add this code to the button that says "Unlock".

Dim text1 as string = ".{2559a1f2-21d7-11d4-bdaf-00c04f60b9f0}"
Shell("cmd /c" & "attrib -s -h " & TextBox1.Text & ".{2559a1f2-21d7-11d4-bdaf-00c04f60b9f0}" & " /S /D") 
Shell("cmd /c" & "attrib -s -h " & TextBox1.Text & ".{2559a1f2-21d7-11d4-bdaf-00c04f60b9f0}\*.*" & " /S /D") 
System.Threading.Thread.Sleep(1000) 
Shell("cmd /c" & "ren " & TextBox1.Text & Text1 & " " & TextBox2.Text)

What this does is it does the reversed of what the "Lock" button did it will unlock the folder.
8. Now the code for the button that says "Browse" add this code

FolderBrowserDialog1.ShowDialog() TextBox1.Text = FolderBrowserDialog1.SelectedPath last = Path.GetFileName(FolderBrowserDialog1.SelectedPath) TextBox2.Text = last TextBox1.Text = TextBox1.Text.Replace(".{2559a1f2-21d7-11d4-bdaf-00c04f60b9f0}", "") 
TextBox2.Text = TextBox2.Text.Replace(".{2559a1f2-21d7-11d4-bdaf-00c04f60b9f0}", "")

What this does it it open the folderbrowser dialog and put the full path of the folder you selected into textbox1.text and put the name of the selected folder in textbox2.text. When your done it should look kinda like mine, i have some added feautures which i will make a tutorial on later.

Please dont repost without giving credits to the right website, thank you
Written and coded by: AnoPem

How To Make A Calculator In Visual Basic 2008 / Visual Basic 2010

in free will forms, how to build a website, how to make a calculator, how to make a calculator in visual basic, last will and testament form, tutorial, vb.net - By Mohamed Shimran - on 7/19/2012 - 44 comments

Today i will teach you how to make a calculator in VB.NET , making your own calculator would be awesome.

open visual basic 2008 or visual basic 2010
create a new project
windows form/console application
change your form size to 223, 274
go to form1 properties and text name it whatever you want (calculator)
add 18 buttons from the tool box
add a textbox
click textbox then properties and multiline and make it true
click text box and properties and click font and make the font little bigger
make the text box little bigger
now change the button text to look like this

12 .now double click the form and delete everything

13 . then copy and paste this bunch of code

Option Explicit On

Public Class Form1

    'Author : Mohamed Shimran

    'Blog : http://www.ultimateprogrammingtutorials.info

    Dim FirstNumber As Single

    Dim SecondNumber As Single

    Dim AnswerNumber As Single

    Dim ArithmeticProcess As String

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        TextBox1.Text = TextBox1.Text & 1

    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

        TextBox1.Text = TextBox1.Text & 2

    End Sub

    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click

        TextBox1.Text = TextBox1.Text & 3

    End Sub

    Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click

        TextBox1.Text = TextBox1.Text & 4

    End Sub

    Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click

        TextBox1.Text = TextBox1.Text & 5

    End Sub

    Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click

        TextBox1.Text = TextBox1.Text & 6

    End Sub

    Private Sub Button7_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button7.Click

        TextBox1.Text = TextBox1.Text & 7

    End Sub

    Private Sub Button8_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button8.Click

        TextBox1.Text = TextBox1.Text & 8

    End Sub

    Private Sub Button9_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button9.Click

        TextBox1.Text = TextBox1.Text & 9

    End Sub

    Private Sub Button10_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button10.Click

        TextBox1.Text = TextBox1.Text & 0

    End Sub

    Private Sub Button11_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button11.Click

        TextBox1.Text = TextBox1.Text & "."

    End Sub

    Private Sub Button13_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button13.Click

        FirstNumber = Val(TextBox1.Text)

        TextBox1.Text = "0"

        ArithmeticProcess = "+"

    End Sub

    Private Sub Button14_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button14.Click

        FirstNumber = Val(TextBox1.Text)

        TextBox1.Text = "0"

        ArithmeticProcess = "-"

    End Sub

    Private Sub Button15_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button15.Click

        FirstNumber = Val(TextBox1.Text)

        TextBox1.Text = "0"

        ArithmeticProcess = "X"

    End Sub

    Private Sub Button16_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button16.Click

        FirstNumber = Val(TextBox1.Text)

        TextBox1.Text = "0"

        ArithmeticProcess = "/"

    End Sub



    Private Sub Button18_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button18.Click

        SecondNumber = Val(TextBox1.Text)

        If ArithmeticProcess = "+" Then

            AnswerNumber = FirstNumber + SecondNumber

        End If

        If ArithmeticProcess = "-" Then

            AnswerNumber = FirstNumber - SecondNumber

        End If

        If ArithmeticProcess = "X" Then

            AnswerNumber = FirstNumber * SecondNumber

        End If

        If ArithmeticProcess = "/" Then

            AnswerNumber = FirstNumber / SecondNumber

        End If

        TextBox1.Text = AnswerNumber

    End Sub

End Class

13 . now debug

14. enjoy

I did a tutorial about making an advanced calculator, you would love it : How To Make A Advance Calculator In VB.NET

How To Create Your First Program In Visual Basic 2008 / Visual Basic 2010

in hello world, tutorial, vb.net - By Mohamed Shimran - on 7/17/2012 - No comments

creating your program in visual basic .net will be a bit hard for the first time but after creating your first program you will say "Oh My God Its Really Really Easy" so you have to create your first program dont worry i will tell you how to create it

so lets get started step by step

1 . open visual basic .

2 . create new project .

3 . select create new windows form .

How To Download Visual Studio 2008/2010

in vb.net - By Mohamed Shimran - on 7/16/2012 - No comments

you can download visual basic 2008 express edition or visual basic 2010 .

Download Visual Studio 2008 .