1 ... 6 7 8 9 10 11 121314 / 14 页下一页

楼主: ★笨☆天使

请教会VB的,我完全不会用

[复制链接]

★笨☆天使

2008-9-10 06:05 PM

原帖由 goodhermit95 于 2008-9-10 11:07 AM 发表
你很好了啦~
自己去找
有些人很欠打

“去下载VB先”
“哪里下载？？？” 《这个……
“Google 啦”
“找不到……” 《拜托，第一个就是了
“我找到你怎样”
“不要这样啦~~把download link 给我~”

呵呵~~我是在某个贴找到的
不是google找的
我觉得大部分想要学的都是为了用在游戏里
修改游戏的咯
都不是真的想要学

回复 #121 ★笨☆天使的帖子

goodhermit95

2008-9-10 08:13 PM

想不到~~
学VB改不到游戏的
要就C++

还想教你的

★笨☆天使

2008-9-10 08:44 PM

原帖由 goodhermit95 于 2008-9-10 08:13 PM 发表

想不到~~
学VB改不到游戏的
要就C++

还想教你的

我主要不是改游戏啦
是想自己写程序
我对电脑硬件软件都有兴趣

wwolves

2008-9-23 01:37 AM

這里是VB新手的發問區嗎？
我想問一下，如果我要有一個欄設定時間定時啟動/關閉某個exe
我該怎么寫？

我是新來的

這個是我的第一帖

對編程很有興趣什么編程基礎都沒有聽說vb很好學就一頭栽進來了

想學我這里的Porpular全部都是那些C,C#,Asp.net,Java那些比較熱的語言
VB找沒有。。。

[ 本帖最后由 wwolves 于 2008-9-23 01:51 AM 编辑 ]

goodday

2008-9-23 02:29 AM

em0014
我VB 9 年
em0035 《-- 这样 9 年
em0030 〈 -- 也9 年
em0057 〈-- 也9 年

你想em0033 em0038

em0022
你说要什么啊？？

em0034

回复 #124 wwolves 的帖子

goodhermit95

2008-9-23 09:03 PM

明白~~

你要Start什么类型的Program？？

process.start + getprocess,ternimate(0)
至于自动，Set Timer
If datetime.now = textbox1.text then
'todo
end if

wwolves

2008-9-24 12:11 AM

process.start + getprocess,ternimate(0)

這一段是什么

什么都不懂Orz

我想試試看用windows 系統內置的shutdown來做個自動關機的軟件

請問能否設定幾小時，幾分鐘，幾天?機器全部用ms來算嗎？

有什么學vb的ebooks介紹嗎？

網上看到很多visual basic 6的教學，有一些范例不能用在2005上

比如這個

Private Sub Form_activate()

print (20+10)
print (20-10)
print (20*10)
print (20/10)

End Sub

6和2005之間有傳承性嗎？

[ 本帖最后由 wwolves 于 2008-9-24 01:08 AM 编辑 ]

回复 #127 wwolves 的帖子

goodhermit95

2008-9-24 09:39 PM

2005 有一点不同
我这里有一个……
你不是要开process然后关process？
还是你要shutdown罢了

shutdown很容易

run command
process.start("shutdown /s")
shell command
shell("shutdown -s")

然后设定时间。要放一个timer是时间，放一个监视时间到了没有

wwolves

2008-9-28 11:50 PM

剛剛看了某個教學學到了dim...as...
有感而發寫了個算circle area的小軟件(剛剛好老師教到。。。。)

要是要驗證textbox1里的字是不是number應該怎么寫？一直出error

  Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

      Dim radius As Integer
      Dim pi As Decimal
      Dim ans As Decimal

      pi = 3.142

      radius = TextBox1.Text

      ans = pi * radius * radius

      If

      TextBox1.Text = Integer '問題就出在這里

      Then

         TextBox2.Text = (ans)

      Else

         MsgBox("Please insert a number!")

      End If

[ 本帖最后由 wwolves 于 2008-9-29 12:05 AM 编辑 ]

回复 #129 wwolves 的帖子

goodhermit95

2008-9-29 12:08 AM

这个我不会
你可以用别的方法啊

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

      Dim radius As Integer
      Dim pi As Decimal
      Dim ans As Decimal

      pi = 3.142

      radius = TextBox1.Text

      ans = pi * radius * radius

on error goto notinteger
   textbox2.text = ans
exit sub
notinteger:
MsgBox("Please insert a number!")
end sub

1 ... 6 7 8 9 10 11 121314 / 14 页下一页

返回列表

请教会VB的,我完全不会用

回复 #121 ★笨☆天使 的帖子

回复 #124 wwolves 的帖子

回复 #127 wwolves 的帖子

回复 #129 wwolves 的帖子

浏览过的版块

回复 #121 ★笨☆天使的帖子