冰楓論壇

用戶名  找回密碼
 立即註冊
帖子
樓主: qwe123
打印 上一主題 下一主題

[原創] [VB6]修改視窗名稱

    [複製鏈接]

1

主題

0

好友

3

積分

新手上路

Rank: 1

UID
91406
帖子
81
主題
1
精華
0
積分
3
楓幣
161
威望
2
存款
0
贊助金額
0
推廣
0
GP
1
閱讀權限
10
性別
保密
在線時間
20 小時
註冊時間
2015-2-8
最後登入
2023-8-22
46
發表於 2015-3-7 12:47:05 |只看該作者
[花邊] AR:如果有人說LBJ還要證明什麼那一定是喬丹迷
什麼東西都可以改?
點評回覆

舉報

複製連結並發給好友,以賺取推廣點數
簡單兩步驟,註冊、分享網址,即可獲得獎勵! 一起推廣文章換商品、賺$$

1

主題

0

好友

3

積分

新手上路

Rank: 1

UID
91406
帖子
81
主題
1
精華
0
積分
3
楓幣
161
威望
2
存款
0
贊助金額
0
推廣
0
GP
1
閱讀權限
10
性別
保密
在線時間
20 小時
註冊時間
2015-2-8
最後登入
2023-8-22
47
發表於 2015-3-7 12:47:10 |只看該作者
[花邊] AR:如果有人說LBJ還要證明什麼那一定是喬丹迷
什麼東西都可以改?
[發帖際遇]: 阿呆有蛋 因為參加「太陽花學運」被黨看見,而成功加入DDP側翼網軍,領取網軍獎勵 6 楓幣 幸運榜 / 衰神榜
點評回覆

舉報

9

主題

2

好友

250

積分

中級會員

Rank: 3Rank: 3

UID
48751
帖子
513
主題
9
精華
0
積分
250
楓幣
16922
威望
242
存款
0
贊助金額
0
推廣
0
GP
20
閱讀權限
30
性別
保密
在線時間
159 小時
註冊時間
2014-3-1
最後登入
2024-11-16
48
發表於 2015-3-9 21:26:52 |只看該作者
[花邊] AR:如果有人說LBJ還要證明什麼那一定是喬丹迷
謝謝分享0...........
點評回覆

舉報

2

主題

1

好友

571

積分

高級贊助會員

Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20

UID
67032
帖子
142
主題
2
精華
0
積分
571
楓幣
2026
威望
227
存款
4641
贊助金額
1300
推廣
0
GP
1
閱讀權限
150
性別
保密
在線時間
370 小時
註冊時間
2014-6-22
最後登入
2025-2-15

積分勳章 論壇粉絲 太陽勳章 神手勳章 性別(男) 幼兒勳章 懶人勳章 私服達人 解說達人 性別(女) 發帖達人 論壇支持王 高級客戶 VIP會員 貢獻王 2015年紀念勳章 長老勳章 2016年紀念勳章 音樂勳章 Apple勳章

49
發表於 2015-4-3 10:51:16 |只看該作者
[花邊] AR:如果有人說LBJ還要證明什麼那一定是喬丹迷
我以為是原始碼說XDD
點評回覆

舉報

8

主題

0

好友

15

積分

新手上路

Rank: 1

UID
378
帖子
254
主題
8
精華
0
積分
15
楓幣
1
威望
8
存款
33
贊助金額
0
推廣
0
GP
4
閱讀權限
10
性別
在線時間
136 小時
註冊時間
2011-12-10
最後登入
2020-8-16
50
發表於 2015-5-17 09:54:24 |只看該作者
[花邊] AR:如果有人說LBJ還要證明什麼那一定是喬丹迷
   感恩你喔  這樣   有些事情都可以更方便了  哈哈
[發帖際遇]: KASKB1998 在論壇發帖時沒有注意,被小偷偷去了 1 楓幣 幸運榜 / 衰神榜
點評回覆

舉報

9

主題

0

好友

23

積分

新手上路

Rank: 1

UID
104578
帖子
206
主題
9
精華
0
積分
23
楓幣
282
威望
21
存款
0
贊助金額
0
推廣
0
GP
7
閱讀權限
10
性別
保密
在線時間
31 小時
註冊時間
2015-6-16
最後登入
2021-7-6

instagram紀念勳章 Android勳章

51
發表於 2015-6-16 12:27:00 |只看該作者
[花邊] AR:如果有人說LBJ還要證明什麼那一定是喬丹迷
10元˙ ˙  買不起,單純推一下
點評回覆

舉報

35

主題

12

好友

505

積分

高級會員

Rank: 4

UID
74838
帖子
579
主題
35
精華
0
積分
505
楓幣
218
威望
480
存款
922
贊助金額
0
推廣
3
GP
32
閱讀權限
50
性別
保密
在線時間
490 小時
註冊時間
2014-8-2
最後登入
2024-1-19

論壇支持王 解說達人 論壇粉絲 發帖達人 懶人勳章 太陽勳章 幼兒勳章 性別(男) 性別(女) 長老勳章 音樂勳章 神手勳章 私服達人 2016年紀念勳章 2017年紀念勳章 積分勳章 2017端午節紀念勳章 中秋節紀念勳章 2018中秋節紀念勳章 2018萬聖節紀念勳章

52
發表於 2015-6-27 00:39:47 |只看該作者
[花邊] AR:如果有人說LBJ還要證明什麼那一定是喬丹迷
蛙那我要改爐石戰記XD
[發帖際遇]: aiwelpoi 為了研究「地震與下雨」的關聯因而就讀「地質系」,今年繳交系費 3 楓幣 幸運榜 / 衰神榜
點評回覆

舉報

82

主題

0

好友

2414

積分

金牌會員

Rank: 6Rank: 6

UID
8960
帖子
670
主題
82
精華
0
積分
2414
楓幣
1162
威望
2369
存款
1235
贊助金額
0
推廣
25
GP
97
閱讀權限
70
在線時間
897 小時
註冊時間
2012-6-17
最後登入
2021-8-13

論壇支持王 論壇粉絲 長老勳章 積分勳章 懶人勳章 性別(男) 幼兒勳章 太陽勳章 解說達人 發帖達人 音樂勳章 私服達人 神手勳章 在線終極王 2015年紀念勳章

53
發表於 2015-6-27 01:02:51 |只看該作者
[花邊] AR:如果有人說LBJ還要證明什麼那一定是喬丹迷
aiwelpoi 發表於 2015-6-27 00:39 [url=forum.php?mod=redirect&goto=findpost&pid=1099636&ptid=21541][/url]
蛙那我要改爐石戰記XD

改那能幹嘛!?


我的部落格
點我前往部落格
記得常去我的部落格光顧唷!!!


--------------------------------------------------
個人作品集:
  @VB6 - FrontLine修改器v2.0
  @GGC競時通、聊聊雙開檔案
  @VB6電腦機械碼
  @BNB對窗器源碼

 @更多請至:點此前往
點評回覆

舉報

15

主題

5

好友

12

積分

新手上路

Rank: 1

UID
126946
帖子
116
主題
15
精華
0
積分
12
楓幣
2122
威望
11
存款
0
贊助金額
0
推廣
0
GP
12
閱讀權限
10
性別
在線時間
23 小時
註冊時間
2016-1-23
最後登入
2023-5-11

Android勳章

54
發表於 2016-11-7 18:20:28 |只看該作者
[花邊] AR:如果有人說LBJ還要證明什麼那一定是喬丹迷
請問能提供原始碼嗎?
[發帖際遇]: happy09033 搭乘「北捷」不幸遭到「隨機砍人」瘋子砍傷,因而獲得保險理賠 2 楓幣 幸運榜 / 衰神榜
點評回覆

舉報

66

主題

17

好友

390

積分

初級贊助會員

Rank: 5Rank: 5

UID
144692
帖子
787
主題
66
精華
0
積分
390
楓幣
305
威望
253
存款
316
贊助金額
500
推廣
44
GP
10
閱讀權限
60
在線時間
239 小時
註冊時間
2016-7-7
最後登入
2025-2-17

VIP會員 Android勳章 性別(男) 高級客戶 發帖達人 熱心助人 Apple勳章 2019年紀念勳章 神手勳章 2020年紀念勳章 論壇粉絲 積分勳章 懶人勳章 解說達人 太陽勳章 幼兒勳章 音樂勳章 2021年紀念勳章 2022年紀念勳章 2023年紀念勳章 2024年紀念勳章 論壇支持王 2025年紀念勳章

55
發表於 2017-1-26 10:06:50 |只看該作者
[花邊] AR:如果有人說LBJ還要證明什麼那一定是喬丹迷
本帖最後由 YYYpo 於 2017-1-26 10:13 編輯

我來公開實際源碼搂!!我覺得那種東西只要2條API就可以完成了
--------------------------------------
首先創個模塊來存放
  1. Public Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
  2. Public Declare Function SetWindowText Lib "user32" Alias "SetWindowTextA" (ByVal hWnd As Long, ByVal lpString As String) As Long

  3. Public Function WritewindownameBytes(ByVal Name As String, ByVal Text As String) As Long
  4. '修改窗口名稱
  5. Dim are As Long
  6. are = FindWindow(vbNullString, Name)
  7. SetWindowText are, Text
  8. End Function
複製代碼
--------------------------------------
再到表單去呼叫
  1. Dim a As New Class1
  2. Private Sub Command1_Click()
  3. a.WritewindownameBytes "原本遊戲名稱", "修改後的遊戲名稱"
  4. End Sub
複製代碼
------------------------------------
如果還看不懂的,專案就放在這裡
修改遊戲名稱專案.rar (1.52 KB, 下載次數: 6)

點評回覆

舉報

0

主題

0

好友

-1

積分

限制會員

UID
65816
帖子
22
主題
0
精華
0
積分
-1
楓幣
16
威望
-2
存款
0
贊助金額
0
推廣
0
GP
0
閱讀權限
0
性別
保密
在線時間
19 小時
註冊時間
2014-6-14
最後登入
2017-8-11
56
發表於 2017-6-8 20:45:38 |只看該作者
[花邊] AR:如果有人說LBJ還要證明什麼那一定是喬丹迷
看看囉謝謝
已有 1 人評分楓幣 威望 收起 理由
System -10 -1 複製或萬用回文(系統自動鎖定).

總評分: 楓幣 -10  威望 -1   查看全部評分

點評回覆

舉報

2110

主題

12

好友

206

積分

註冊會員

Rank: 2

UID
249601
帖子
3043
主題
2110
精華
0
積分
206
楓幣
151
威望
192
存款
0
贊助金額
0
推廣
19
GP
176
閱讀權限
20
性別
保密
在線時間
274 小時
註冊時間
2018-10-10
最後登入
2024-12-17

太陽勳章 發帖達人 私服達人 Android勳章 神手勳章 2018年紀念勳章 2018萬聖節紀念勳章 2019年紀念勳章 熱心助人 2020年紀念勳章 富豪勳章 性別(女) 性別(男) 音樂勳章 懶人勳章 幼兒勳章 2020端午節紀念勳章 積分勳章 2020中秋節紀念勳章 解說達人 屁孩勳章 論壇粉絲 2020聖誕節紀念勳章 2021年紀念勳章 除蟲大隊 2021中秋節紀念勳章 2021聖誕節紀念勳章 2022年紀念勳章 論壇支持王 2022中秋節紀念勳章 2022聖誕節紀念勳章 2023年紀念勳章 2023端午節紀念勳章 2024年紀念勳章

57
發表於 2018-11-11 19:32:12 |只看該作者
[花邊] AR:如果有人說LBJ還要證明什麼那一定是喬丹迷
感謝
來試試看修改後能不能雙開
點評回覆

舉報

0

主題

0

好友

1

積分

新手上路

Rank: 1

UID
129851
帖子
20
主題
0
精華
0
積分
1
楓幣
66
威望
0
存款
0
贊助金額
0
推廣
0
GP
0
閱讀權限
10
性別
保密
在線時間
12 小時
註冊時間
2016-2-18
最後登入
2024-1-28
58
發表於 2021-6-3 04:51:23 |只看該作者
[花邊] AR:如果有人說LBJ還要證明什麼那一定是喬丹迷
怎麼看起來就像是來騙錢的沒用東西=口=
[發帖際遇]: 千蒼雷 投入「普悠瑪脫軌」救災,行為值得讚賞,獲得 2 楓幣 幸運榜 / 衰神榜
點評回覆

舉報

6

主題

0

好友

235

積分

註冊會員

Rank: 2

UID
382006
帖子
672
主題
6
精華
0
積分
235
楓幣
17272
威望
227
存款
0
贊助金額
0
推廣
0
GP
877
閱讀權限
20
在線時間
163 小時
註冊時間
2023-3-15
最後登入
2025-2-22

2023端午節紀念勳章 2023聖誕節紀念勳章 2024端午節紀念勳章 2024中秋節紀念勳章 2024聖誕節紀念勳章

59
發表於 2023-4-23 00:21:25 |只看該作者
[花邊] AR:如果有人說LBJ還要證明什麼那一定是喬丹迷
雖不知為啥要改視窗名, 不過…
        Dim iHWnn As Long
        iHWnd = FindWindowEx(0&, 0&, vbNullString, ByVal "原視窗名稱")
        Debug.Print SetWindowText(ByVal iHWnd, "新視窗名稱")
點評回覆

舉報

:):(:D:'(
:•̀ὤ•́:o:P:$
;P:L:Q:lol
:loveliness::funk::curse::dizzy:
高級模式
B Color Image Link Quote Code Smilies |

廣告刊登意見回饋關於我們管群招募本站規範DMCA隱私權政策詐諞防範及資料調閱

Copyright © 2011-2025 冰楓論壇, All rights reserved

免責聲明:本網站是以即時上載留言的方式運作,本站對所有留言的真實性、完整性及立場等,不負任何法律責任。

而一切留言之言論只代表留言者個人意見,並非本網站之立場,用戶不應信賴內容,並應自行判斷內容之真實性。

小黑屋|手機版|冰楓論壇

GMT+8, 2025-2-22 05:33

回頂部