-
連線了什麼樣的網路? 目前尚不清楚。
您將讓 VB 自動撥號 Internet。
或者自動在某個**上。
還是別的什麼?
很簡單,私下找我就行了。
-
dim url as string
遇到錯誤後繼續執行。
on error resume next
if = "" then
msgbox "請先輸入搜尋關鍵字! ", ,"錯誤! ": exit sub
end if
新增乙個文字,並假設 text1(臨時操作)。
新增乙個文字,比如說 text2(用於輸出),其 multiline 屬性設定為 true
滾動到 2
private sub command1_click()
set xmlhttp1 = createobject("")
get", "", true
while <>4
doevents
set xmlhttp1 = nothing
i = "1"
doa = ""
instr(i, ,a)
if = 0 then
msgbox "結束"
exit do
y = instr(, "
end if
i = yloop
end sub
-
這是不可能的,別做夢了,破解者可以拆解你的軟體,這樣軟體就不會在你的**上驗證。
你不妨讓它更簡單。 即使你想這樣做,用 VB 做也是很糟糕的。
-
和我規劃的防破解方法一樣,雖然不安全,但是還是很不錯的,VB是可以實現的,只要配合ASP也可以判斷授權是否多用,我們一起來討論一下,
-
幾乎不可能完全防止開裂!
-
這個絕對沒問題,要求不高的那個,你不想跑團隊記憶體和顯示卡要求都很高。
-
excel_ filename:=
解釋最新版本。
if val(excel_ >8 thenset excel_sheet = excel_else set excel_sheet = excel_append if
*開啟工作表***
set xls = new
trueset xlbook =
*寫內容***
dim i as integer
i = 3 '我控制線。
dim j as integer 'jControl 列 dim countpage 為 integercountpage = 0'控制頁面。
do while not rst_
18 '控制行高。
for j = 1 to 10
j) =rst_ '將“工程庫”中記錄的第乙個字段寫入工作表。
接下來每 18 行一頁,如果資料超過一頁進行特殊處理,如果我> 18 然後
down:=1 '活動視窗的內容向下滾動 1 行 結束 如果
if i mod 18 = 0 then
if countpage = 0 then, 1), 10)).= xlcontinuous '首頁有邊框。
else + countpage - 1) *18, 1), 10)).= xlcontinuous '帶邊框的中間頁。
end if
i = i + 2 '新增乙個空行。
-
使用 VB6 在 Excel 中輸入 **
excel_ filename:=
解釋最新版本。
if val(excel_ >8 thenset excel_sheet = excel_else set excel_sheet = excel_append if
*開啟工作表***
set xls = new
trueset xlbook =
*寫內容***
dim i as integer
i = 3 '我控制線。
dim j as integer 'jControl 列 dim countpage 為 integercountpage = 0'控制頁面。
do while not rst_
18 '控制行高。
for j = 1 to 10
j) =rst_ '將“工程庫”中記錄的第乙個字段寫入工作表。
接下來每 18 行一頁,如果資料超過一頁進行特殊處理,如果我> 18 然後
down:=1 '活動視窗的內容向下滾動 1 行 結束 如果
if i mod 18 = 0 then
if countpage = 0 then, 1), 10)).= xlcontinuous '首頁有邊框。
else + countpage - 1) *18, 1), 10)).= xlcontinuous '帶邊框的中間頁。
end if
i = i + 2 '新增乙個空行。
-
不厭其煩地買一本關於這方面使用的書,然後自己研究。
-
這個問題有點深奧,你的分數太低了! 我只能教你最簡單的方法,學會做軟體,學會修改別人的**!
-
shell 可以呼叫 dos 命令,任 是可以重新命名的 dos 命令! 如下圖:shell" /f ren c:ame1 name2"
-
這不是乙個難的問題,你這樣問也沒用,你買了一本VB6和VC++的書,從頭到尾看到結尾,把書裡所有的示例練習都做完,基本可以用它來工作。 如果對任何具體問題都不了解,再問一遍,效果就好多了!