Saturday, November 29, 2014

Calculator in Visual Basic 6

This very simple program that I wrote in Visual Basic 6 a very long time ago when I started learning how to program in visual basic 6. This program is a calculator program that will ask the user to enter two values and then the user can select in four operations using command buttons such as add, subtract, divide and multiply.

I hope you can learn from this simple program that I wrote. If you find my work useful please send me an email at jakerpomperada@yahoo.com and jakerpomperada@gmail.com.

Thank you very much and Happy Programming.


Sample Output of Our Program



Friday, November 28, 2014

SMS Sender System in Visual Basic NET

  This simple program will allows you to send sms using your Visual Basic NET I wrote this application using Microsoft Visual Studio 2010. For my GSM Modem I'm using Sun BroadBand Internet with sim.  The code will also work in Globe Tattoo and Smart Bro Plugin.

The code is very simple and very easy to understand. I hope you will benefit from it. If you have some questions please send me an email at jakerpomperada@yahoo.com and jakerpomperada@gmail.com

People here in the Philippines can reach me through my mobile numbers 09173084360 and 09993969756. Thank you very much and Happy Productive Programming.



Sample Output of Program




Tuesday, November 25, 2014

Sending SMS Using PHP Via GSM Modem


     After I was able to send sms text message in Visual Basic 6 my intention to improve my skills and knowledge in programming does not stop there. My next plan is to write an application to send sms using PHP as my programming language. PHP is one of my favorite language I earned from it and it is easy to learned for beginners. After some research over the Internet I find a class code in PHP that enables us to send sms using a gsm modem. 

I modify the code to suit to my needs and then test using my gsm modem provided by Sun Broadband Internet. In my computer at home it runs on Windows XP the gsm modem uses communication port 3 for sending information specially sms messages. After some trial and error and refinement of my code I was able to send text messages from PHP into my mobile phone. 

My code works using globe tattoo, sun broadband internet and smart bro plugin gsm modem here in the Philippines. If you are trying to use my code in your country please check your telecommunication company about it. I hope you find my work useful and beneficial in your programming assignments and projects which involves integrating SMS functionality in your application. 

Questions and comments your can send me an email at jakerpomperada@yahoo.com and jakerpomperada@gmail.com. People here in the Philippines who wish to contact me can reach me in my mobile number 09173084360 and my telephone number at home at (034) 4335675. Thank you very much and Happy Programming.





Sample Output of Our Program



Check your GSM Modem here device manager to determine the communication port before you run the program




Sunday, November 23, 2014

Sending SMS in Visual Basic 6


     About this code I wrote this program that enables the user to send text or short messaging system from Visual Basic 6 to a mobile phone using gsm modem. In this example my gsm modem that I used is Huawei and my provider is Globe Telecom here in the Philippines. The code can be used by other telecom gsm modem like sun broadband internet and smart bro plugin gsm modem. To determine what communication port your gsm modem resides select my computer in your windows desktop. Then right click your mouse and select properties select device manager and to directly to modem. Remember not all gsm modem has the same communication port number. Please check it properly before you run our program.



If you like my work please send me an email at jakerpomperada@yahoo.com and jakerpomperada@gmail.com

You are reach me at my mobile numbers 09173084360 and 09993969756

Thank you very much and Happy Programming 


Sample Output of Our Program



Student Grading System with Form Validation in JavaScript

While learning Javascript I come up with the idea to write a program in Javascript that I will compute the student grade. This program that I wrote is very simple it teaches the user and learner how to use html forms and form validations using Javascript as our scripting language.

How this program works is very simple it will ask the user to enter the student name, student course, subject, midterm grade and endterm grade to be solve to get the final grade of the student in the particular subject. I also include checking for remarks if the grade of the student greater than 75 percent the student passed the subject. If the grade is less then 75 percent means the student was not able to pass the subject.

I'm hoping that your learn something in my program feel free to use my code in your school or programming projects in mind. If you have some questions please send me an email at jakerpomperada@yahoo.com and jakerpomperada@gmail.com.

People here in the Philippines who wish to contact me can reach me at my mobile number 09173084360.

Thank you very much and Happy Programming



Sample Output of Our Program

Program Listing

<!-- Student Grading System in Javascript -->
<!-- Written By: Mr. Jake R. Pomperada,MAED-IT -->
<!-- November 23, 2014 Sunday -->
<html>
<title> Student Grading System</title>
<style>
h3 {
     font-family: "arial";
     color: blue;
align:left;
}
table, td, th {
     font-family: "arial";
     color: blue;
}
div {
    font-family: "arial";
    font-size: 20px;
color: blue;
}
</style>
<script type="text/javascript">
function test()
{
   var _stud_name = document.grade.stud_name;
var _course = document.grade.course ;
var _subject = document.grade.subject;
var _midterm = document.grade.midterm;
var _endterm = document.grade.endterm;
if (_stud_name.value=="" || _stud_name.value==null){
_stud_name.focus();
alert("Student name field cannot be empty.");
return false;
    }
else if (_course.value=="" || _course.value==null){
_course.focus();
alert("Course field  cannot be empy.");
return false;
} else if (_subject.value=="" || _subject.value==null) {
_subject.focus();
alert("Subject field cannot be empty.");
return false;
} else if (_midterm.value=="" || _midterm.value==null) {
_midterm.focus();
alert("Midterm Grade cannot be empty.");
return false;
}
    else if (_endterm.value=="" || _endterm.value==null) {
_endterm.focus();
alert("Endterm Grade cannot be empty.");
return false;
midterm_grade=document.grade.midterm.value;
endterm_grade=document.grade.endterm.value;

var solve_midterm = parseInt(midterm_grade) * 0.5;
var solve_endterm = parseInt(endterm_grade) * 0.5;

final_grade = (solve_midterm + solve_endterm);
final_grade2 = final_grade.toFixed(2);

if  (final_grade2 >= 75)  {
    remarks = "Passed";
}
  else {
   remarks = "Failed";
}

report_title="Student Grade Report";
stud_name = document.grade.stud_name.value;
stud_course = document.grade.course.value;
stud_subject = document.grade.subject.value;

content ="Your Final Grade is  " + final_grade2 + "." 
document.getElementById('report_title').innerHTML = report_title;
document.getElementById('stud_name').innerHTML = "Name : " + stud_name;
document.getElementById('course').innerHTML = "Course : "  + stud_course;
document.getElementById('subject').innerHTML = "Subject : " + stud_subject;
document.getElementById('final_grade').innerHTML = content;
document.getElementById('remarks').innerHTML = "Grade Remarks : " + remarks;
}
</script>

<body bgcolor="yellow">
<br>
<font color="blue">
<h3> Student Grading System </h3>
</font>
 <form method="post" name="grade" >
  <table>
    <tr>
      <td align="right">Student Name :</td>
      <td align="left"><input type="text" name="stud_name" size="40" /></td>
    </tr>
    <tr>
      <td align="right">Course:</td>
      <td align="left"><input type="text" name="course" size="40" /></td>
    </tr>
    <tr>
      <td align="right">Subject:</td>
      <td align="left"><input type="text" name="subject" size="40" /></td>
    </tr><td> &nbsp; </td>
<tr>
      <td align="right">Midterm Grade:</td>
      <td align="left"><input type="text" name="midterm" size="2" /></td>
    </tr>
<tr>
      <td align="right">Endterm Grade:</td>
      <td align="left"><input type="text" name="endterm" size="2" /></td>
    </tr>
<td> &nbsp; </td>
<tr>
<td align="right"> 
<input type="button" value="Solve Grade" 
     title="Click here to compute the grade."
      onclick="test();">
</td>  
</tr>
  </table> 
</form>
    <br> 
<div id="report_title">  </div> 
<br>
<div id="stud_name">  </div> 
<div id="course">   </div> 
<div id="subject"> </div> 
    <div id="final_grade"> </div> 
    <div id="remarks">   </div>
</body>
</html>


Wednesday, November 19, 2014

Total Sum Results With Data Report in Visual Basic 6 and Microsoft Access



This is the second revision of my code on Total Sum Results by this time I included a print command button that enables the user to generate report based of the values that is being presented in the form. The code is very simple and can be used as starting point in developing business applications such as inventory system, accounting system, student enrollment system and among others. 

If you find my work useful please send me an email at jakerpomperada@yahoo.com and jakerpomperada@gmail.com.
 

People here in the Philippines who wish to contact me you can reach me at the following mobile numbers 09173084360 and 09993969756.

Thank you very much and Happy Programming. 





Sample Output of Our Program



DOWNLOAD SOURCE CODE HERE







Tuesday, November 18, 2014

Total Sum Results Using Visual Basic 6 and MS Access


 This code that I wrote using Visual Basic 6 and Microsoft Access will display a list of values in our sum field using data grid in Visual Basic 6. What the program will do is to sum up all the values and then display the results in our text box. This code is very useful in creating business applications using Visual Basic 6 as your programming language. 

If you find my work useful please send me an email at jakerpomperada@yahoo.com and jakerpomperada@gmail.com. People here in the Philippines who wish to contact me can reach me at 09173084360 and 09993969756. Thank you very much and Happy Programming.


Sample Output of Our Program


Sunday, November 16, 2014

Users Database Using Client - Server in Visual Basic 6

As a programmer majority of my applications that I have written before in Microsoft Visual Basic 6 is more on single user or one computer alone. As time passes by business applications should be network in order for many users can use the application efficiently and they where able process as many data as they can. 

The first time I heard the term Client - Server Architecture that first thing that comes up with my mind is that it is very difficult to learn or even to achieve in writing a program that has client-server capabilities. I do some extensive research and study and I was able to find out developing a database applications in Visual Basic 6 and Microsoft Access for client-server deployment is not difficult but easy if you know how to plan and implement your system properly.

The fist thing that we must do is to create a folder in our computer in our windows operating system. In my case I named the folder vb afterwards I share the vb folder in my network so that it can be accessed by other computer in the network. In this article I added some screen shoots to give up some idea how to share and configure your client and server side of your Visual Basic application.

In my client side of the application in my module in Visual Basic 6 I declare the following code to access the ms access database in the server computer.

Public Sub con()
cn.Open "Provider=Microsoft.jet.OLEDB.4.0;Data Source=\\10.0.0.2\vb\server3\user1.mdb; Persist Security Info= false"
rs.CursorLocation = adUseClient
End Sub


I hope this article gives you an idea how to write and develop a database system in Microsoft Visual Basic 6 and Microsoft Access Client-Server Database Architecture. If you have some questions please send me an email at jakerpomperada@yahoo.com and jakerpomperada@gmail.com.

You can text or call me here in the Philippines in the following mobile numbers 09173084360 and 09993969756.

Thank you very much and Happy Programming



Client Side Screen Shoot


Server Side Screen Shoot


Sharing of Folder in the Server Side I am using Windows XP for the Server






Wednesday, November 12, 2014

Today's Time Using JavaScript

In this article I would like to share with you a sample program that I wrote using JavaScript as my programming language. I called this program Today's Time what this program will do is to display the current time in your computer. For your information the date and time is being stored in our computer bios and powered by a battery called CR2032 3 volts.  

The code can be used to add functionality to your webpage by providing the visitor or user of your website to know what is the present time. If you have some questions please send me an email at jakerpomperada@yahoo.com and jakerpomperada@gmail.com

Thank you very much and Happy Programming.

Sample Output of Our Program

Program Listing

<html>
<script>
function clock(){
var time = new Date()
var hr = time.getHours()
var min = time.getMinutes()
var sec = time.getSeconds()
var ampm = " PM "
if (hr < 12){
ampm = " AM "
}
if (hr > 12){
hr -= 12
}
if (hr < 10){
hr = " " + hr
}
if (min < 10){
min = "0" + min
}
if (sec < 10){
sec = "0" + sec
}
text = hr + ":" + min + ":" + sec + ampm
document.getElementById("time").innerHTML ="The time is " + text;
setTimeout("clock()", 1000)
}
window.onload=clock;
</script>
<body onload="clock()"> 
<font face="arial" size=6" color="blue">
 <p id="time">  
</p> 
</font> 
</body>
</html>






Friday, October 17, 2014

Basic Math Operations in Perl

I love to learn many things in life programming is not an exception there are thousands of programming language around us. Each one of them has a basic application just like PHP it is design for web development, C and C++ was design to use in system programming that interact with computer hardware and peripherals. One of the programming language that caught in my attention is PERL or Practical Extraction  Reporting Language developed by Larry Wall way back in 1987 to help him in his job as system administrator.

This programming language is often called the swiss army knife in programming community because it has many application not only in console but also in web development.  My experience in Perl is very fundamentals in a sense it is my outlet from my day to day work. I found Perl easy to use and delivers result effectively however in today's IT environment most of the web application specially here in the Philippines uses PHP as their primary language by many web developers maybe because there are many frameworks like WordPress, Drupal and Joomla that is written most of the time in PHP. Again I have to emphasize I do not compare this programming languages because each one of them has a specific application.  

This sample Perl program is my first time to create a web based program using Perl as my programming language. Most of my program in Perl is written in console environment I am using XAMPP as my Perl compiler and interpreter in this sample program. What is program will do is to show the use basic mathematical operations using Perl. The basic math operations are addition, subtraction, division and multiplication. The web browser that is used to run this program is torch a similar browser like google chrome.

If you find my work useful in your programming projects and assignments please send me an email at jakerpomperada@gmail.com and jakerpomperada@yahoo.com.

Thank you very much.


Sample Output of Our Program

Program Listing

#!"D:\xampp\perl\bin\perl.exe"
print "Content-Type: text/html\n\n";

$a=10;
$b=5;
$add = ($a + $b);
$subtract  = ($a - $b);
$multiply = ($a * $b);
$division  = ($a / $b);

print "<hr size='10' color='green'>";
print "<center> <h2> <font color='blue' face='arial'> Basic Math Operations in Perl
  </h3> </center> </font>";
print "<hr size='10' color='green'>";
print "<br>";
print " <font color='red' face='comic sans ms' size='6'>Original Values for variable A is $a and
       for variable B is $b <br> </font>";
print "<br><br>";
print "<font color='blue' face='arial' size='5'>The sum of $a and $b is $add. </font> <br>";
print "<font color='blue' face='arial' size='5'>The difference between $a and $b is $subtract. </font> <br>";
print "<font color='blue' face='arial' size='5'>The product of $a and $b
     is $multiply. </font> <br>";
print "<font color='blue' face='arial' size='5'>The quotient of $a and $b
     is $division. </font> <br>";
print "<br><br>";
print "<font color='blue' face='comic sans ms' size='6'> End of Program</font> <br>";

 

DOWNLOAD SOURCE CODE HERE







Thursday, October 16, 2014

Email Address Checker

In this article I would like to share with you a sample program that will check whether the email address that is being given by the user is valid or invalid using C++ as my programming language.

If you like my work please send me an email at jakerpomperada@gmail.com and jakerpomperada@yahoo.com

Thank you very much.


Sample Output of Our Program


Program Listing

#include <iostream>

using namespace std;

bool check1(char* Address,bool Logic)


    {
    int bilA=0;
    for(int Loop1=0; Loop1<255; Loop1++)


        {
        if(Address[Loop1]=='@')


            {
            bilA++;
            if(Address[Loop1-1]==' '||Address[Loop1+1]==' ')


                {
                Logic = false;
                cout << "\n\a\t\tNo empty space before or after @!";
                break;
            }
        }
    }
    if (bilA<1||bilA>1)


        {
        Logic = false;
        cout << endl << "\a\t\tRecheck your number of @!" << endl;
    }
    return Logic;
}
bool check2(char* Address,bool Logic)


    {
    int bilDOT = 0;
   for(int Loop2=0; Loop2<255; Loop2++)


        {
        if(Address[Loop2]=='.')


            {
            bilDOT++;
            if(Address[Loop2-1]==' '||Address[Loop2+1]==' ')


                {
                Logic = false;
                cout << "\n\a\t\tNo empty space before or after dot!";
                break;
            }
        }
    }
    if (bilDOT<1||bilDOT>1)


        {
        Logic = false;
        cout << endl << "\a\t\tRecheck your number of dot!" << endl;
    }
    return Logic;
}


int main()


    {
    int Characters = 0;
    int Select;
    char Address[255] = "";


        bool Logic = true;

             cout << "\n\n\t\t  EMAIL ADDRESS CHECKER VERSION 1.0";
             cout << "\n\n\t  Created By: Mr. Jake Rodriguez Pomperada,MAED-IT";
             cout << "\n\n";
             cout << "\n\tEnter Your Email Address: ";
            cin.ignore();
            cin.get(Address,255,'\n');
            cin.ignore();
            Characters = strlen(Address);
            if(Logic)


                {
                Logic = check1(Address,Logic);
                Logic = check2(Address,Logic);
            }
            if(Address[0]=='@'||Address[Characters-1]=='@')


                {
                cout << endl << "\t\t\a@ misplaced at ends!" << endl;
                Logic = false;
            }
            if(Logic)


                {
                cout << "\n\t\t[ YOUR EMAIL IS VALID ]";

            }
            else


                {
                cout << "\n\t\t[ INVALID EMAIL!! ]";

            }

 cout << "\n\n\n";
 system("pause");

}

Thursday, October 9, 2014

Area of the Circle using Perl

In this article I would like to share with you a sample program to solve the area of the circle by this time I am using Perl as my programming language. The code is very simple and easy to understand.

If you have some questions please send me an email at jakerpomperada@yahoo.com and jakerpomperada@gmail.com.

Thank you very much.


Sample Output of Our Program

Program Listing

## Written By: Mr. Jake R. Pomperada, MAED-IT
## Language : Perl
## Date     : October 9, 2014
#!usr/bin/perl
print "\n\n";
print "\t Area of the Circle";
print "\n\n";
print "Enter the Radius of the Circle? : ";
chomp ($radius=<>);
###########################################
## Formula to solve the area of the Cirle
$area = (3.14 * ($radius ** 2));
###########################################
print "\n\n";
print "The radius of the circle is $radius. \n";
print "The area of the circle is $area.";
print "\n\n";
print "\t\t Thank You For Using This Program.";
print "\n\n";

Addition of Three Numbers Using Perl

In this article I would like to share with you a very simple program that I wrote using Perl as my programming language. I am a beginner in terms of experience in writing codes using Perl or Practical Extraction Reporting Language.

A programming language developed by one of my favorite programmer Larry Wall way back in 1987 to help him in his system administration work before. This programming language is primarily used in server administration and web programming. What this program will do is to ask the user to enter three numbers and then our program will display the total sum of the three values early provided by our user.

If you have some questions regarding with my work in programming feel free to contact me through my email address at jakerpomperada@gmail.com and jakerpomperada@yahoo.com.

Thank you very much.


Sample Output of Our Program

Program Listing

#!usr/bin/perl
print "\n\n";
print "\t Addition of Three Numbers";
print "\n\n";
print "Enter First Number  : ";
chomp($a=<>);
print "Enter Second Number : ";
chomp($b=<>);
print "Enter Third Number  : ";
chomp($c=<>);

$total_sum = ($a+$b+$c);
print "\n";
print "The total sum of $a, $b and $c is $total_sum.";
print "\n";
print "\t\t Thank You For Using This Program.";
print "\n\n";


 DOWNLOAD SOURCE CODE HERE
 



Print a Web Page Using JavaScript

In this article I will show you how to print a portion of your webpage using JavaScript as your scripting language. The code is very simple and short and can be used in your report generation in you website. I hope you will find my work useful in your web design and programming.

If you have some questions regarding my work please send me an email at jakerpomperada@yahoo.com and jakerpomperada@gmail.com

Thank you very much.




Sample Output of Our Program


Find a Number in C++

In this article I would like to share with you a simple program that I wrote using C++ as my programming language to perform linear search or sequential search in computer science data structure. I called this program find a number. What this program will do first is to ask the user to enter five integer numbers after that our program will ask the user what number to be search in a given list. If the number can be found in the list our program will tell the user which location the value is located. If the number is not in the list our program will tell the user the value to be search cannot be found in the list.

I hope you will find my program useful in you programming assignments and projects using C++ as your primary programming language. If you have some questions please send me an email at jakerpomperada@yahoo.com and jakerpomperada@gmail.com

Thank you very much.


Sample Output of Our Program

Program Listing

#include <iostream>
#include <stdlib.h>

using namespace std;

main() {

    int list=0,numbers[5];
    int search=0,dummy=0,location=0;
    int *mypointer;

     cout << "\n\t\t\tFIND A NUMBER 1.0";
     cout << "\n\n";

      mypointer = numbers;

    for (list=0; list < 5; list++) {
        cout << "Enter Value No. " << list+1 <<  " :" ;
        cin >> list[mypointer];
    }

   cout << "\n\n";
   cout << "Enter Number To Search : ";
   cin >> search;

   dummy = search;
     for (list=0; list < 5; list++) {
         if (search == list[mypointer]) {
            search = 1; // true value if found in the list
            location = list+1; // Determine the exact location of the number
     }
}
  if (search == 1){
       cout << "\n\n";
      cout <<"The number " << dummy <<
            " is found in the list";
      cout << "\n\n";
      cout << "The Exact Location in list is " <<
            location <<".";
  }
  else {
       cout << "\n\n";
      cout <<"The number " << dummy<<
            " Cannot be found in the list";
  }
  cout << "\n\n";
 system("PAUSE");
}


Wednesday, October 8, 2014

Menu Program in C++

This code that I wrote in C++ is a simple menu driven program that demonstrates how to construct a menu using C++. What is good about this program is that it does not accept invalid entries there's no way our menu program will crash for invalid entries from our user. I hope this program can help other people how to make their own menu program using C++ as there programming language.

If you have some questions about please send me an email at jakerpomperada@yahoo.com and jakerpomeperada@gmail.com

Thank you very much.


Sample Output of Our Program

Program Listing

// Created By: Mr. Jake Rodriguez Pomperada, MAED-IT
// Date : April 3, 2010 Saturday
// Tool : C++
// Email : jakerpomperada@yahoo.com
// Facebook Address : jakerpomperada@yahoo.com

#include <iostream>

using namespace std;

void  menu()
{
    char choice;
        system("cls");
        cout << "\n\t\t     MENU DEMO Version 1.0 ";
        cout << "\n\n\t Created By: Mr. Jake R. Pomperada, MAED-IT";
        cout << "\n\n";
        cout << "\n\t\t\t 1. Add Record ";
        cout << "\n\t\t\t 2. Edit Record ";
        cout << "\n\t\t\t 3. Delete Record ";
        cout << "\n\t\t\t 4. View Record ";
        cout << "\n\t\t\t 5. Quit Program ";
        cout << "\n\n";
        cout << "\n\t\t Enter Your Choice :=> ";
        cin >> choice;
        if (choice == '1') {
            cout << "\n\n You select Add";
            cout << "\n\n";
            system("pause");
            menu();
        }
        else if (choice == '2') {
            cout << "\n\n You select Edit";
            cout << "\n\n";
            system("pause");
            menu();
        }
    else if (choice == '3') {
            cout << "\n\n You select Delete";
            cout << "\n\n";
            system("pause");
            menu();
        }
        else if (choice == '4') {
            cout << "\n\n You select View";
            cout << "\n\n";
            system("pause");
            menu();
        }
         else if (choice == '5') {
            cout << "\n\n\tThanks for using this program and return to OS.";
            system("pause");
            menu();
        }
     else if (choice != '5') {
         cout << "\n\n\n \t\t\t Invalid Option Try Again...";
         cout << "\n\n";
        system("pause");

    }

}

main()
{
 char choice;
    do {
    menu();
    } while (choice != '5');
}


Sunday, October 5, 2014

Electricity Billing System in C++

In this article I would like to share with you my program that I wrote a long time ago in C++ I called this program electricity billing system. It is a menu driven program that will compute and generate bill reports of the consumer of electricity. What good of this program is the it is very easy to use and the code is very simple to understand by beginners in C++ programming.

If you like my work please send me an email at jakerpomperada@yahoo.com and jakerpomperada@gmail.com.

Thank you very much.



Sample Output of Our Program




Saturday, October 4, 2014

Stop Watch in Visual Basic 6


A simple stop watch application that I wrote using Microsoft Visual Basic 6. The code uses timer control to generate time in seconds in Visual Basic 6. The code is very short and easy to understand for beginners that are new in Visual Basic programming.

If you have some questions please send me an email at jakerpomperada@yahoo.com and jakerpomperada@gmail.com

Thank you very much.



Sample Output of Our Program


Program Listing

Private Sub cmdstart_Click()
    lbltime.Caption = "0"
    tmrwatch.Enabled = True
End Sub

Private Sub cmdstop_Click()
    tmrwatch.Enabled = False
End Sub

Private Sub Command1_Click()
Unload Me
End Sub

Private Sub Form_Load()
    tmrwatch.Interval = 100
End Sub

Private Sub tmrwatch_Timer()
    lbltime.Caption = Str(Val(lbltime.Caption + 0.1))
End Sub

DOWNLOAD SOURCE CODE HERE

Scrolling Text in Visual Basic 6.0


A simple animation program that I wrote using Microsoft Visual Basic 6 to scroll a text in the form. I use timer control to generate the animation effects.

If you have some questions please send me an email at jakerpomperada@gmail.com and jakerpomperada@yahoo.com.

Thank  you very much.



Sample Output of Our Program

Program Listing

Option Explicit
Dim strText As String

Private Sub cmdScroll_Click()
    strText = String(70, " ") + " Microsoft Visual Basic 6.0 "
    Timer1.Enabled = True
End Sub

Private Sub cmdQuit_Click()
Unload Me
End Sub

Private Sub Timer1_Timer()
    strText = Mid(strText, 2) & Left(strText, 1)
    txtMessage = strText
End Sub




Loan Interest Calculator in Visual Basic 6

A simple program that I wrote using Microsoft Visual Basic 6 to compute the loan by the customer based on the amount being loaned, number of years and the interest rate. The code is very simple and easy to understand.

If you have some questions please send me an email at jakerpomperada@gmail.com and jakerpomperada@yahoo.com.

Thank you very much.



Sample Output of Our Program






Login System Using Microsoft Access

A login security system that I wrote in Microsoft Access to check if the user is a valid or not in the system. Im using VBA code for this application very code to understand. The code is very simple to understand and can be used as your basis in creating your own login security system for your Microsoft Access database applications.

If you have some questions please send me an email at jakerpomperada@yahoo.com and jakerpomperada@gmail.com.

Thank you very much.



Sample output of our program






Number To Words Currency Converter in MS Access

This program that I wrote using Microsoft Ms Access 2007 as my programming language will ask the user to enter a number in numeric format and then the program will translate the numbers into words in currency.

If you like my work please send me an email at jakerpomperada@yahoo.com and jakerpomperada@gmail.com.

Thank you very much.


Sample Output of Our Program