Programming

2005/Aug/02

การใช้ภาษา C

ตัวอย่างแรก

#include<stdio.h> /*ส่วนหัว*/

#include<conio.h>/*ฟังก์ชันสำหรับเคลียหน้าจอ*/

void main()

{

cluscr();/*สำหรับเคลียหน้าจอให้ว่าง*/

printf("Hello, What your name\n");/*สำหรับแสดงข้อความออกทาง Input*/

getch();/*แสดงข้อความให้เรเห็น*/

}

การใช้ FOR

ตัวอย่างโปรแกรมสูตรคูณ

#include<stdio.h>

#include<conio.h>

viod main()

{

int a,b,i; /*ประกาศตัวแปร*/

clrscr();

printf("Enter number: "); /*แสองข้อความให้กรอกตัวเลข*/

scanf("%d",&a);/*รับตัวเลขมาเก็บไว้ในตัวแปร a*/

for(i=0 ; i<13 ; i++);/*ใช้คำสั่ง for ในการวนรอบ*/

b = a*i;/*คำนวณ*/

printf("%d x %d = %d \n",a,i,b);/*แสดงผลการคำนวณ*/

getch();

}

ตัวอย่างการหาพื้นที่วงกลม

/* Area Circle Program */

#include<stdio.h>

#include<conio.h>

void main()

{

float r,area;

clrscr();

printf("Enter Radial = ");

scanf("%f",&r);

area = 3.14*r;

printf("Area Circle = %f",area);

getch();

}

ตัวอย่างการหาพื้นที่สามเหลี่ยม

#include<stdio.h>

#include<conio.h>

void main()

{

float higt,bass,area;

clrscr();

printf("Enter High Triangle = ");

scanf("%f",&high);

ptintf("Enter Bass Triangle = ");

scanf("%s",&bass);

area = 0.5*high*bass;

printf("Area Triangle %f",area);

getch();

}


NEXT>




2005/Aug/02

ความรู้พื้นฐาน Visual Basic

If...Then...Else ตัดสินใจสองทางเลือก

รูปแบบ

if<ทดสอบเงื่อนไข> Then

ทำงาน

Else

ทำงาน

End if


เช่น Private Sub mcd OK_Click()

Dim salary As Integer

salary = Clng(txt Salary.Text)

if salary >10000 Then

MsgBox " ข้อความ",vbOK Only + vb Exclamation,"ข้อความ"

Else

MsgBox

End if

End Sub


Select...Case ตัดสินใจมากกว่าสองทางเลือก

Privatee Sub cmdOK_Click()

Dim age As Integer

age = Clnt(txtAge.Tex)

Salect Case age

Case 1 to 2

MsgBox "ข้อความ", Vb OK Only + Vb Information","

Case Else

End Select


การประกาศตัวแปร

รูปแบบ

Dim ชื่อตัวแปร As ชนิดตัวแปร,ชื่อตัวแปร As ชนิดตัวแปร

เช่น

Dim staVar As Tsting, intVar As Integer , IngVar As Long

staVar = 1

intVar = 127

ingVar = 8000


การวนซ้ำ (Iteration) For....Next

รูปแบบ

for ตัวแปรใช้นับจำนวนรอบ = จำนวนรอบเริ่มต้นTo จำนวนรอบสุดท้าย

เช่น

Private Sub cmd Start_ Click()

Dim num As Integer

num = Clnt(TxtInput. Text)

if num <1 or num > 9 Then

MsgBox "ข้อความ", vb OkOnly + vbExclamation,"ข้อความ"

Exit Sub

Else

TxtResult.Text = ""

for i=1 To num

for j=1 To

txt Rusult = txtResult & CStr(i) &""

Next j

txtResult = txtResult + vbCrLf

Next i

Enf If

Ebd Sub


2005/Aug/02

ความรู้เกี่ยวกับภาษา HTML

HTML เป็นภาษาที่ใช้สำหรับการเขียนเว็บเพจ ทุกเว็บเพจจะมีแท็ก<HTML> ทางด้านบนและ</HTML> อยู่ทางด้านล่าง และมีตัวอักษร แท็ก <HTML></HTML> ครอบคลุมข้อมูลเกี่ยวกับเว็บ ชื่อข้อมูล แท็ก<BODY></BODY> จะครอบคลุมข้อความและรูปภาพทั้งหมด ทำงานป็นคู่ปิดหัวและทาย เช่น <B> Motezone </B>

<html>

<head>

<title> Motezone </title>

</head>

<body>

This is my web page

</body>

</html>


<html></html> เว็บเพจของคุณเจียนด้วยภาษา html

<head></head>จะอยู่ล่าง html จะปรักอบด้วยข้อมูลเกยี่วกับเอกสาร

<title></title> กำหนดเรื่องเว็บเพจ จะปรากฎในแถบไตเติลของบราวเซอร์

<body></body> ข้อความและรูปภาพทั้งหมด รวมทั้ง html ที่ใช้จัดรูปแบบ

<h1></h1>ถึง <h6></h6> กำหนดขนาดตัวอักษร h1ใหญ่สุด h6เล็กสุด

<center></center> จัดต่ำแหน่งข้อความ รูปภาพ ตาราง อื่นๆ

<br> ขึ้นบันทัดใหม่

<p></p> ย่อหน่าใหม่

<i></i> ตัวอักษรเอียง

<b></b> อักษรหน่า

<img SRC ="ชื่อแฟ้มข้อมูล"> แทรกรูปภาพ

<font color="#0000"> การใช้สี

< u> ข้อความ < /u> คำสั่งที่ให้ตัวอักษรขีดเส้นใต้

< font size=2> ข้อความ < /font> ขนาดปกติ