VB.Net学习笔记（四）

1、 数字值格式化成字符串

(11.ToString("0000"))，变成”0011”

(11.0000.ToString("#.####"))，变成”11”

(11.0001.ToString("#.####"))，变成”11.0001”

2、 设置DataGridView显示的格式

DGV_DJList.Columns(i).HeaderText = ds.Tables(0).Rows(i)(1).ToString        ——设置列标题

DGV_DJList.Columns(i).AutoSizeMode = DataGridViewAutoSizeColumnMode.None ——列宽自动缩放选项

DGV_DJList.RowHeadersVisible = False                                  ——不显示行左边框

DGV_DJList.SelectionMode = DataGridViewSelectionMode.FullRowSelect    ——选择模式选项

DGV_DJList.AllowUserToAddRows = False                                 ——不显示空行

3、 让ComboBox下拉列表不可编辑

ComboBox1.DropDownStyle = ComboBoxStyle.DropDownList

4、 操作Excel表格的方法

添加引用Com标签中的——Microsoft Excel 11.0 Object Library，此时引用列表将显示三个引用项目（Excel、Microsoft.Office.Core、VBIDE）。

在程序代码的顶部添加——  Imports Excel = Microsoft.Office.Interop.Excel

事件代码范例：

Dim myExcelAP AsNew Excel.Application    '定义新的Excel应用

        Dim myExcelWB As Excel.Workbook   '定义工作簿

        Dim myExcelSh As Excel.Worksheet '定义工作页

        myExcelWB = myExcelAP.Workbooks.Add(strFile) '此处字符串为打开的xls文件全路径名。若无参数，则为新建一个xls文件。

        myExcelSh = CType(myExcelWB.Worksheets(1), Excel.Worksheet) 

'强制将com对象转换为Excel.Worksheet对象类型。

        myExcelAP.Visible = True '将Excel程序显示出来！

 

        With myExcelSh

'对该工作页进行各类操作——

            .Range("H2").Value = "!!!!!!!!!"

        EndWith

'最后需要显式释放变量并强制内存回收！

        myExcelAP = Nothing

        myExcelSh = Nothing

        myExcelWB = Nothing

        GC.Collect()

        

5、 操作Excel表格集锦

.Range("H2").Value = "!!!!!!!!!"     ‘赋值

.PageSetup.PrintArea = ”$A$1:$D$10”   ‘设置打印区域(从A1到D10的范围，为空则整个工作表)

.Range(“A1”,”D2”).Select() ‘选定某一范围的单元格 

myExcelAP.CutCopyMode = Excel.XlCutCopyMode.xlCopy 复制模式

myExcelAP.Selection.Copy() 复制

myExcelAP.Selection.EntireRow.INSERT(Excel.XlDirection.xlDown) 将复制的插入，原有单元格下沉

6、 AndAlso—‘短路’逻辑运算

例子：A AndAlso B，若A为True时，才进行B的运算（B若为True，则结果为True，否则为False）；否则，结果直接为False。

可用于空对象的判断！

例子：A  AndAlso A.属性，若A为空，则无需判断A.属性的值（否则，将报错！）