教程很好也很实用,赞一个!但是我还是有连个小问题请帮忙看一下,一个是空单元格判断这个语句,我的空单元格是0,所以 If IsNothing(Wsheet.Cells(1, i).Value)这句应该改成判断是否为0,但是我总写不对,请帮忙看一下;另外我想对特定的单元格改变字体,写了下面的语句,但是并不管用 TextBox1.Text = lvExcel.Items(0).SubItems(1).Text
Dim f As Font = lvExcel.Items(0).SubItems(1).Font
f = New Font(f.Name, FontStyle.Bold)
lvExcel.Items(0).SubItems(1).Font = f
lvExcel.Items(0).SubItems(1).ForeColor = Color.Red
麻烦看一下