某个程序里的一小段代码,乞求翻译。

[复制链接]
查看11 | 回复3 | 2008-11-4 18:57:34 | 显示全部楼层 |阅读模式
Private Sub Form_Load()



Dim CRLF As String

CRLF = Chr$(13) & Chr$(10)



Dim Msg As String

Msg = CRLF & CRLF & "Author: S.Ramani" & CRLF

Msg = Msg & "Copyright (c) 1995 Microsoft Corp."



lblAbout.Caption = Msg
End Sub
这是一段在某个程序里切出来的一小段代码。
请求逐句逐句的翻译。
翻译好的加分给,谢谢。

回复

使用道具 举报

千问 | 2008-11-4 18:57:34 | 显示全部楼层
Private Sub Form_Load() '窗体加载程序开始Dim CRLF As String '定义CRLF为字符变量CRLF = Chr$(13) & Chr$(10) 'CRLF=换行符Dim Msg As String'定义msg为字符变量Msg = CRLF & CRLF & "Author: S.Ramani" & CRLF'msg=换行+换行+"Author: S.Ramani"+换行Msg = Msg & "Copyright (c) 1995 Microsoft Corp." 'msg=换行+换行+"Author: S.Ramani"+换行+"Copyright (c) 1995 Micro...
回复

使用道具 举报

千问 | 2008-11-4 18:57:34 | 显示全部楼层
在form load这个私有过程中,
定义CRLF为字符串函数
CRLF是由ASCALL码为13和10的两个字母组成
定义Msg为字符串函数,
Msg函数是由CARF 连接CARF 连接author:S.ramani连接CARF组成
再将Msg函数赋值为...
回复

使用道具 举报

千问 | 2008-11-4 18:57:34 | 显示全部楼层
Private Sub Form_Load() Dim CRLF As String '定义字符变量CRLF = Chr$(13) & Chr$(10) '给这个字符赋值Dim Msg As String '定义一个名称为Msg的字符变量Msg = CRLF & CRLF & "Author: S.Ramani" & CR...
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
热门排行