DATA PLUS+ v.1.0.0

DATA PLUS+ v. 1.0.0
===================


 Software / Application This is the umpteenth time I build a job with Visual Basic 6.0, finally, we release the setup file to be used as a reference in visual basic workmanship.

this, we created with some simple code-code that we have made in visual basic.

I hope you can accept the applications we create.
thanks for supports, developers and all of you.



About:
------
is a program where you can save the file / database
from which you created the table, is used to create,
modify, delete and search the data as it is needed,
in the development of the first, this software works
only for two types of ID / PASSWORD or ID / NUMBER.
You, can have it with Free Software by contacting the software developers.

File Name:
----------
Data+ Setup.rar (Compresed)
Data+ Setup.exe

Size & Format:
--------------
Size: 404 KB, (1.4 Mb on The Disk After Instalation)
Format: exe. setup on build .Rar

See The Screen Shoot :




Download FreeFrom Media Fire:
http://goo.gl/JwAUN





HOW TO INSTAL:
--------------
. Download Free
. extract Data+ Setup.rar file
. Open the File Setup called Data+ Setup.exe
. Instal as usual.

To Ask and Question Please Visit :
- dinda_phobia@yahoo.com
- www.dindaphobia-vb.blogspotcom
-http://www.facebook.com/dp.VBProject?ref=hl

best regard,
dp™_oNLine © dpSOFT 2012 ALL RIGHTS RESERVED.

Virus Scan Result (OK):
http://goo.gl/898rg
Read More....

make Slide Font in Vb 6

Lesson 6 - make Slide Font in Vb 6


Ouke kk ...

How to make a "Slide Font","Label Walk" on the form or on the application that we will create.

let's refer to the tutorial below:


STEP:

1. Component Needed :
   - Form1
   - Label ( Label1 )
   - Timer
   - Coding
   - or some component you can add ^_^
 
_________________________________________________________________

2.

COMPONENT PROPERTIES :
   Label : - Caption = "Whatever You Want"
   Timer : - Interval = 100


_________________________________________________________________

CODING :

3.  
 - Double Click Form1, or Right Click > View Code.
 add this code into Form1:

Private Sub Form_Load()
Label1.caption = Label1.caption & Space(50)
Timer1.Enabled = True

End Sub

 - Double Click Timer1, add this code into Timer1:
Private Sub Timer1_Timer()

Dim str As String
str = Form1.Label1.Caption
str = Mid$(str, 2, Len(str)) + Left(str, 1)
Form1.Label1.Caption = str

End Sub

_________________________________________________________________________________

4. Hit F5 to Preview,
You are done,.. and you can add the information Project, and make the exe. files

5. Enjoy.





You can Download The Project Files,


File name :[VB6]
File Type : .rar [ .vbp]
Size :  119 Kb

You can Follow The Step By Watch Video ^_^

[ Uploading :P ]



download note
Link download in a picture Download button.

     * You Will be redirected to the site adf.ly
     wait 5 seconds until there is written SKIP AD at the top right of your monitor.
     click > SKIP AD < to continue.


Thanks For Read and Visit, Best Wishes ................... DindaPhobia.
Good Job.


Tags : Font in Visual basic, VB 6.0, Slide, Label, how to make label walk, Slide Font in Visual Basic 6.0,
Read More....

Exit or Close Button With Effect [VB 6.0]

Lesson 5 - How To make Exit / Close Button Vb v6.0

Today, We will create one component Close or Exit Form button / Programs.

In this tutorial, we will make the Button Exit / Close, so do not use the default form, Close, Maximize, minimize,

And also we will add a little effect on the form when the program at the Close / exit, will look like exploding.





Ok guys, this for the Tutorials, just Follow Step by Step,


STEP:
1. Component Needed :
   - Form1
   - One Button ( Button1 )
   - Coding + Module
   - or some component you can add ^_^

2.

FORM PROPERTIES :
   Border Style    = None

COMPONENT PROPERTIES :
   Button : - Caption = X
                - Font = Bold



 


CODING :

3. Double Click Form1, or Right Click > View Code.
   add this code into Form1:

Private Sub Command1_Click()
'Replace all the '500' below with the Speed of the Explode\Implode Effect.
Call ImplodeForm(Me, 500)
End
Set Form1 = Nothing
End Sub

Private Sub Form_Load()
Call ExplodeForm(Me, 500)
End Sub

Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
Call ImplodeForm(Me, 500)
End Sub


4. add Module ( Module1 )


Option Explicit

#If Win16 Then
Type RECT
Left As Integer
Top As Integer
Right As Integer
Bottom As Integer
End Type
#Else
Type RECT
Left As Long
Top As Long
Right As Long
Bottom As Long
End Type
#End If

#If Win16 Then
Declare Sub GetWindowRect Lib "User" (ByVal hwnd As Integer, lpRect As RECT)
Declare Function GetDC Lib "User" (ByVal hwnd As Integer) As Integer
Declare Function ReleaseDC Lib "User" (ByVal hwnd As Integer, ByVal hdc As _
Integer) As Integer
Declare Sub SetBkColor Lib "GDI" (ByVal hdc As Integer, ByVal crColor As Long)
Declare Sub Rectangle Lib "GDI" (ByVal hdc As Integer, ByVal X1 As Integer, _
ByVal Y1 As Integer, ByVal X2 As Integer, ByVal Y2 As Integer)
Declare Function CreateSolidBrush Lib "GDI" (ByVal crColor As Long) As Integer
Declare Function SelectObject Lib "GDI" (ByVal hdc As Integer, ByVal hObject _
As Integer) As Integer
Declare Sub DeleteObject Lib "GDI" (ByVal hObject As Integer)
#Else
Declare Function GetWindowRect Lib "user32" (ByVal hwnd As Long, _
lpRect As RECT) As Long
Declare Function GetDC Lib "user32" (ByVal hwnd As Long) As Long
Declare Function ReleaseDC Lib "user32" (ByVal hwnd As Long, ByVal _
hdc As Long) As Long
Declare Function SetBkColor Lib "gdi32" (ByVal hdc As Long, ByVal _
crColor As Long) As Long
Declare Function Rectangle Lib "gdi32" (ByVal hdc As Long, ByVal X1 As Long, _
ByVal Y1 As Long, ByVal X2 As Long, ByVal Y2 As Long) As Long
Declare Function CreateSolidBrush Lib "gdi32" (ByVal crColor As Long) As Long
Declare Function SelectObject Lib "user32" (ByVal hdc As Long, ByVal hObject _
As Long) As Long
Declare Function DeleteObject Lib "gdi32" (ByVal hObject As Long) As Long
#End If

Sub ExplodeForm(f As Form, Movement As Integer)
Dim myRect As RECT
Dim formWidth%, formHeight%, i%, X%, Y%, Cx%, Cy%
Dim TheScreen As Long
Dim Brush As Long
GetWindowRect f.hwnd, myRect
formWidth = (myRect.Right - myRect.Left)
formHeight = myRect.Bottom - myRect.Top
TheScreen = GetDC(0)
Brush = CreateSolidBrush(f.BackColor)
For i = 1 To Movement
Cx = formWidth * (i / Movement)
Cy = formHeight * (i / Movement)
X = myRect.Left + (formWidth - Cx) / 2
Y = myRect.Top + (formHeight - Cy) / 2
Rectangle TheScreen, X, Y, X + Cx, Y + Cy
Next i
X = ReleaseDC(0, TheScreen)
DeleteObject (Brush)
End Sub

Public Sub ImplodeForm(f As Form, Movement As Integer)
Dim myRect As RECT
Dim formWidth%, formHeight%, i%, X%, Y%, Cx%, Cy%
Dim TheScreen As Long
Dim Brush As Long
GetWindowRect f.hwnd, myRect
formWidth = (myRect.Right - myRect.Left)
formHeight = myRect.Bottom - myRect.Top
TheScreen = GetDC(0)
Brush = CreateSolidBrush(f.BackColor)
For i = Movement To 1 Step -1
Cx = formWidth * (i / Movement)
Cy = formHeight * (i / Movement)
X = myRect.Left + (formWidth - Cx) / 2
Y = myRect.Top + (formHeight - Cy) / 2
Rectangle TheScreen, X, Y, X + Cx, Y + Cy
Next i
X = ReleaseDC(0, TheScreen)
DeleteObject (Brush)
End Sub


4. Hit F5 to Preview,
You are done,.. and you can add the information Project, and make the exe. files

5. Enjoy.




You can Download The Project Files,


File name :[VB6] L5-Exit_Close Button (VbRoom).rar
File Type : .rar [ .vbp]
Size :  119 Kb

You can Follow The Step By Watch Video ^_^

[ Uploaded :P ]



download note
Link download in a picture Download button.

     * You Will be redirected to the site adf.ly
     wait 5 seconds until there is written SKIP AD at the top right of your monitor.
     click > SKIP AD < to continue.


Thanks For Read and Visit, Best Wishes ................... DindaPhobia.
Good Job.


Tags : Exit, Close, Button, how to make Exit Button on VB, Visual Basic 6.0, cara membuat exit layout dengan Visual Basic 6.0, bagaimana membuat exit button dengan efek meledak, Visual basic 6.0, Source Code, kode exit dan close pada VB 6.0, Studio.



Read More....

How To Make Date and Time on VB 6.0


Lesson 4 - How To Display Time and Date in Visual Basic 6.0


Ouke Guys,.. today we can make simple application again, made in Vb 6.0
Now, we will make "How to a Form can Display Date and Time"

Ok, this for the Tutorials, just Follow the Step,

STEP :
1. Component Needed :
    - Form1
    - Two Label ( Label1 + Label2)
    - One Timer ( Timer1 )
    - Coding
    - Picture (if you want add picture into your project)
    - Cofee ... ahaaa i m Joke, hihihhi

2. Open your Vb 6.0,


FORM PROPERTIES :
  Border Style  = None
  Picture         = add your pic ( *.jpg)

COMPONENT PROPERTIES :
  Timer                 : Interval = 1
  Label1 & Label2   : - Font    = Change font you want
                             - ForeColor    = Change Color Display
                             - BackStyle    = 0 - Transparent
                             - Alignment = 2 - Center



 
CODING :
3. Double Click Timer1, or Right Click > View Code.
   

    add this code into Timer1:
Private Sub Timer1_Timer()
Label1.Caption = Date
Label2.Caption = Time
End Sub


4. Hit F5 to Preview,
    You are done,.. and you can add the information Project, and make the exe. files

5. Enjoy.


You can Download The Project Files,


File name : [VB6] L3 - Date and Time (VbRoom)
File Type : .rar [ .vbp]
Size : 90 Kb 

You can Follow The Step By Watch Video ^_^




Thanks For Read and Visit, Best Wishes ................... DindaPhobia.
Good Job.


Tags : Date and Time, how to make date and time on VB, Visual Basic 6.0, cara membuat jam dengan Visual Basic 6.0, bagaimana membuat jam dengan Visual basic 6.0, Source Code, kode Jam dan waktu pada VB 6.0, Studio.

Read More....

How To Make Animation With Visual Basic 6.0

Lesson 3 - Make Animation With Visual Basic 6.0


Ouke Guys ,.. Today we will make a Animation With Visual Basic 6.0, How ?


Lets Make it!

Step :
1. Open Your VB 6.0
2. We need "three different images", So... Prepare some pictures that will be the Animation.


Components Needed :
 - Form1
 - Three different images ( *.Jpg / *.Png )
 - Three Timer ( Timer1, Timer2, Timer3 )
 - Or what you want to add.












_________________________________________________________________________________
FORM PROPERTIES :
 - BorderStyle  : 1 - Fixed Single
 - Icon               : add your Icon

COMPONENT PROPERTIES :
 - Timer1, Timer2, Timer3 : Interval = 200
   Or You can Change the Speed, what ever you want, to slow down, could at intervals of  200+



_________________________________________________________________________________

3. you should combine your images, into one.



_________________________________________________________________

CODING : ^_^
4. Right-click Form1, and then you click on 'View Code'
or double-click Form1

- input this Code in Form1 :
private sub form_load()
Timer2.Enabled = False
Timer3.Enabled = False
end sub

- Double-click Timer1, and Input This Code on Timer1
Private Sub Timer1_Timer()
Picture3.visible = False
Picture1.Visible = True
Timer2.Enabled = True
Timer1.Enabled = False
End Sub

- Double-click Timer2, and Input This Code on Timer2
Private Sub Timer2_Timer()
Picture1.Visible = False
Picture2.Visible = True
Timer3.Enabled = True
Timer2.Enabled = False
End Sub
- Double-click Timer3, and Input This Code on Timer3

Private Sub Timer3_Timer()
Picture2.Visible = False
Picture3.Visible = True
Timer1.Enabled = True
Timer3.Enabled = False
End Sub


5. You Are Done... and Finished making .exe for this.

You can Download this Project & Code by VBRoom




You can Follow Tutorials by Watch Video Tutorials VBRoom on Youtube



May Helpful .... 
we can Learn Together,..

Best Wishes,
regards.


Tags : Animation, How To Make Animation With Visual Basic, Pictures Animation, Visual Basic 6.0, Visual, Basic, bagaimana cara membuat Animasi menggunakan Visual basic, belajar Visual basic, Basic Info, Tutorial Visual Basic, VB 6.0 VB 2010, Free Download Project Visual BAsic, Pemrograman dasar, Visual Studio,

download note
Link download in a picture Download button.
     * You Will be redirected to the site adf.ly
     wait 5 seconds until there is written SKIP AD at the top right of your monitor.
     click > SKIP AD < to continue.
 

Tested by: DindaPhobia
( in Windows XP SP3 - X-Gamer )
All software and applications as well any files on this site are based on experience and tried and Executed by the author,
in Windows XP

Please Trace / Copy - Paste my article if it can be beneficial, however if you do not mind
"DON'T FORGET TO INCLUDE CREDITS!!"
Thank you.
dp _
Read More....

Download Microsft Visual Studio (Visual Basic 2010)






Download Microsoft Visual Studio - Visual bBasic Expres 2010, by Microsoft™

Download Microsoft Visual Studio Keygen - VB Serial Number


Read More....

How To Make *.Exe file - Visual basic 6.0

Lesson 2 - Tutorials Creating *.Exe File on VB 6.0

Hello Guys...
For the 2nd Lesson, we must know, when we can creating Exe File made VBasic 6.0
For This Post, i will Create a New Project and also for example.

Ok,
After You Create a Project Files,
you should save your work before you freeze the file,
___________________________________________________________________________________
Step:

1. Open the VB 6.0
2. Open your Project
3. after you are finished designing all the work your VB, next is to add some Information, properties, copyrights, and other commentary.

Go to tollbar >  Project > [Your Project name] Properties.




On Project Properties Information :
 
Tab > General :

 
Project Type: Standard EXE
Project Name: Project is Your name
Help File Name: Choose Your Files 'Help', for those who have difficulty use your Project.
Project Description: yes, Write 'about' section of your Project
Startup Object: if you create some form, then select one Form which will be shown when the project is opened.


Tab > Make:
* Version Number
choose the version number of your VB Project
* Application
Title: The title of your application
Icon: the logo of your Application
* Version Information
Comments, Company Name, File Description, Copyright > yes, click type, then browse the explanation in the Value column.
Command Line Arguments, Conditional Compilation Arguments
 ________________________________________________________________________________
  
Now, Create Your Exe

Go To toolbar File > Make Project1 .exe

Following The Step By Step.. and you now already to use your Application.


Hope can help,
DindaPhobia.



Tags : Make Exe File, cara membuat File Exe, cara membuat program, Visual basic, Visual Studio, VB 6.0, make a way exe, *.exe, bagaimana?, cara,.


Read More....