主题：为什么狐表的菜单可以翻译成功我自已做的翻译不成功呢？

Dim i As Integer
Dim tl As String = args(0)
Dim ft As String = args(1)
Dim MessageBox As String = args(2)
If MessageBox = GetConfigValue("MessageForm","OK") Then

Forms("Sys_OK").Open()
Forms("Sys_OK").Text = ft
Forms("Sys_OK").Controls("KO_Ll").text = tl
i = tl.Length
Forms("Sys_OK").BaseForm.Width = Forms("Sys_OK").Controls("KO_Ll").Width + i
Else If MessageBox = GetConfigValue("MessageForm","OKCancel") Then
Forms("Sys_OKCancel").Open()
Forms("Sys_OKCancel").Text = ft
Forms("Sys_OKCancel").Controls("OKCancel_Ll").text = tl
End If