OpenOffice Basic

OpenOffice Basic (trước đây được gọi là StarOffice Basic hoặc StarBasic hoặc OOoBasic) là một phiên bản của ngôn ngữ lập trình BASIC ban đầu là một phần của bộ ứng dụng văn phòng StarOffice và sau này được đưa sang OpenOffice.org cũng như các phân nhánh của nó như LibreOffice (ở đây nó được gọi là LibreOffice Basic).

Mặc dù OpenOffice Basic là một phiên bản tương tự như các phiên bản khác của ngôn ngữ BASIC,như VBA của Microsoft, giao diện lập trình ứng dụng(API) là rất khác, như ví dụ dưới đây của một macro minh họa. Trong khi có một cách dễ dàng hơn để có thể " đếm số đoạn văn" của một tài liệu, tví dụ cho thấy các phương pháp cơ bản để truy cập mỗi đoạn văn trong một tài liệu văn bản, liên tục.

Sub ParaCount
'
' Count number of paragraphs in a text document
'
    Dim Doc As Object, Enum As Object, TextEl As Object, Count As Long
    Doc = ThisComponent
' Is this a text document?
    If Not Doc.SupportsService("com.sun.star.text.TextDocument") Then
        MsgBox "This macro must be run from a text document", 64, "Error"
        Exit Sub
    End If
    Count = 0
' Examine each component - paragraph or table?
    Enum = Doc.Text.CreateEnumeration
    While Enum.HasMoreElements
        TextEl = Enum.NextElement
' Is the component a paragraph?
        If TextEl.SupportsService("com.sun.star.text.Paragraph") Then
            Count = Count + 1
        End If
    Wend
'Display result
    MsgBox Count, 0, "Paragraph Count"
End Sub
  • So sánh các bộ ứng dụng văn phòng

Đọc thêm

[sửa | sửa mã nguồn]
  • Steinberg, James. Open Office Basic: An Introduction. CreateSpace Independent Publishing Platform. ISBN 978-1481270939.

Tham khảo

[sửa | sửa mã nguồn]

Liên kết ngoài

[sửa | sửa mã nguồn]
BASIC Macros
OpenOffice.org API
Chúng tôi bán
Bài viết liên quan
Dự đoán Thế cục của Tensura sau Thiên ma đại chiến.
Dự đoán Thế cục của Tensura sau Thiên ma đại chiến.
Leon với kiểu chính sách bế quan tỏa cảng nhiều năm do Carrera thì việc có tham gia đổi mới kinh tế hay không phải xem chính sách của ông này
Hoa thần Nabu Malikata - Kiều diễm nhân hậu hay bí hiểm khó lường
Hoa thần Nabu Malikata - Kiều diễm nhân hậu hay bí hiểm khó lường
Đây là một theory về chủ đích thật sự của Hoa Thần, bao gồm những thông tin chúng ta đã biết và thêm tí phân tích của tui nữa
Cold  Eyes - Truy lùng siêu trộm
Cold Eyes - Truy lùng siêu trộm
Cold Eyes là một bộ phim hành động kinh dị của Hàn Quốc năm 2013 với sự tham gia của Sol Kyung-gu, Jung Woo-sung, Han Hyo-joo, Jin Kyung và Lee Junho.
You Raise Me Up - Học cách sống hạnh phúc dù cuộc đời chỉ đạt 20 - 30 điểm
You Raise Me Up - Học cách sống hạnh phúc dù cuộc đời chỉ đạt 20 - 30 điểm
Đây là một cuộc hành trình để lấy lại sự tự tin cho một kẻ đã mất hết niềm tin vào chính mình và cuộc sống