日历

2015年十一月
« 9月   12月 »
 1
2345678
9101112131415
16171819202122
23242526272829
30  

最近评论

    linux企业应用

    Centos7 网络命令

    网卡以en开头,WLAN以wl开头,WWAN以WW开头
    o是on-board,s是热插拔口的网卡,p是PCI接口的网卡,
    后面的是数字是一个索引,ID,或端口

    ip addr show ens32 :显示网卡ens32的网络ip信息
    ip addr
    ip link
    ip route
    ip -s link show ens32

    tracepath www.taobao.com
    traceroute www.taobao.com

    ss -ta 代替netstat,ss 的用法和netstat一样

    显示系统有几个网络连接:nmcli con show
    看网络配置:ifconfig ens32
    nmcli con show “ens32”

    显示设备网络状态:nmcli dev status
    nmcli dev show ens32

    linux企业应用

    GetOpenFilename的使用方法和示例

    GetOpenFilename相当于Excel打开窗口,通过该窗口选择要打开的文件,并可以返回选择的文件完整路径和文件名。
    ‘注:此方法并不会真正打开文件?

    ‘Application.GetOpenFilename(文件类型筛选规则,优先显示第几个类型的文件,标题,是否允许选择多个文件名)

    ‘二、示例

    ‘1 打开类型只限excel文件

    ‘设置打开某类文件可以用下面的规则:

    ‘”文件类型说明文字,*.文件类型后辍”
    Sub t1()
    Dim f
    f = Application.GetOpenFilename(“Excel文件,*.xls”)
    MsgBox f
    End Sub

    ‘2、打开多种文件类型(word和excel)

    ‘打开多种文件类型,只需要用”,”隔开,添加新的文件类型说明和文件类型。

    Sub t2()
    Dim f
    f = Application.GetOpenFilename(“Excel2003文件,*.xls,Word文件,*.doc”)
    MsgBox f
    End Sub

    ‘3 打开多种文件类型,默认显示word文件

    Sub t3()
    Dim f
    f = Application.GetOpenFilename(“Excel2003文件,*.xls,Word文件,*.doc,文本文件,*.txt”, 2)
    MsgBox f
    End Sub

    ‘4 设置对话框名称

    Sub t4()
    Dim f
    f = Application.GetOpenFilename(“Excel2003文件,*.xls,Word文件,*.doc,文本文件,*.txt”, 2, “选择要汇总的文件”)
    MsgBox f
    End Sub

    ‘5 选择多个文件,并以数组形式返回
    Sub t5()
    Dim f
    ChDrive “E”
    ChDir Application.Path
    ‘ChDir “..”
    f = Application.GetOpenFilename(“Excel2003文件,*.xls,Word文件,*.doc,文本文件,*.txt”, 1, MultiSelect:=True)
    MsgBox f(1)
    End Sub