Visual Basic for Applications (VBA) คือการใช้ภาษาวิชวลเบสิกในการเขียนโค้ดควบคุมโปรแกรมประยุกต์อื่นๆ เช่น ไมโครซอฟท์ ออฟฟิศ ออโตแคด เป็นต้น
ตัวอย่าง
ใช้ภาษา VBA ในการเลือกข้อมูลจากตารางในไมโครซอฟท์ เอกซ์เซล: '''Sub''' LoopTableExample
'''Dim''' db As DAO.Database
'''Dim''' rs As DAO.Recordset
'''Set''' db = CurrentDb
'''Set''' rs = db.OpenRecordset("SELECT * FROM tblMain")
'''Do Until''' rs.EOF
MsgBox rs!FieldName
rs.MoveNext
'''Loop'''
rs.Close
db.Close
'''Set''' rs = '''Nothing'''
'''Set''' db = '''Nothing'''
'''End Sub'''
VBA ยังสามารถสร้างฟังก์ชันของผู้ใช้ (User Defined Function : UDF) ที่ใช้ในไมโครซอฟท์ เอกซ์เซล:Public Function BUSINESSDAYPRIOR(dt As Date) As Date
Select Case Weekday(dt, vbMonday)
Case 1
BUSINESSDAYPRIOR = dt -3
Case 7
BUSINESSDAYPRIOR = dt -2
Case Else
BUSINESSDAYPRIOR = dt -1
End Select
End Function
วันจันทร์ที่ 14 กันยายน พ.ศ. 2552
สมัครสมาชิก:
บทความ (Atom)