FarPoint.Win.SpreadJ アセンブリ > FarPoint.Win.Spread 名前空間 > SpreadFontStyle クラス : Underline プロパティ |
'Declaration Public ReadOnly Property Underline As UnderlineFontStyle
'使用法 Dim instance As SpreadFontStyle Dim value As UnderlineFontStyle value = instance.Underline
public UnderlineFontStyle Underline {get;}
private void Form1_Load(object sender, EventArgs e) { fpSpread1.Sheets[0].Cells[0, 0].Value = 3; fpSpread1.Sheets[0].Cells[1, 0].Value = 2; fpSpread1.Sheets[0].Cells[1, 1].Value = 10; fpSpread1.Sheets[0].Cells[0, 2].Value = 1; } private void button1_Click(object sender, EventArgs e) { //Average CF FarPoint.Win.Spread.AverageConditionalFormattingRule average = new FarPoint.Win.Spread.AverageConditionalFormattingRule(true, true); average.IsAbove = true; average.IsIncludeEquals = true; FarPoint.Win.Spread.SpreadFontStyle fstyle = new FarPoint.Win.Spread.SpreadFontStyle(FarPoint.Win.Spread.StrikeoutFontStyle.Strikeout); listBox1.Items.Add(fstyle.RegularBoldItalic.ToString()); listBox1.Items.Add(fstyle.Strikeout.ToString()); listBox1.Items.Add(fstyle.Underline.ToString()); average.FontStyle = fstyle; fpSpread1.ActiveSheet.SetConditionalFormatting(1, 1, average); }
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load FpSpread1.Sheets(0).Cells(0, 0).Value = 3 FpSpread1.Sheets(0).Cells(1, 0).Value = 2 FpSpread1.Sheets(0).Cells(1, 1).Value = 10 FpSpread1.Sheets(0).Cells(0, 2).Value = 1 End Sub Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click 'Average CF Dim average As New FarPoint.Win.Spread.AverageConditionalFormattingRule(True, True) average.IsAbove = True average.IsIncludeEquals = True Dim fstyle As New FarPoint.Win.Spread.SpreadFontStyle(FarPoint.Win.Spread.StrikeoutFontStyle.Strikeout) ListBox1.Items.Add(fstyle.RegularBoldItalic.ToString()) ListBox1.Items.Add(fstyle.Strikeout.ToString()) ListBox1.Items.Add(fstyle.Underline.ToString()) average.FontStyle = fstyle FpSpread1.ActiveSheet.SetConditionalFormatting(1, 1, average) End Sub