سوال: فارسی کردن پیغام [بایگانی]

azadich

چهارشنبه 07 دی 1390, 22:06 عصر

با سلام خدمت اساتید محترم، خواستم بدونم دو پیغام مربوط به کد زیر چطوری فارسی میشه ممنون(هر دو پیغام پیوست کردم)Sub RenameTable(OldName As String, NewName As String) CurrentDb.TableDefs(OldName).Name = NewName Application.RefreshDatabaseWindowEnd SubPrivate Sub Command0_Click()Dim str As Stringstr = Me.Text1RenameTable "a", strEnd Sub

Abbas Amiri

پنج شنبه 08 دی 1390, 01:23 صبح

بهترین کار مدیریت خطا است یعنی اینکه در ابتدای روال مربوط با دستور On Error Goto ErrMessage به قسمت خطایابی پرش ودر انجا با جملات شرطی If Err.Number=94 Then و ... پیغام فارسی با MsgBox چاپ کنید .

azadich

پنج شنبه 08 دی 1390, 12:47 عصر

بهترین کار مدیریت خطا است یعنی اینکه در ابتدای روال مربوط با دستور On Error Goto ErrMessage به قسمت خطایابی پرش ودر انجا با جملات شرطی If Err.Number=94 Then و ... پیغام فارسی با MsgBox چاپ کنید .
ممنون میشه روی نمونه اصلاح کنید