Dim str1作為字符串
將str2標註為字符串
Text1獲取焦點以獲取值。
Text1。SetFocus
str1 = Text1。文本
Text2獲得焦點以獲取值。
文本2。SetFocus
str2 = Text2。文本
如果str 1 & gt；那麽str2
Text1獲取焦點以更改字體顏色。
Text1。SetFocus
Text1。ForeColor = 8421631
其他
Text2獲得焦點以更改字體顏色。
文本2。SetFocus
文本2。ForeColor = 8421631
如果…就會結束
末端接頭