vb中，如何把x的值填到代码中

来源：百度知道编辑：UC知道时间：2024/05/26 04:32:30

例如
Select Case t1.Text
Case "sdcdwsc"
If t2.Text = 19931022 Then
Timer2.Enabled = False
MsgBox "欢迎"
Shell ("f:\123.cmd")
End
Else
Timer2.Enabled = False
MsgBox "密码错误，退出！", vbCritical, "error"
End
End If
Case "sdcdwt"
If t2.Text = "196739" Then
Timer2.Enabled = False
MsgBox "欢迎"
Shell ("f:\321.cmd")
End
Else
Timer2.Enabled = False
MsgBox "密码错误，退出！", vbCritical, "error"
End
End If
Case "sdcdtzz"
If t2.Text = "680711" Then
Timer2.Enabled = False
MsgBox "欢迎"
Shell ("f:\213.cmd")
End
Else
Timer2.Enabled = False
MsgBox "密码错误，退出！", vbCritical, "error"
End
End If
'我想把x的值导入到这里
Case Else
Timer2.Enabled = False
MsgBox "用户名

可以先把知道的数据保存到可变的数组中，程序运行后再通过一个循环检查全部的数组数据。同时你还可以通过其他方法追加新的数据到数组（就是你要的X的值）

你是说要把X这段代码添加到程序中？

vb中，如何把x的值填到代码中 VB中如何写这样的代码在vb中如何写代码可以把修改的数据添加到access数据库中？ VB中如何把变量当作代码运行? vb中把十进制转换成十六进制日的代码 VB中如何编辑关闭窗口的按钮代码 VB中如何打开一个工程的代码窗口 VB如何提取htm代码中固定的字符串 VB中更改浏览器默认主页的代码如何实现 VB在代码中如何拖延时间