专栏首页编程创造城市计算机高职专业VB知识要点001,模拟域名抢购软件案例代码开源,热身第一课

计算机高职专业VB知识要点001,模拟域名抢购软件案例代码开源,热身第一课

2020年4月21日笔记

一、域名相关知识点

域名

  • .com.cn 中国内的商用域名
  • .com 全球范围的商用域名
  • .edu 教育类域名
  • .org 组织类
  • .gov 政府类
  • .gov.cn 中国政府

历史案例:

开心网域名曾被抢注的惨案!

kaixin001.com

kaixin.com

二、两个类似的控件:组合框、列表框

combobox 、 listbox控件的list属性,想要连续输入快捷键ctrl+enter

三、VB快捷键相关技巧

代码格式化:

代码向右:选中代码后,按tab键

代码向左:选中代码后,按shift+tab键

VB中的冒号: 表示可以讲多个语句写到一行上,语句中间用冒号:隔开

四、案例:模拟域名抢购软件

学习的相关代码案例开源:

项目目录:

form1界面设计:

form1相关代码开源:

Private Sub Command1_Click()
If Text1.Text = "aaa" And Text2.Text = "123" Then
    Form2.Show
Else
    MsgBox "输入错误!请重新输入"
    Text1.SetFocus  '定位焦点
    Call Command2_Click
End If
End Sub

Private Sub Command2_Click()
Text1.Text = ""
Text2.Text = ""
End Sub

Private Sub Form_Load()
Form1.Caption = "登录"
End Sub

form2界面设计:

form2的开源代码:

Private Sub Command1_Click()
If MsgBox("是否真的购买?下一步进入付费...", vbYesNo, "消息通知") = vbYes Then
    Label2.Caption = "恭喜成功投资一枚域名!"
Else
    Text1.Text = ""
    Text1.SetFocus
End If
End Sub

Private Sub Form_Load()
Form2.Caption = "域名购买"
End Sub

本文分享自微信公众号 - 编程创造城市(bcczcs),作者:刘金玉编程

原文出处及转载信息见文内详细说明,如有侵权,请联系 yunjia_community@tencent.com 删除。

原始发表时间:2020-04-26

本文参与腾讯云自媒体分享计划,欢迎正在阅读的你也加入,一起分享。

我来说两句

0 条评论
登录 后参与评论

相关文章

  • VB语言基础重要知识点13

    在代码提示选中的时候,选中的这一项,按下tab这个键。这样的好处是能够将我们的光标定位在当前这行代码的末尾。如果按回车键会换行,会降低写代码的效率。

    刘金玉编程
  • 零基础VB教程061期:常用数学函数第一节 弧度/ abs/sin/cos/tan/atn/exp/log等

    刘金玉编程
  • 计算机高职专业VB知识要点002,案例涉及控件:复选框combobox、列表框listbox、框架组frame、单选按钮、多选框

    3.combobox复选框添加一项,使用additem,这个函数的第一个参数表示添加什么文字,第二个参数表示添加到第几项,注意第二个参数从0开始表示

    刘金玉编程
  • 陈能成:城市多尺度综合感知与服务

    本文报告主要阐述了城市多尺度综合感知与服务技术的产生背景、当前技术的最新进展,以及在未来将会遇到的挑战。同时,展示了所在团队在多个领域做出的优秀成果,并分享了这...

    马上科普尚尚
  • CNN中的混淆矩阵 | PyTorch系列(二十三)

    原标题:CNN Confusion Matrix With PyTorch - Neural Network Programming

    AI算法与图像处理
  • bootstrap 弹出框 提示框

    <div class="container" style="padding: 100px 50px 10px;" > <button type="but...

    用户5760343
  • 出海受阻,华为、OPPO、vivo如何才能更好地亮剑?

    孟永辉
  • 微服务部署:蓝绿部署、滚动部署、灰度发布等部署方案对比与总结

    在项目迭代的过程中,不可避免需要”上线“。上线对应着部署,或者重新部署;部署对应着修改;修改则意味着风险。 目前有很多用于部署的技术,有的简单,有的复杂;有的得...

    用户1516716
  • 聊天时该说什么?有些问题,谷歌帮你想好了回答

    维金 编译整理 量子位 出品 | 公众号 QbitAI ? 智能回复(Smart Reply)是种基于人工智能的技术,能针对收到的消息自动做出响应。 这项技术最...

    量子位
  • ROS(indigo)机器人操作系统学习有趣丰富的Gazebo仿真示例evarobot

    通过网页快速了解Linux(Ubuntu)和ROS机器人操作系统,请参考实验楼在线系统如下:

    zhangrelay

扫码关注云+社区

领取腾讯云代金券