日记首页  | 列表 | 添加日记  | 管理登陆  | 搜索退出 直达底部 
****************************************
2021/11/8新云账号
天翼云(2021-11-8)
IP:218.78.81.204
账号:lk2lklk@163.com
密码:4269259hjt@

远程登录密码:A4269259hjt
****************************************
2021/9/22雅培传感器安装视频
雅培安装:https://v.youku.com/v_show/id_XNDA3MTUzMjcyOA==.html?spm=a2h1n.8251843.playList.5!3~5~A&f=52106871&o=1
****************************************
2021/9/13澳科大学生账号密码
B2004462
610104200209081624


https://oas.must.edu.mo/admission/Login.do


18966759126@sina.cn
hyw0908

澳科大网上选课系统
https://www.must.edu.mo/student
学生帐号密码
2009853YB111002
qy@5x5Ht
13609192500@Hyw
****************************************
2021/9/11电信光猫登陆超账号密码
电信天翼光猫登陆超级密码
最高权限
账号:useradmin
密码:nE7jA%5m

新安装的电信光猫:ZXHN G7615TV2-XG 
中兴光猫

账号:useradmin
普通设置密码:A4269259hjt

账号:useradmin
超密:qGc#7BPuQHM9

****************************************
2021/9/3网上共青团·智慧团建:

网上共青团·智慧团建

https://zhtj.youth.cn/zhtj/

账号:hyw身份证号
密码:683125hyw
****************************************
2021/8/12伯索后台安装软件下载网址
Windows PC端管理后台下载:http://download.plaso.cn/dev-prod/plaso_boss3.30.340.exe

MAC电脑网页版管理后台: https://www.plaso.cn/static/boss  
****************************************
2021/5/14vba中下拉菜单
vba中下拉菜单
设置好窗体里的

ComboBox(复合框),添加代码:

都可以,但Private Sub UserForm_Initialize()不能变。


Private Sub UserForm_Initialize()
  ComboBox1.List() = Array("稿件名称", "工作做类型", "页码", "日期")
End Sub


Private Sub UserForm_Initialize()
ComboBox1.AddItem "男"
ComboBox1.AddItem "女"
End Sub


Private Sub UserForm_Initialize()
    ComboBox1.AddItem "你添加的内容"
End Sub

****************************************
2021/5/11vba程序,生成边框
Sub 边框线()
ActiveSheet.UsedRange.Borders.LineStyle = 1
End Sub
添加一个细的、黑色线条框线,以围绕活动工作表上使用的单元格。


Sub 加边框()
        Range("a1").CurrentRegion.Borders.LineStyle = 1
End Sub
 
改进:a1为赋值x
VBA中有,range("A1")、cells(1,1),[A1]这三种选择对象的方法
所以,把
Range("a1")换成了cells(x,1)

        Cells(x, 1).CurrentRegion.Borders.LineStyle = 1
备注:x的赋值有别的语句
参考:收费+支出

**************************

以下是将当前活动工作表中使用的范围的边框样式设置为1的VBA代码:
Sub SetBorders() Dim ws As Worksheet ' 设置当前活动工作表 Set ws = ActiveSheet ' 将使用的范围的边框样式设置为1 ws.UsedRange.Borders.LineStyle = 1 End Sub
参考:老师结算系统
****************************************
2021/4/22建行龙支付企业银行登录
建设银行龙支付企业银行登录帐号
聚合支付
客户号:105000356419517
密    码:A42****9hjt
电    话:135
****************************************
2021/4/19163邮箱,POP3/SMTP服务
2500邮箱的授权码
POP3/SMTP服务,华为mate20pro设置163邮箱
RNENNQPJPCRQFSPN
(这个授权码已删除,需重新验证)


编辑短信:9988

发送至:1069 8163 0163 222


  共有日记399篇,每页10篇,分18/40页   9首页 3上页 下页4 尾页:  转到: