vb 控制神龍卡的例子

2025-02-01 10:45:24 字數 1804 閱讀 4612

1樓:保持距離

其實有c的開發包也行,麻煩一點,要將介面函式翻譯成vb的。

對於傳位址的可以一律用long型,再通過copymemory()和varptr()等函式來讀取該位址處的資料;對於傳自定義結構、型別的,用位元組陣列,按c資料長度讀入位元組陣列後再轉成vb能處理的資料型別;傳值的在介面函式引數變數前加上byval。

舉乙個用指標的例子:

declare function functiona lib "" (

pblock as any, _

lplpbuffer as long, _

pulen as long) as long

這裡lplpbuffer在c介面裡是乙個指標,指向緩衝區入口,pulen為緩衝區長度,單位是位元組。

sub main()

dim bytbuffer() as byte '用於儲存緩衝區內容。

dim lngblock as long '這裡沒有使用,根據實際情況改為合適的型別。

dim lngpointer as long '指標。

dim lnglength as long '緩衝區長度。

dim lngreturn as long 函式返回**,一般用於判斷函式完成情況。

lngreturn = functiona(lngblock,lngpointer,lnglength)

redim bytbuffer(lnglength) '必須嚴格陣列大小,最好是按緩衝區大小來定義,既不會錯又不會浪費,但只能大,不能小,否則會導致程式崩潰。

call copymemory(bytbuffer(0), byval lngpointer, lnglength)

bytbuffer '這裡顯示的就是緩衝區的真實內容。

end sub

2樓:網友

如果給你的開發包裡有dll你可以去看一下。c檔案裡有沒有相關的函式入口。然後檢視相應的值型別。最後使用vb呼叫。你可以再說詳細一點嗎?看不太懂。

用vb編乙個求計程車計費的程式

3樓:神龍令主

1、新增方向鍵的keypress事件**,每按方向鍵,則改變「小車」的left、top等屬性,並用變數記錄下top屬性等改變的結果表示里程數;

2、如:跑了x(假設10km),每km收費元,起步價3元,則表示為元3、限制行駛路線。加判斷語句,比如,如果left值小於或大於你指定的值,則不再改變。

示例:強制小車不能駛出左邊界。

if <100 then

end if

4樓:網友

要記錄行駛路程的話可以用gps的功能,不過也要預執行的裝置上裝有gps的裝置才行,可以設定每幾秒取得現在的地圖做標,再來求出所行駛的距離,但如果所行駛的路線是有設定好的應該只要輸入每一小段之前距離就好。

5樓:網友

行駛路用什麼?某地圖外掛程式??

6樓:網友

計費就沒有問題。

只是那個行駛路程就不知道你怎麼設定。

遊戲王不會成為效果物件的卡能不能被比如說兇餓毒融合龍之類的效果吸攻擊力

7樓:網友

兇餓毒融合龍吸攻擊力的效果是取物件效果,對具有不會成為效果物件的怪獸無效。

希望對你有幫助!

天福神龍5代硬解壓卡,能不能為電腦提供***硬解壓能力?

8樓:網友

對新裝的電腦沒有用,老式的奔騰2以下的cpu管用。

無功補償控制器的VB代表什麼?

簡單的講就是一種電力公司罰款而安裝的一種補償裝置 比如你就安裝了用電裝置 比如電機 電焊機等等 你的裝置功率標準已低於電力公司的功率標準而罰款了 電力公司是以上 所以就必須要安裝這個無功補償 來補償讓你的裝置達到電力公司的功率因數標準才不罰款了的 一種補償裝置。分相補償裝置可以補償不平衡的無功電流,...

VB計算n階層舉個例子,就8的階層label裡能出現「8!1 2 3 4 5 6 7 8 40320」

private sub command1 click if not isnumeric text1.text thenmsgbox 非數值型別!vbokonly,出錯了!exit sub end if dim x y z k y 1 x int text1.text z x for k 1 to x...

請老鳥介vb入門,並帶有很多例子的書!(程式設計)

建議你去買本 新概念vb教程 關於vb的常用 如下 visual basic程式常用的函式 1.數值型函式 abs num 返回絕對值 sgn num num 0 1 num 0 0 num 0 1 判斷數值正負 hex num 返回十六進位制值 直接表示 hxx 最大8位 oct num 返回八進...