主题：[求助]

Dim dx As Integer  '定义大小
Dim zt As Font = CurrentTable.Font   '定义字体
If Integer.TryParse(e.ComboBox.Text,dx) = True Then
    CurrentTable.Font = New Font(zt.Name,dx,zt,Style)
End If


请问是不是还得定义：
Dim Style as FontStyle?

 找到问题了