我要把一个软件的界面换成英文版的
现在基本上都改完了
但是发现就是msgbox的提示按钮“是”，“否”没办法换成“Yes”，“No”
谁能告诉我怎么办？

在英文操作系统里那个就是yes和no，不用编

那我们现在用的是VB6.0中文版//难道要用英文版的写MSGBOX函数？

..............


哦哦哦。。明白了。。。等等哈。。。

请注意红色的部分!!



模块代码：
[CODE]
Option Explicit
Private Declare Function MessageBox Lib "user32" Alias "MessageBoxA" (ByVal hwnd As Long, ByVal lpText As String, ByVal lpCaption As String, ByVal wType As Long) As Long
Private Declare Function SetDlgItemText Lib "user32" Alias "SetDlgItemTextA" (ByVal hDlg As Long, ByVal nIDDlgItem As Long, ByVal lpString As String) As Long
Private Declare Function SetWindowsHookEx Lib "user32" Alias "SetWindowsHookExA" (ByVal idHook As Long, ByVal lpfn As Long, ByVal hmod As Long, ByVal dwThreadId As Long) As Long
Private Declare Function UnhookWindowsHookEx Lib "user32" (ByVal hHook As Long) As Long
Private Const WH_CBT = 5
Private Const HCBT_ACTIVATE = 5
Private hHook As Long

Private Function HookProc(ByVal nCode As Long, ByVal wParam As Long, ByVal lParam As Long) As Long
If nCode = HCBT_ACTIVATE Then
Dim hwnd As Long
hwnd = wParam
SetDlgItemText hwnd, vbOK, ByVal "对拉~~"
SetDlgItemText hwnd, vbCancel, ByVal "去死！！"
SetDlgItemText hwnd, vbYes, ByVal "是"
SetDlgItemText hwnd, vbNo, ByVal "否"
SetDlgItemText hwnd, vbAbort, ByVal "放弃"
SetDlgItemText hwnd, vbIgnore, ByVal "忽略"
SetDlgItemText hwnd, vbRetry, ByVal "重试"
UnhookWindowsHookEx hHook
End If
HookProc = 0
End Function

Public Function MsgBox(Prompt As String, Optional Button As VbMsgBoxStyle = vbOKOnly, Optional Title As String) As VbMsgBoxResult
If Len(Title) = 0 Then Title = App.Title
hHook = SetWindowsHookEx(WH_CBT, AddressOf HookProc, App.hInstance, App.ThreadID)
MsgBox = MessageBox(Form1.hwnd, Prompt, Title, Button)
End Function
[/CODE]
窗体的：
[CODE]
Option Explicit

Private Sub Command1_Click()
If MsgBox("你好", vbOKCancel + vbInformation) = vbOK Then
Call MsgBox("你按了OK", vbInformation)
Else
Call MsgBox("你按了NO", vbInformation)
End If
End Sub
[/CODE]

不建议HOOK……
还不如自己画个。。。

还有一种方法，我觉得不太好就用hook吧


[IMG]http://hiphotos.baidu.com/sryucn/pic/item/9c65b5bf8689840019d81f34.jpg[/IMG]

findwindow？

你确定吗？

但是我把操作系统的区域换成英国还是不行啊

他确定。

他说的原话是“英文操作系统”，这话很明确了。