vb.net - 嗨,我正在做一个电子抽奖项目
问题描述
我正在使用 VISUAL STUDIO 2010 进行 ELECTRONIC RAFFLE DRAW 项目。我在我的 sql 数据库中有一个名称列表,并将其显示到列表视图,以及应显示哪些名称的某些条件。现在,我想做的是从此列表视图中随机选择名称。我正在尝试将这些项目从 listview 转换为字符串数组。我也有计时器,当它enable=true
应该将这些字符串数组显示到标签时。
当股票代码是enable=false
. 它应该停止并显示一个特定的名称。我所有的代码都在工作,除了我在这个特定的代码行中得到InvalidCastException
了unhandled
一个
ReDim strng(Name_ListView.Items.Count - 1)
Name_ListView.Items.CopyTo(strng, 0)
Dim strng() As String
Private Sub Frm_Raffle_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
ReDim strng(Name_ListView.Items.Count - 1)
Name_ListView.Items.CopyTo(strng, 0)
End Sub
Public Sub myTimer_Tick(sender As System.Object, e As System.EventArgs) Handles myTimer.Tick
Dim index As Integer = rnd.Next(Name_ListView.Items.Count)
mylblResult.Text = strng(index)
End Sub
解决方案
推荐阅读
- scala - 在 Spark 中将数据帧写入 Teradata
- python - 来自 Pandas Dataframe 的 Hvplot/bokeh 汇总条形图
- sql - 关于为什么此 CASE 声明可能无法返回所需结果的思考
- pgadmin - 如何使用工具 PGADMIN 在 Postgres 中运行多个 sql 语句?
- vuejs2 - Vue 应用程序中的 AWS Amplify GraphQL API 返回 Null
- vba - 如何自动保存来自特定发件人的附件?
- node.js - 如果 api 没有响应,防止请求等待超过 10 秒
- java - 如何使用没有加密的 Bouncycastle 将 GPG 盔甲转换为 ASCII?
- python - 如何使用多种条件点击按钮
- scripting - 鱼不会从带有“return”的函数返回指定的状态代码