登录
首页 » VB源码 » VB 石头剪刀布猜拳游戏

VB 石头剪刀布猜拳游戏

于 2023-07-03 发布 文件大小:355.96 kB
0 50
下载积分: 2 下载次数: 1

代码说明:

VB 石头剪刀布猜拳游戏,游戏操作方法:在窗体左下方的石头、剪子、布图标中,单击用户想要出的一种手势,电脑会自动给出该手势,任一方赢了都会给出相应提示图片信息。游戏结果判定逻辑:   将用户和计算机所选的图片的序号合成一个字符串,根据这个字符串判断用户的输赢   00 石头对石头 重来   01 石头对剪子 用户赢   02 石头对布 用户输   10 剪子对石头 用户输   11 剪子对剪子 重来   12 剪子对布 用户赢   20 布对石头 用户赢   21 布对剪子 用户输   22 布对布 重来

下载说明:请别用迅雷下载,失败请重下,重下不扣分!

发表评论

0 个回复

  • vb.net 串口通讯测试项目
    vb.net 串口通讯测试项目源码,本源码用于练习SerialPort控件、DataReceived事件、16进制操作,同时用于工程需要。作者:李潇海。   运行后先检测测试需用的COM端口是否打开,弹出提示。   测试时请确保发送周期为正整数!串口测试窗口中,可配置参数:端口、波特率、检验位、数据位、停止位等,支持以十六进制发送和接收数据,还可以毫秒定时发送数据。操作方式上,可设置自动清空测试数据,发送文件或发送数据等。右侧为串口测试时的结果显示区。
    2023-02-14 09:00:03下载
    积分:1
  • VB.NET将任意图像文件设置为鼠标形状
    VB.NET将任意图像文件设置为鼠标形状,变换光标,光标文件读取,支持自定义光标的图像文件格式为:图像文件(*.jpg;*.gif;*.png;*.bmp)。操作方法挺简单的,点击 按钮选择一个格式合适的光标文件即可,注意查看鼠标光标的变化。
    2022-05-05 06:26:41下载
    积分:1
  • 简单的VB6 播放视频文件程序
    简单的VB6 播放视频文件程序,也算是一个简单的视频文件播放器吧,核心基于Windows中的msdxm.ocx控件,可控制播放文件开始暂停、快进快退等简单操作,在测试时如果程序不能运行,将本目录中的msdxm.ocx文件拷贝到C:WINDOWSsystem32目录下,然后,在"开始"/"运行"中键入regsvr32 C:WINDOWSsystem32msdxm.ocx, 回车再运行程序即可.
    2022-09-24 03:35:03下载
    积分:1
  • VB 使用DataGrid显示书名数据表
    VB 使用DataGrid显示书名数据表,这个例子相当简单,主要是学习在VB编程中如何使用DataGrid数据网格控件,将数据库内容读取出来,然后绑定到DataGrid表格中显示:   Adodc1.ConnectionString = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=book"   Adodc1.RecordSource = "select * from 书名"   Set DataGrid1.DataSource = Adodc1   DataGrid1.Columns(3).NumberFormat = "$0.00"   DataGrid1.Columns(4).NumberFormat = "$0.00"   End Sub
    2023-04-26 14:25:03下载
    积分:1
  • VB 演示如何使用WeekdayName获取星期名称
    VB 演示如何获取星期名称,这里获取星期几是使用了VB内置的WeekdayName函数,将获取到的日期和星期几直接显示在Text控件中,下面是这个函数的具体用法:   Private Sub Command1_Click()   Text2.Text = WeekdayName(Weekday(CDate(Text1)), vbMonday)   End Sub   Private Sub Form_Load()   Text1.Text = Date   Text2.Text = WeekdayName(Weekday(CDate(Text1)), vbMonday)   End Sub   在VB6.0 IDE环境中编译此源代码,生成如演示截图所示的运行效果。
    2022-11-30 01:55:03下载
    积分:1
  • vb 通过程序设置系统日期和时间的格式
    vb 通过程序设置系统日期和时间的格式,设定时可以改变长日期格式,短日期格式,改变时间格式,看着很像是以前Windows XP时候的时间设置窗口的功能。请注意,日期格式设置成功,需要重新启动计算机或注销后可以看到新的短日期格式!以下是改变日期格式其中的一个例子代码,仅供参考:   Dim ret2 As Long   Dim sd As String   ret2 = RegOpenKey(HKEY_CURRENT_USER, "Control PanelInternational", hKey)   If ret2 = 0 Then    sd = Combo1.Text    RegSetValueEx hKey, "sShortDate", "0", REG_SZ, ByVal sd, LenB(StrConv(sd, vbFromUnicode))    MsgBox "日期格式已设置成功,重新启动计算机或注销后可以看到新的短日期格式!", , "提示窗口"   End If
    2023-06-21 17:25:03下载
    积分:1
  • 一个实现图像旋转效果的VB实例
    一个实现图像的旋转效果实例,由VB6.0编写,前几年的源码,本程序实现图片的逆时针旋转90度,单击窗口中的按钮即可实现旋转功能,这部分代码,可参考如下代码:   逆时针旋转90度   Private Sub Command2_Click()    For j = 0 To h Step 1    For i = 0 To w Step 1    BitBlt Picture2.hDC, i, j, 1, 1, Me.Picture1.hDC, j, i, srCopy    Next i    Next j   End Sub
    2023-07-06 04:55:02下载
    积分:1
  • VB.NET 多线程TCP端口扫描工具
    VB.NET 多线程TCP端口扫描工具,使用前请输入要扫描的网段IP和端口,本程序可将扫描到的开放端口数量显示在窗口中,扫描时应用了多线程技术,扫描时显示当前线程数,适时显示扫描进度和扫描时间,以毫秒计时,扫描速度提升了不少。   注:本程序仅能扫描开放的端口,被禁止和未开放的端口不能被扫描到。
    2022-05-25 05:47:04下载
    积分:1
  • 树状导航菜单 +窗体分隔+框架窗口VB范例
    本实例是一个比较综合、完整的窗口制作实例,演示了树状导航菜单的制作方法,还有窗口中各种菜单的实现步骤,同时还演示了如何对窗口进行分隔显示,实现了一个带树形菜单的框架式程序主窗口界面,可广泛应用于VB的各种信息管理系统的开发中。VB源代码范例,在VB6.0环境下完美编译运行。
    2022-09-10 22:15:03下载
    积分:1
  • VB 石头剪刀布猜拳游戏
    VB 石头剪刀布猜拳游戏,游戏操作方法:在窗体左下方的石头、剪子、布图标中,单击用户想要出的一种手势,电脑会自动给出该手势,任一方赢了都会给出相应提示图片信息。游戏结果判定逻辑:   将用户和计算机所选的图片的序号合成一个字符串,根据这个字符串判断用户的输赢   00 石头对石头 重来   01 石头对剪子 用户赢   02 石头对布 用户输   10 剪子对石头 用户输   11 剪子对剪子 重来   12 剪子对布 用户赢   20 布对石头 用户赢   21 布对剪子 用户输   22 布对布 重来
    2023-07-03 14:45:03下载
    积分:1
  • 696518资源总数
  • 105578会员总数
  • 20今日下载