王朝知道

分享

 

01.vb 问题 急急！！！！
在第二个窗体中a=form1.text1.text...查看完整版>>vb 问题 急急！！！！02.vb问题6 急急急急
13：Dim a%, b As Boolean Private Sub C1_Click() Timer2.Enabled = true '车往左开b = True End Sub Private Sub Timer1_Timer() a = a + 1 If a > 6 Then a = 1 End If Select Case a Case 1 P1.Picture = Loa...查看完整版>>vb问题6 急急急急03.vb问题1 急急急急
10题：Private Sub C1_Click()If Text1.Text = "123456" ThenText1.Text = "口令正确"Text1. = "" --------这句莫名其妙，你看是不是写错了ElseText2.Text = Text2.Text - 1If Text2.Text > 0 ThenMsgBox "第" & ...查看完整版>>vb问题1 急急急急04.vb问题3 急急急急
8题：Private Sub C1_Click()Dim a As IntegerDim b As IntegerDim t As Longt = 0 a = Val(Text1.Text) b = Val(Text2.Text)If a > b ThenFor i = b To at = t + iNext iElseFor i = a To bt = t + iNext iEnd I...查看完整版>>vb问题3 急急急急05.vb问题2 急急急急
4题：Private Sub Cmd1_Click() Dim c As Integer Dim a As Long c = InputBox("请输入一个数值！") a = 1 For i = 2 To c a = a * i Next i Text1.Text = a putdata "\out.txt", ? End Sub7题：Option Explicit Dim...查看完整版>>vb问题2 急急急急06.vb问题?急急急急!!!!!!!!!!!!
2题：Private Sub C1_Click() Dim c$ c$ = "我的爱好是" If Ch1.Value Then c$ = c$ + Ch1.Caption If Ch2.Value Then c$ = c$ + Ch2.Caption If Ch3.Value Then c$ = c$ + Ch3.Caption MsgBox c$ End Sub 3题：Priv...查看完整版>>vb问题?急急急急!!!!!!!!!!!!07.一个vb问题
Private Sub Command1_Click() Dim a As String, b As String, c, d, e As String a = Val(Text1.Text) If Len(a) <> 2 Then MsgBox "请输入两位数" Text1.SetFocus Else d = Left(a, 1) e = Right(a, 1) b = ...查看完整版>>一个vb问题08.vb的问题
Private Sub Command1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) '打印控制，true表示打印，false表示不打印 Static printFlag As Boolean 'Button=2表示单击的是...查看完整版>>vb的问题09.vb的问题
Private Sub SubmitLogin_Click() ’这部分缺少conn的链接语句和rs的数据声明Set rs = conn.Execute("select * from Admin where ='" & username.Text & "' and ='" & password.Text & "'")在form中的程序代码到其他...查看完整版>>vb的问题10.vb的问题
Timer控件是一个定时发生某个动作的控件，它有一个重要属性Interval，这个值设定每个多长时间执行一次动作，单位是毫秒，还有一个重要事件是Timer，双击Timer控件即可自动产生这个事件的框架，在这个框架里面写入每隔...查看完整版>>vb的问题

 

 

免责声明：本文为网络用户发布，其观点仅代表作者个人观点，与本站无关，本站仅提供信息存储服务。文中陈述内容未经本站证实，其真实性、完整性、及时性本站不作任何保证或承诺，请读者仅作参考，并请自行核实相关内容。