编译错误:方法和数据成员未找到
PrivateSub主体_Format(CancelAsInteger,FormatCountAsInteger)DimkAsIntegerIfNotIsNull(Me....
Private Sub 主体_Format(Cancel As Integer, FormatCount As Integer)
Dim k As Integer
If Not IsNull(Me.文本11) Then
k = Len(Me.文本11)
If k > 20 Then
Me.文本11.FontSize = 11
'Me.文本9.LineSpacing = 315
'ElseIf k > 20 Then
'Me.文本17.FontSize = 11
'Me.文本9.LineSpacing = 255
Else
Me.文本11.FontSize = 12
'Me.文本9.LineSpacing = 9000
End If
End If
End Sub 展开
Dim k As Integer
If Not IsNull(Me.文本11) Then
k = Len(Me.文本11)
If k > 20 Then
Me.文本11.FontSize = 11
'Me.文本9.LineSpacing = 315
'ElseIf k > 20 Then
'Me.文本17.FontSize = 11
'Me.文本9.LineSpacing = 255
Else
Me.文本11.FontSize = 12
'Me.文本9.LineSpacing = 9000
End If
End If
End Sub 展开
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询