E = Application.WorksheetFunction.Match(Y, Sheets("判定标准").Range("A18:A22"), 0)
G = E + 1
F = Application.WorksheetFunction.HLookup(Q, Sheets("判定标准").Range("B17:F22"), G, False)
TextBox5.Text = F
End Sub
代码:E、G、 F已经定义,不知您能看明白不,我就想让text05文字框显示F的计算结果,但是运行后非要在文本框里输入些什么 才能显示出来。