Today's Date in Visual Basic.NET

A very simple program that I wrote using Microsoft Visual Basic NET to display the current date.

I am currently accepting programming work inventory system, enrollment system, accounting system, payroll system, information system, website design and development using WordPress, IT projects, school and application development, programming projects, thesis, and capstone projects, IT consulting work, computer tutorials, and web development work kindly contact me in the following email address for further details. If you want to advertise on my website kindly contact me also in my email address also. Thank you.

My email address is the following jakerpomperada@gmail.com, jakerpomperada@aol.com, and jakerpomperada@yahoo.com.My mobile number here in the Philippines is 09173084360. My telephone number at home here in Bacolod City, Negros Occidental Philippines is +63 (034) 4335675.

Here in Bacolod City, Negros Occidental I also accepting computer repair, web development using WordPress, Computer Networking, and Arduino Project development at a very affordable price. My personal website is http://www.jakerpomperada.com



Sample Program Output


Program Listing

Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim dt As Date = Today
        Label1.Text = "Today is " & dt
    End Sub
End Class





Product of Two Numbers in Visual Basic 6

A simple program that I wrote to ask the user to give two numbers and then the program will compute the product of two numbers using Microsoft Visual Basic 6.

I am currently accepting programming work inventory system, enrollment system, accounting system, payroll system, information system, website design and development using WordPress, IT projects, school and application development, programming projects, thesis, and capstone projects, IT consulting work, computer tutorials, and web development work kindly contact me in the following email address for further details. If you want to advertise on my website kindly contact me also in my email address also. Thank you.

My email address is the following jakerpomperada@gmail.com, jakerpomperada@aol.com, and jakerpomperada@yahoo.com.My mobile number here in the Philippines is 09173084360. My telephone number at home here in Bacolod City, Negros Occidental Philippines is +63 (034) 4335675.

Here in Bacolod City, Negros Occidental I also accepting computer repair, web development using WordPress, Computer Networking, and Arduino Project development at a very affordable price. My personal website is http://www.jakerpomperada.com



Sample Program Output


Program Listing

Private Sub Command1_Click()
Dim a, b, product As Integer

a = Val(Form1.Text1(0).Text)
b = Val(Form1.Text1(1).Text)

product = (a * b)

MsgBox ("The product of " & a & " and " & b & " is " & product & ".")
End Sub

Private Sub Command2_Click()
Form1.Text1(0).Text = ""
Form1.Text1(1).Text = ""
Form1.Text1(0).SetFocus
End Sub

Private Sub Command3_Click()
End
End Sub


Sum of Two Numbers in VB.NET

Write a program using Visual Basic.NET to ask the user to give two numbers and then the program will compute the sum of two numbers and display the results on the screen. Using Graphical User 
Interface.

I am currently accepting programming work inventory system, enrollment system, accounting system, payroll system, information system, website design and development using WordPress, IT projects, school and application development, programming projects, thesis, and capstone projects, IT consulting work, computer tutorials, and web development work kindly contact me in the following email address for further details. If you want to advertise on my website kindly contact me also in my email address also. Thank you.

My email address is the following jakerpomperada@gmail.com, jakerpomperada@aol.com, and jakerpomperada@yahoo.com.My mobile number here in the Philippines is 09173084360. My telephone number at home here in Bacolod City, Negros Occidental Philippines is +63 (034) 4335675.

Here in Bacolod City, Negros Occidental I also accepting computer repair, web development using WordPress, Computer Networking, and Arduino Project development at a very affordable price. My personal website is http://www.jakerpomperada.com

My programming website is http://www.jakerpomperada.blogspot.comI am also a book author you can purchase my books on computer programming and information technology in the following links below. https://www.unlimitedbooksph.com/


Sample Program Output


Program Listing

Public Class Form1

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        If TextBox1.Text = "" Or IsNumeric(TextBox1.Text) = False Then
            MessageBox.Show("Please enter a numeric value.")
            TextBox1.Focus()
        ElseIf TextBox2.Text = "" Or IsNumeric(TextBox2.Text) = False Then
            MessageBox.Show("Please enter a numeric value.")
            TextBox2.Focus()
        Else
            Dim sum As Integer = 0
            Dim a As Integer = 0
            Dim b As Integer = 0

            a = Val(TextBox1.Text)
            b = Val(TextBox2.Text)
            sum = a + b

            MessageBox.Show("The sum of " & a & " and " & b & " is " & sum & ".")
        End If
    End Sub

    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        TextBox1.Text = ""
        TextBox2.Text = ""
        TextBox1.Focus()
    End Sub

    Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
        End
    End Sub
End Class





Monday, July 27, 2020

Student Grading System in C

A simple program that I wrote using C programming language I called this program student grading system.

I am currently accepting programming work inventory system, enrollment system, accounting system, payroll system, information system, website design and development using WordPress, IT projects, school and application development, programming projects, thesis, and capstone projects, IT consulting work, computer tutorials, and web development work kindly contact me in the following email address for further details. If you want to advertise on my website kindly contact me also in my email address also. Thank you.

My email address is the following jakerpomperada@gmail.com, jakerpomperada@aol.com, and jakerpomperada@yahoo.com.My mobile number here in the Philippines is 09173084360. My telephone number at home here in Bacolod City, Negros Occidental Philippines is +63 (034) 4335675.

Here in Bacolod City, Negros Occidental I also accepting computer repair, web development using WordPress, Computer Networking, and Arduino Project development at a very affordable price. My personal website is http://www.jakerpomperada.com

My programming website is http://www.jakerpomperada.blogspot.comI am also a book author you can purchase my books on computer programming and information technology in the following links below. https://www.unlimitedbooksph.com/



Sample Program Output


Program Listing

#include <stdio.h>

#define PRELIM_PERCENTAGE   0.20
#define MIDTERM_PERCENTAGE  0.30
#define ENDTERM_PERCENTAGE  0.50

int main()
{   
    char student[200];
char subject[100];
    float  solve_grade = 0.00;
    int prelim=0,midterm=0,endterm=0;
    float pre=0.00,mid=0.00,end=0.00;
    
    printf("\n\n");
printf("\tStudent Grading System in C");
printf("\n\n");
printf("\tStudent's Name  : ");
    gets(student);
    printf("\n");
printf("\tSubject Taken   : ");
    gets(subject);
  printf("\n");
printf("\tPrelim Grade    : ");
    scanf("%d",&prelim);
    printf("\tMidterm Grade   : ");
    scanf("%d",&midterm);
    printf("\tEndterm Grade   : ");
    scanf("%d",&endterm);

    /* Compute the student's grade */
    
    pre = (prelim * PRELIM_PERCENTAGE);
    mid = (midterm * MIDTERM_PERCENTAGE);
    end = (endterm * ENDTERM_PERCENTAGE);
        
    solve_grade = (pre + mid + end);
    
printf("\n\n");
printf("\t===== DISPLAY RESULT =====");
printf("\n\n");
printf("\tStudent's' Name     : %s",student);
printf("\n");
printf("\tSubject    Taken    : %s",subject);
printf("\n");
printf("\tSubject    Grade    : %2.0f",solve_grade);
printf("\n\n");
printf("\tEnd of Program");
printf("\n");
}





Payroll Program in C

A simple payroll program that I wrote using the C programming language.

I am currently accepting programming work inventory system, enrollment system, accounting system, payroll system, information system, website design and development using WordPress, IT projects, school and application development, programming projects, thesis, and capstone projects, IT consulting work, computer tutorials, and web development work kindly contact me in the following email address for further details. If you want to advertise on my website kindly contact me also in my email address also. Thank you.

My email address is the following jakerpomperada@gmail.com, jakerpomperada@aol.com, and jakerpomperada@yahoo.com.My mobile number here in the Philippines is 09173084360. My telephone number at home here in Bacolod City, Negros Occidental Philippines is +63 (034) 4335675.

Here in Bacolod City, Negros Occidental I also accepting computer repair, web development using WordPress, Computer Networking, and Arduino Project development at a very affordable price. My personal website is http://www.jakerpomperada.com

My programming website is http://www.jakerpomperada.blogspot.comI am also a book author you can purchase my books on computer programming and information technology in the following links below. https://www.unlimitedbooksph.com/



Sample Program Output


Program Listing

#include <stdio.h>

#define RATE_PER_DAY 84.50

int main()
{   
    char emp_name[200];
int days = 0;
    float  solve_salary = 0.00;
    printf("\n\n");
printf("\tPayroll Program in C");
printf("\n\n");
printf("\tEmployee's Name  : ");
    gets(emp_name);
printf("\tNo. Day's Worked : ");
    scanf("%d",&days);

    /* Compute the employee's salary */
    
    solve_salary = (days *  RATE_PER_DAY); 
    
printf("\n\n");
printf("\t===== DISPLAY RESULT =====");
printf("\n\n");
printf("\tEmployee's' Name     : %s",emp_name);
printf("\n");
printf("\tEmployee's Salary    : PHP %5.2f.",solve_salary);
printf("\n\n");
printf("\tEnd of Program");
printf("\n");
}


Sum and Product of Numbers in C

A simple program that I wrote using a C programming language to ask the user to give two numbers and then the program will sum and compute the product of the two given numbers and display the results in the screen.

I am currently accepting programming work inventory system, enrollment system, accounting system, payroll system, information system, website design and development using WordPress, IT projects, school and application development, programming projects, thesis, and capstone projects, IT consulting work, computer tutorials, and web development work kindly contact me in the following email address for further details. If you want to advertise on my website kindly contact me also in my email address also. Thank you. My email address is the following jakerpomperada@gmail.com, jakerpomperada@aol.com, and jakerpomperada@yahoo.com.My mobile number here in the Philippines is 09173084360. My telephone number at home here in Bacolod City, Negros Occidental Philippines is +63 (034) 4335675. Here in Bacolod City, Negros Occidental I also accepting computer repair, web development using WordPress, Computer Networking, and Arduino Project development at a very affordable price. My personal website is http://www.jakerpomperada.comMy programming website is http://www.jakerpomperada.blogspot.comI am also a book author you can purchase my books on computer programming and information technology in the following links below. https://www.unlimitedbooksph.com/



Sample Program Output

Program Listing


#include <stdio.h>

int main()
{   
    int a=0,b=0,sum=0,product=0;
    printf("\n\n");
printf("\tSum and Product of Numbers in C");
printf("\n\n");
printf("\tGive Two Numbers : ");
    scanf("%d%d",&a,&b);

    /* Compute Sum and Product of Two Numbers */
    
    sum = (a + b);
product = (a * b); 
    
printf("\n\n");
printf("\t===== DISPLAY RESULTS =====");
printf("\n\n");
printf("\tThe sum of %d and %d is %d.",a,b,sum);
printf("\n");
printf("\tThe product of %d and %d is %d.",a,b,product);
printf("\n\n");
printf("\tEnd of Program");
printf("\n");
}




Thursday, July 23, 2020

Addition of Two Numbers in Golang

Here is a simple program to ask the user to give two numbers and then the program will compute the sum of two numbers and display the results using Golang programming language.

I am currently accepting programming work inventory system, enrollment system, accounting system, payroll system, information system, website design and development using WordPress, IT projects, school and application development, programming projects, thesis, and capstone projects, IT consulting work, computer tutorials, and web development work kindly contact me in the following email address for further details. If you want to advertise on my website kindly contact me also in my email address also. Thank you.

My email address is the following jakerpomperada@gmail.com, jakerpomperada@aol.com, and jakerpomperada@yahoo.com.My mobile number here in the Philippines is 09173084360. My telephone number at home here in Bacolod City, Negros Occidental Philippines is +63 (034) 4335675.

Here in Bacolod City, Negros Occidental I also accepting computer repair, web development using WordPress, Computer Networking, and Arduino Project development at a very affordable price. My personal website is http://www.jakerpomperada.com

My programming website is http://www.jakerpomperada.blogspot.comI am also a book author you can purchase my books on computer programming and information technology in the following links below. https://www.unlimitedbooksph.com/


Sample Program Output

Program Listing

addition.go

// addition.go
// Author  : Jake Rodriguez Pomperada,MAED-IT,MIT
// Date    : July 23, 2020  Thursday   10:01 PM
// Website : http://www.jakerpomperada.com
// Email   : jakerpomperada@gmail.com and jakerpomperada@yahoo.com

package main
 
import "fmt"
     
func main(){
     
    var n1 int 
    var n2 int 
        
    fmt.Print("\n\n")
    fmt.Print("\tAddition of Two Numbers in Golang")
    fmt.Print("\n\n")
    fmt.Print("\tEnter first number: ") 
    fmt.Scanln(&n1) // take input from user 
    fmt.Print("\tEnter Second number: ") 
    fmt.Scanln(&n2) // take input from user 
   
    result := n1 + n2 
   
    fmt.Print("\n")
    fmt.Println("\tThe sum of",n1,"and",n2, "is",result,".") 
    fmt.Print("\n\n")
    fmt.Print("\tEnd of Program")
    fmt.Print("\n")
}



Wednesday, July 22, 2020

Volume of a Sphere Converter in C

A simple program that I wrote using C programming language to compute the volume of a sphere.

I am currently accepting programming work inventory system, enrollment system, accounting system, payroll system, information system, website design and development using WordPress, IT projects, school and application development, programming projects, thesis, and capstone projects, IT consulting work, computer tutorials, and web development work kindly contact me in the following email address for further details. If you want to advertise on my website kindly contact me also in my email address also. Thank you.

My email address is the following jakerpomperada@gmail.com, jakerpomperada@aol.com, and jakerpomperada@yahoo.com.My mobile number here in the Philippines is 09173084360. My telephone number at home here in Bacolod City, Negros Occidental Philippines is +63 (034) 4335675.

Here in Bacolod City, Negros Occidental I also accepting computer repair, web development using WordPress, Computer Networking, and Arduino Project development at a very affordable price. My personal website is http://www.jakerpomperada.com

My programming website is http://www.jakerpomperada.blogspot.com I am also a book author you can purchase my books on computer programming and information technology in the following links below. https://www.unlimitedbooksph.com/



Sample Program Output

Program Listing

#include <stdio.h>

#define PI  3.14

int main()
{   
    float volume_sphere = 0.00;
    float radius = 0.00;
    printf("\n\n");
printf("\tVolume of a Sphere Converter");
printf("\n\n");
printf("\tEnter Radius Value : ");
    scanf("%f",&radius);

    /* Compute the volume of Sphere */
    
    volume_sphere = (4.0/3.0)*(PI*radius*radius*radius);
    
printf("\n\n");
printf("\tThe Volume of Sphere is %5.2f.",volume_sphere);
printf("\n\n");
printf("\tEnd of Program");
printf("\n");
}



US Dollar To Philippine Peso Converter in C

I wrote this simple program to ask the user to give US dollar values and then the program will convert the given us dollar values into Philippine peso equivalent.

I am currently accepting programming work inventory system, enrollment system, accounting system, payroll system, information system, website design and development using WordPress, IT projects, school and application development, programming projects, thesis, and capstone projects, IT consulting work, computer tutorials, and web development work kindly contact me in the following email address for further details. If you want to advertise on my website kindly contact me also in my email address also. Thank you.

My email address is the following jakerpomperada@gmail.com, jakerpomperada@aol.com, and jakerpomperada@yahoo.com.My mobile number here in the Philippines is 09173084360. My telephone number at home here in Bacolod City, Negros Occidental Philippines is +63 (034) 4335675.

Here in Bacolod City, Negros Occidental I also accepting computer repair, web development using WordPress, Computer Networking, and Arduino Project development at a very affordable price. My personal website is http://www.jakerpomperada.com

My programming website is http://www.jakerpomperada.blogspot.comI am also a book author you can purchase my books on computer programming and information technology in the following links below. https://www.unlimitedbooksph.com/



                                                         Sample Program Output


Program Listing

#include <stdio.h>

#define PHIL_PESO  50.74

int main()
{   
    float convert = 0.00, us_dollar = 0.00;
   
    printf("\n\n");
printf("\tUS Dollar To Philippine Peso Converter");
printf("\n\n");
printf("\tEnter US Dollar Value : ");
scanf("%f",&us_dollar);
convert = (us_dollar *  PHIL_PESO);
  
printf("\n\n");
printf("\tThe value of $%2.2f US Dollars in ",us_dollar);
printf("Philippine Peso is PHP %2.2f.",convert);
printf("\n\n");
printf("\tEnd of Program");
printf("\n");
}



Tuesday, July 21, 2020

Greet a Person in Pascal

I simple program to ask the user to give a name and then the program will greet the person using Pascal programming language. I am currently accepting programming work inventory system, enrollment system, accounting system, payroll system, information system, website design and development using WordPress, IT projects, school and application development, programming projects, thesis, and capstone projects, IT consulting work, computer tutorials, and web development work kindly contact me in the following email address for further details. If you want to advertise on my website kindly contact me also in my email address also. Thank you. My email address is the following jakerpomperada@gmail.com, jakerpomperada@aol.com, and jakerpomperada@yahoo.com.My mobile number here in the Philippines is 09173084360. My telephone number at home here in Bacolod City, Negros Occidental Philippines is +63 (034) 4335675. Here in Bacolod City, Negros Occidental I also accepting computer repair, web development using WordPress, Computer Networking, and Arduino Project development at a very affordable price. My personal website is http://www.jakerpomperada.comMy programming website is http://www.jakerpomperada.blogspot.comI am also a book author you can purchase my books on computer programming and information technology in the following links below. https://www.unlimitedbooksph.com/

Program Listing

program Greet_Person; Uses Crt; Var person : String[100]; begin Clrscr; Gotoxy(25,2); Write('Greet a Person in Pascal'); Writeln; Writeln; Write('What is your name? '); Readln(person); Writeln; Writeln; Write('Hello ',person,' How are you today?'); Writeln; Readln; end.

Sunday, July 19, 2020

Multiplication Table in Pascal

I wrote this program to display a multiplication table using the Pascal programming language. I am using Free Pascal in writing this program.

I am currently accepting programming work inventory system, enrollment system, accounting system, payroll system, information system, website design and development using WordPress, IT projects, school and application development, programming projects, thesis, and capstone projects, IT consulting work, computer tutorials, and web development work kindly contact me in the following email address for further details. If you want to advertise on my website kindly contact me also in my email address also. Thank you.


My email address is the following jakerpomperada@gmail.com, jakerpomperada@aol.com, and jakerpomperada@yahoo.com.My mobile number here in the Philippines is 09173084360. My telephone number at home here in Bacolod City, Negros Occidental Philippines is +63 (034) 4335675.
 

Here in Bacolod City, Negros Occidental I also accepting computer repair, web development using WordPress, Computer Networking, and Arduino Project development at a very affordable price. My personal website is http://www.jakerpomperada.comMy programming website is http://www.jakerpomperada.blogspot.comI am also a book author you can purchase my books on computer programming and information technology in the following links below.

https://www.unlimitedbooksph.com/

Program Listing

program multiplication_table;
Uses Crt;

 Var row,column : integer;

begin
   row := 0; column := 0;
   Clrscr;
   gotoxy(12,2);
   Write('Multiplication Table in Pascal');
   Writeln; Writeln;

    For row := 1 to 12 Do
      Begin
         For column := 1 to 12 Do
            Begin
               write(row * column:4);
            end;
            writeln;
      end;

    Writeln;
    Gotoxy(17,17);
    Write('End of Program');
    Readln;
end.

Hello World in Pascal

A simple program that I wrote using Pascal programming language to display a hello world message on the screen. I am using Free Pascal as my Pascal compiler in writing this program and Lazarus IDE as my text editor.

I am currently accepting programming work inventory system, enrollment system, accounting system, payroll system, information system, website design and development using WordPress, IT projects, school and application development, programming projects, thesis, and capstone projects, IT consulting work, computer tutorials, and web development work kindly contact me in the following email address for further details. If you want to advertise on my website kindly contact me also in my email address also. Thank you.


My email address is the following jakerpomperada@gmail.com, jakerpomperada@aol.com, and jakerpomperada@yahoo.com.My mobile number here in the Philippines is 09173084360. My telephone number at home here in Bacolod City, Negros Occidental Philippines is +63 (034) 4335675.


Here in Bacolod City, Negros Occidental I also accepting computer repair, web development using WordPress, Computer Networking, and Arduino Project development at a very affordable price. My personal website is http://www.jakerpomperada.comMy programming website is http://www.jakerpomperada.blogspot.comI am also a book author you can purchase my books on computer programming and information technology in the following links below.

https://www.unlimitedbooksph.com/

Program Listing

program hello_world;
Uses Crt;

begin
  Clrscr;
  Gotoxy(28,12);
  Write('Hello World in Pascal Programming Language.');
  Readln;
end.
                                  

Factors Finder of a Number in VB.NET

I this article I would like to share with you how to write factor finders of a number in vb.net.  This is a program that can find factors of a number entered by the user and display them in a list box.

I am currently accepting programming work inventory system, enrollment system, accounting system, payroll system, information system, website design and development using WordPress, IT projects, school and application development, programming projects, thesis, and capstone projects, IT consulting work, computer tutorials, and web development work kindly contact me in the following email address for further details. If you want to advertise on my website kindly contact me also in my email address also. Thank you.

My email address is the following jakerpomperada@gmail.com, jakerpomperada@aol.com, and jakerpomperada@yahoo.com.My mobile number here in the Philippines is 09173084360. My telephone number at home here in Bacolod City, Negros Occidental Philippines is +63 (034) 4335675.

Here in Bacolod City, Negros Occidental I also accepting computer repair, web development using WordPress, Computer Networking, and Arduino Project development at a very affordable price. My personal website is http://www.jakerpomperada.comMy programming website is http://www.jakerpomperada.blogspot.comI am also a book author you can purchase my books on computer programming and information technology in the following links below.https://www.unlimitedbooksph.com/



Sample Program Output


Program Listing

Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim N, x As Integer
        N = Val(TextBox1.Text)
        For x = 2 To N - 1
            If N Mod x = 0 Then
                ListBox1.Items.Add(x)
            End If
        Next
        ListBox1.Items.Add(N)
    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        ListBox1.Items.Clear()
        TextBox1.Text = ""
        TextBox1.Focus()
    End Sub

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

End Class




Remove Horizontal Tab in C

A program was written by my friend and fellow software engineer named Tom. Thank you Tom for sharing your code to us. This program will remove the horizontal tab and replace it with space using a C programming language.

I am currently accepting programming work inventory system, enrollment system, accounting system, payroll system, information system, website design and development using WordPress, IT projects, school and application development, programming projects, thesis, and capstone projects, IT consulting work, computer tutorials, and web development work kindly contact me in the following email address for further details. If you want to advertise on my website kindly contact me also in my email address also. Thank you.

My email address is the following jakerpomperada@gmail.com, jakerpomperada@aol.com, and jakerpomperada@yahoo.com.My mobile number here in the Philippines is 09173084360. My telephone number at home here in Bacolod City, Negros Occidental Philippines is +63 (034) 4335675.

Here in Bacolod City, Negros Occidental I also accepting computer repair, web development using WordPress, Computer Networking, and Arduino Project development at a very affordable price. My personal website is http://www.jakerpomperada.comMy programming website is http://www.jakerpomperada.blogspot.comI am also a book author you can purchase my books on computer programming and information technology in the following links below.https://www.unlimitedbooksph.com/


Program Listing

#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <stdbool.h>
#include <stdint.h>
#include <ctype.h>
#include <assert.h>

#include "debug.h"

void expand_tabs(char *src, char *dest, size_t nrepeat)
{
   assert(src != NULL);
   assert(dest != NULL);
   assert(nrepeat > 0);

   while (*src)
   {
     if (*src == '\t')
     {
       for (size_t i = 0; i < nrepeat; ++i)
         *dest++ = ' ';

       *src++;
     }
     else
     {
       *dest++ = *src++;
     }
   }
   *dest = '\0';
}

int main()
{
   char org_text[] = "1\t2\t3";
   char mod_text[sizeof(org_text) * 3 + 1] = {'\0'};

   puts("Tabs to spaces:");
   printf("Original text: %s\n", org_text);
   expand_tabs(org_text, mod_text, sizeof(org_text), 2);
   printf("Modified text: %s\n", mod_text);
}



Wednesday, July 8, 2020

Text File To RTF in C

A program was written by Ben a.k.a DreamVB that I like to share a small tool to convert text files to RTF files using a C programming language.

I am currently accepting programming work inventory system, enrollment system, accounting system, payroll system, information system, website design and development using WordPress, IT projects, school and application development, programming projects, thesis, and capstone projects, IT consulting work, computer tutorials, and web development work kindly contact me in the following email address for further details. If you want to advertise on my website kindly contact me also in my email address also. Thank you.

My email address is the following jakerpomperada@gmail.com, jakerpomperada@aol.com, and jakerpomperada@yahoo.com.My mobile number here in the Philippines is 09173084360. My telephone number at home here in Bacolod City, Negros Occidental Philippines is +63 (034) 4335675.

Here in Bacolod City, Negros Occidental I also accepting computer repair, web development using WordPress, Computer Networking, and Arduino Project development at a very affordable price. My personal website is http://www.jakerpomperada.com

My programming website is http://www.jakerpomperada.blogspot.comI am also a book author you can purchase my books on computer programming and information technology in the following links below.https://www.unlimitedbooksph.com/

Program Listing

/*
  TXT2RTF
  A small tool to convert text files to RTF files.

  Author:    Ben a.k.a DreamVB
  Version:   1.0
  Type:      Open Source
  Contact:   dreamvb@outlook.com {for any questions regarding this program}
*/
#define _CRT_SECURE_NO_WARNINGS
#include <stdio.h>
#include <stdlib.h>
#include <string.h>

#define EXIT_IF(cnd) {if((cnd)) perror(NULL); exit(EXIT_FAILURE);}

void process_char(FILE* output, char ch)
{
  switch(ch)
  {
    case '\r':
      fputs("\\par", output);
      fputc('\r', output);
      break;
    case '\n':
      fputc(ch, output);
      break;
    case '\t':
      fputs("\\tab ", output);
      break;
    case '\\':
      fputs("\\\\", output);
      break;
    case '{':
      fputc('\\', output);
      fputc(ch, output);
      break;
    case '}':
      fputc('\\', output);
      fputc(ch, output);
      break;
    default:
      if ((ch >= 0x20 && (ch <= 0x7F)))
      {
        fputc(ch, output);
      }
      else
      {
        fputs("\\'", output);
        fprintf(output, "%02X", ch);
      }
  }
}

void process_files(FILE* input, FILE* output)
{
  int ch;
  while ((ch = fgetc(input)) != EOF)
  {
    process_char(output, ch);
  }
}

void print_header(FILE* fout, char *font_name, char *font_size)
{
  fputs("{\\rtf1\\ansi\\deff0\\nouicompat{\\fonttbl{\\f0\\fnil\\fcharset0 ", fout);
  fputs(font_name, fout);
  fputs(";}}\r\n", fout);
  fputs("{\\*\\generator DM TXT2RTF 1.0}\\viewkind4\\uc1 \r\n", fout);
  fputs("\\pard\\", fout);
  fputs("fs", fout);
  fputs(font_size, fout);
  fputs("\\lang2057 ", fout);
}

void print_footer(FILE* fout)
{
  fputs("\\par\r\n}\r\n", fout);
  fputc(0, fout);
}

int main(int argc, char* argv[])
{
  FILE *fin = NULL;
  FILE *fout = NULL;
  char sFont[30] = "Consolas";
  char sFontsize[10] = "11";

  if (argc < 3)
  {
    printf("Usage: <InFile> <OutFile> [FontName] [FontSize]\n");
    return 0;
  }

  fin = fopen(argv[1], "rb");
  EXIT_IF(fin == NULL);

  fout = fopen(argv[2], "wb");
  EXIT_IF(fout==NULL);

  if (argc == 4)
    strncpy(sFont, argv[3], sizeof(sFont)-1);

  if (argc == 5)
    strncpy(sFontsize, argv[4], sizeof(sFontsize)-1);

  print_header(fout, sFont, sFontsize);
  process_files(fin, fout);
  print_footer(fout);

  fclose(fin);
  fclose(fout);
  system(argv[2]);
  return 1;
}


Monday, July 6, 2020

CRUD Using AngularJS and Visual Basic 6

A CRUD program is written using AngularJS and Visual Basic 6 wrote by my best friend and fellow software engineer Sir Larry Dave Emol. Thank you Sir Larry.

I am currently accepting programming work inventory system, enrollment system, accounting system, payroll system, information system, website design and development using WordPress, IT projects, school and application development, programming projects, thesis, and capstone projects, IT consulting work, computer tutorials, and web development work kindly contact me in the following email address for further details. If you want to advertise on my website kindly contact me also in my email address also. Thank you.

My email address is the following jakerpomperada@gmail.com, jakerpomperada@aol.com, and jakerpomperada@yahoo.com.My mobile number here in the Philippines is 09173084360. My telephone number at home here in Bacolod City, Negros Occidental Philippines is +63 (034) 4335675.

Here in Bacolod City, Negros Occidental I also accepting computer repair, web development using WordPress, Computer Networking, and Arduino Project development at a very affordable price. My personal website is http://www.jakerpomperada.comMy programming website is http://www.jakerpomperada.blogspot.comI am also a book author you can purchase my books on computer programming and information technology in the following links below.https://www.unlimitedbooksph.com/



Calculator in HTML,CSS and JavaScript

A calculator program was written by my close friend and fellow software engineer Sir Ernel. Thank you sir for sharing your work with us.

I am currently accepting programming work inventory system, enrollment system, accounting system, payroll system, information system, website design and development using WordPress, IT projects, school and application development, programming projects, thesis, and capstone projects, IT consulting work, computer tutorials, and web development work kindly contact me in the following email address for further details. If you want to advertise on my website kindly contact me also in my email address also. Thank you.

My email address is the following jakerpomperada@gmail.com, jakerpomperada@aol.com, and jakerpomperada@yahoo.com.My mobile number here in the Philippines is 09173084360. My telephone number at home here in Bacolod City, Negros Occidental Philippines is +63 (034) 4335675.

Here in Bacolod City, Negros Occidental I also accepting computer repair, web development using WordPress, Computer Networking, and Arduino Project development at a very affordable price. My personal website is http://www.jakerpomperada.comMy programming website is http://www.jakerpomperada.blogspot.comI am also a book author you can purchase my books on computer programming and information technology in the following links below.https://www.unlimitedbooksph.com/


Program Listing

<!DOCTYPE html>
<html>
<head>
<script>

function insert(num){
document.form.textview.value=document.form.textview.value+num;
}
function equal(){
var exp=document.form.textview.value;
if(exp){
document.form.textview.value=eval(exp);
}
}

function clear(){

  document.form.textview.value="";
}

function back(){
    var exp=document.form.textview.value;
document.form.textview.value=exp.substring(0,exp.length-1);
}

</script>
<style>
.button:hover{
background:linear-gradient(#C6F8FF,#71C2FF,#2681E6,#00BDFF,#6ED0FF);
}
#c:hover{
background:linear-gradient(#C6F8FF,#71C2FF,#2681E6,#00BDFF,#6ED0FF);}
#F:hover{
background:linear-gradient(#C6F8FF,#71C2FF,#2681E6,#00BDFF,#6ED0FF)
;}
#F{
background:black;
color:white;
transition-duration:1s;
}
#c{
background:linear-gradient(#EDEDED,red,#FFB6B9);
color:white;
transition-duration:1s;
}
.button{
padding:0;
border-radius:5px;
width:50px;
height:50px;
font-size:30px;
font-weight:500px;
box-shadow:2px 1px 5px black;
background:linear-gradient(#DDDDDD,#848484,#333333,#595959,#767676);
transition-duration:1s;
color:white;
}
.end:hover{
background:linear-gradient(#C6F8FF,#71C2FF,#2681E6,#00BDFF,#6ED0FF);
}
.end{
width:50px;
height:50px; 
margin-left:60px;
width:160px;
font-size:30px;
border-radius:5px;
box-shadow:2px 1px 5px black;
background:linear-gradient(#00FFF3,#00CEFF,#0083FF,#002CFF);
color:white;
transition-duration:1s;
}
.textview{
width:210px;
margin-left:5px;
margin-top:5px;
border-radius:5px;
padding-top:0;
background:#C2E3E3;
font-size:25px;
}
table{
margin-left:4px;
}
#zero{
height:105px;
position:absolute;
left:15px;
top:225px;
font-size:30px;
}
.main{
border:2px inset black;
background:linear-gradient(#616266,#808080);
box-shadow:2px 1px 5px;
width:225px;
height:345px;
border-radius:10px;
}
.calc{
font-family:serif;
text-align:center;
background:radial-gradient(#FF7900,#F2FF00);
border-radius:50px;
border:solid 1px; 
}
</style>
</head>
<body>
<div class="main">

<form name="form">
<input class="textview" name="textview">
</form>
<table>

<tr>
<td><input type="submit" value="7" class="button" onclick="insert(7)"></td>
<td><input type="submit" value="8"   class="button" onclick="insert(8)"></td>
<td><input type="submit" value="9" class="button" onclick="insert(9)"></td>
<td> <input type="submit" value="C" class="button" onclick="back();" id="c"></td>
</tr>
<tr>
<td><input type="submit" value="4" class="button" onclick="insert(4)"></td>
<td><input type="submit" value="5" class="button" onclick="insert(5)"></td>
<td><input type="submit" value="6" class="button" onclick="insert(6)"></td>
<td><input type="submit" value="/" class="button" onclick="insert('/')" id="F"></td>
</tr>
<tr>
<td><input type="submit" value="1" class="button" onclick="insert(1)"></td>
<td><input type="submit" value="2" onclick="insert(2)" class="button"></td>
<td><input type="submit" value="3" class="button" onclick="insert(3)"></td>
<td><input type="submit" value="" class="button" onclick="insert('')" id="F"></td>
</tr>
<tr>
<td></td>
<td><input type="submit" value="0" class="button" onclick="insert(0)" ></td>
<td><input type="submit" value="-"  class="button" onclick="insert('-')" id="F"></td>
<td><input type="submit" value="+" class="button" onclick="insert('+') "id="F"></td>
</tr>
</table>

<input type="submit" value="=" class="end" onclick="equal()">
<input type="submit" value="." 
class="button" onclick="insert('.')" id="zero">
<p class="calc">Calculater</p> 
</div>
</body>
</html>