我的代码是这样写的:
For i = 1 To 21
DataReport4.Sections("sec").Controls("text" & i).DataMember = printRs.DataMember
DataReport4.Sections("sec").Controls("text" & i).Font.Size = textbox.Text
Next textbox是我用来存字体大小的,但是设置只有首次运行时成功了,之后的运行后Datareport里面的TEXT也没有改变大小,用F8编译时print DataReport4.Sections("sec").Controls("text" & i).Font.Size时得出的值是textbox的值,但是DataReport显示出来就是没有效果.
求救啊!!
For i = 1 To 21
DataReport4.Sections("sec").Controls("text" & i).DataMember = printRs.DataMember
DataReport4.Sections("sec").Controls("text" & i).Font.Size = textbox.Text
Next textbox是我用来存字体大小的,但是设置只有首次运行时成功了,之后的运行后Datareport里面的TEXT也没有改变大小,用F8编译时print DataReport4.Sections("sec").Controls("text" & i).Font.Size时得出的值是textbox的值,但是DataReport显示出来就是没有效果.
求救啊!!
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货