You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
30 lines
524 B
30 lines
524 B
#COMPILE EXE
|
|
#DIM ALL
|
|
|
|
#INCLUDE "libxlw.inc"
|
|
|
|
|
|
FUNCTION PBMAIN () AS LONG
|
|
DIM book AS BookHandle
|
|
book = xlCreateBook()
|
|
|
|
IF(book) THEN
|
|
DIM sheet AS SheetHandle
|
|
sheet = xlBookAddSheet(book, UCODE$("sheet1") , 0)
|
|
END IF
|
|
'if(sheet)
|
|
'{
|
|
xlSheetWriteStr(sheet, 2, 2, UCODE$("AEHello, World !"), 0)
|
|
xlSheetWriteNum(sheet, 3, 1, 1000, 0)
|
|
'}
|
|
|
|
|
|
|
|
|
|
xlBookSave(book, UCODE$("example.xls"))
|
|
MSGBOX("File Written")
|
|
xlBookRelease(book)
|
|
|
|
|
|
|
|
END FUNCTION
|
|
|