用 embedded visual basic 編寫移動應用程式
larry roof
tonked.com
2023年5月9日 本文最初發表在 msdn online voices 的 two for the road 專欄(
選擇「windows ce for the pocket pc」模板,然後單擊「開啟」按鈕。 將建立乙個新工程並將該工程載入到 evb 設計環境。
構建介面使用「窗體」視窗和「工具箱」構建使用者介面,其中包括文字框、命令按鈕、定時器控制項,如下圖所示。
圖 1:「hello world」的初始窗體
使用下表配置窗體和控制項的屬性。
物件
-屬性
值
form1
- name
frmhelloworld
- caption
hello world
text1
- name
txtdisplay
- backcolor
black
- font
tahoma 22
- forecolor
green
- height
675- left
60- text
(空字串)
- top
180- width
3375
command1
- name
cmdchangedirection
- caption
改變方向
- height
255- left
60- top
960- width
3375
timer1
- name
cetimer
- enabled
false
- interval
200新增**在「工程」視窗中,選擇project1。在「屬性」視窗中,將「名稱」更改為「helloworld」。
開啟窗體模組的「**」視窗。在模組的「一般宣告」部分新增以下**行:
dim strdirection as stringdim strmessage as stringdim strtemp as string
變數 strdirection
將用於跟蹤字幕滾動的方向。變數 strmessage
將用於儲存在滾動字幕顯示區顯示的訊息。變數 strtemp
用於處理在字幕中顯示的訊息。
在 formload事件過程中插入以下**:
private sub form_load()' 初始化變數。 strdirection = "向前" strmessage = "嗨,evb 很酷吧?" strtemp = string(30, asc(" ")) & strmessage ' 啟動字幕。 cetimer.enabled = trueend sub
該**首先初始化該程式自始至終使用的三個字串變數,然後開啟定時器控制項,定時器控制項繼而執行字幕。
在定時器控制項的 timer 事件過程中插入以下**:
private sub cetimer_timer()' 根據滾動的方向,將該' 字串最左邊或最右邊的字元' 取走並將其附加到相反的一端。 if (strdirection = "向前") then strtemp = right(strtemp, len(strtemp) - 1) & _ mid(strtemp, 1, 1) else strtemp = right(strtemp, 1) & mid(strtemp, 1, _ len(strtemp) - 1) end if ' 顯示字串,讓人感覺' 文字正在滾動。 txtdisplay.text = strtemp end sub
該**首先確定字幕滾動的方向。然後,它使用 evb 的 right、len 和 mid 函式來處理顯示的字串,使該應用程式具有滾動字幕的外觀。
在 cmdchangedirection 控制項的 click 事件中插入以下**。
private sub cmdchangedirection_click()' 切換方向標記。 select case strdirection case "向前" strdirection = "向後" case "向後" strdirection = "向前" end selectend sub
上述幾行**處理用於跟蹤字幕滾動方向的標記切換。
這就是乙個應用程式。您的第乙個應用程式構建完畢。
用PB編寫郵件應用程式
圖1 2 閱讀郵件 使用者資訊在伺服器上通過驗證以後,乙個有效的郵件會話就建立了,接下來要做的工作就是接發郵件。pb用乙個mailmessage物件來描述一封郵件,該物件封裝了郵件的主題 位址 訊息體和附件等資訊。圖1是郵件應用程式的閱讀介面,它列出了收件箱中的所有郵件,可選擇其中一封進行閱讀。主視...
用PB編寫郵件應用程式
由於受到強大資料庫功能的掩蓋,pb的郵件功能鮮為人知。在vb中可以輕鬆地利用cdo控制項發郵件 delphi中用nm tp 而pb中的郵件函式比它們更靈活 方便。pb以其獨特高效的資料庫訪問技術,贏得了廣大程式設計師的青睞。從表面上看,它似乎只適合於開發資料庫應用程式,而事實上,pb遵照信報介面ma...
用BCB編寫多執行緒應用程式
隨著windows系統的全球性普及,多執行緒技術已越來越多地運用到許多軟體設計中。使用多執行緒技術可全面提高應用程式的執行效率。以前為了實現多執行緒程式設計,基本上都是呼叫一系列的api函式,如createthread resumethread等,不容易控制,還容易出錯。在使用bcb以後,我才發現原...