自定义博客皮肤VIP专享

*博客头图:

格式为PNG、JPG,宽度*高度大于1920*100像素,不超过2MB,主视觉建议放在右侧,请参照线上博客头图

请上传大于1920*100像素的图片!

博客底图:

图片格式为PNG、JPG,不超过1MB,可上下左右平铺至整个背景

栏目图:

图片格式为PNG、JPG,图片宽度*高度为300*38像素,不超过0.5MB

主标题颜色:

RGB颜色,例如:#AFAFAF

Hover:

RGB颜色,例如:#AFAFAF

副标题颜色:

RGB颜色,例如:#AFAFAF

自定义博客皮肤

-+
  • 博客(10)
  • 资源 (1)
  • 收藏
  • 关注

原创 format函数中的自定义日期及时间格式

用户自定义日期/时间格式及示例

2022-07-22 11:48:05 933

原创 ex11. 通过enable属性设置控件有效性

ex.11 通过enable属性设置控件有效性Option ExplicitDim t0 As Date, t1 As DatePrivate Sub Command1_Click()t0 = NowText1.Text = Format(t0, "hh:mm:ss")Text2.Text = ""Text3.Text = ""Command1.Enabled = FalseCommand2.Enabled = TrueEnd SubPrivate Sub Command2_Cli

2021-03-31 23:03:00 190

原创 ex10.通过Font属性改变文本外观

ex10.通过Font属性改变文本外观Option ExplicitPrivate Sub Command1_Click()Label1.Font.Name = "宋体"Command1.BackColor = vbGreenCommand2.BackColor = vbButtonFaceCommand3.BackColor = vbButtonFaceEnd SubPrivate Sub Command10_Click()EndEnd SubPrivate Sub Comm

2021-03-29 23:23:57 150

原创 ex9.用top、left属性改变位置

ex9.用top、left属性改变位置Option ExplicitDim myTop As Long, myLeft As LongPrivate Sub Command1_Click()'上移With Image1 .Top = .Top - 100End WithEnd SubPrivate Sub Command2_Click()'下移With Image1 .Top = .Top + 100End WithEnd SubPrivate Sub Co

2021-03-27 22:28:38 652

原创 ex8.用height、width属性改变大小

ex8.用height、width属性改变大小本例演示通过height属性设置控件的高度,通过width属性设置控件的宽度。Option ExplicitPrivate Sub Command1_Click()Image1.Width = Image1.Width / 0.8Image1.Height = Image1.Height / 0.8End SubPrivate Sub Command2_Click()Text1.Width = Text1.Width + 100End S

2021-03-27 00:13:32 200

原创 ex7.Caption属性的运用

ex7.Caption属性的运用Option ExplicitPrivate Sub Command1_Click()MsgBox "你将修改form1窗口的Caption属性"Form1.Caption = "Caption属性示例"MsgBox "你将修改Label1的Caption属性"Label1.Caption = "标签1"MsgBox "文本框text1没有caption属性,你将通过text属性修改文本框中的文本内容"Text1.Text = "文本框1"MsgBox

2021-03-25 21:53:33 509

原创 ex6.立即窗口的使用

ex6.立即窗口的使用立即窗口的用途测试有问题或新写的过程代码。在执行一个应用过程时查询或更改某个变量值。在运行中止时,在过程代码中指定该变量一个想要的新值。在执行一个应用过程时查询或更改一个属性值。调用任何在过程代码中想调用的过程。在程序运行时查看调试输出。立即窗口主要用于调试代码,仅可在中断模式输入代码并执行。如果未显示立即窗口,可以通过快捷键CTRL+G或者调试工具栏中的立即窗口图标重新打开。...

2021-03-24 23:41:18 807

原创 ex5.用中间变量交换文本

ex5.用中间变量交换文本

2021-03-23 22:07:28 171

原创 ex4.响应窗体或控件事件

ex4.响应窗体或控件事件注意窗口的最大化和最小化按钮未显示,通过窗体设计时设置maxbutton以及minbutton属性为false可实现该效果。另外这两属性进在窗体设计时可写,在程序运行时为只读,不能更改其属性值窗体可加载图片作为其背景。语句Picture = LoadPicture(picturePath)中picturePath为图片文件路径字符串,LoadPicture函数的具体用法参考MSDN本程序响应窗体内的鼠标点击事件,每次点击会更新窗口标题Option Explicit

2021-03-22 22:58:20 223

原创 从零开始学vb6

从零开始学VB6除大学里面学过些C语言基础以及工作后用Excel时接触过些vba外,再无其他编程语言学习。为尽量和现在知悉的vba基础契合,决定找本书系统的学一下vb6.0,按参考书章节记录下学习中的代码片段及认识。参考书:《Visual Basic范例开发大全》第一篇 VB基础设计1.1 基础设计实例ex1. 制作欢迎界面窗体标题(窗体的caption属性显示于此)标签控件(label控件,caption属性将显示于此)文本框控件(textbox控件,text属性将显示在文本框内)如

2021-03-21 18:11:28 1843

1_1基础设计实例EX1-EX7.7z

从零开始学vb6 配套工程文件 https://blog.youkuaiyun.com/sirEarth/article/details/115046336?spm=1001.2014.3001.5501

2021-03-29

空空如也

TA创建的收藏夹 TA关注的收藏夹

TA关注的人

提示
确定要删除当前文章?
取消 删除