wdjh.net
当前位置:首页 >> 用VB写一个小程序. >>

用VB写一个小程序.

vb6代码如下,添加模块,工程--属性--启动对象选择sub main Sub main() Open "c:\temp\25.txt" For Input As #1 Clipboard.Clear Clipboard.SetText StrConv(InputB(LOF(1), 1), vbUnicode) End Sub

按键精灵配合excel就OK了。要看到实际的做题网页才能测试和开发。

因为我的电脑上没有vb所以我用易语言代替,反正原理都是一样的。谢谢采纳

使用VB编写整人小游戏程序,可以参考如下:更改中文即可。 Private Sub Form_Load() Dim wood As String MsgBox "谁是猪", vbCritical, "提示" '这里写捉弄人的话 wood = InputBox("请输入答案:") If wood = "我" Then '答案可以自己设 End Else...

Private Sub Command1_Click() Dim a As Single Dim b As String a = Val(Text1.Text) b = 2 * Sqr((0.5 * a) ^ 2 * 2 / 3) Text2.Text = b End Sub

需要两个函数,一个因子和计算,一个因子和输出。程序窗体放置一个文本框,设置其MultiLine为True。源程序如下: Option Explicit Dim I As Long, J As Long, X As Long Private Sub Form_Load() Me.Show For I = 1 To 10000 DoEvents X = Yzh(I...

Private Sub Command1_Click(Index As Integer) 这句的()里面变成空

点击文件,生成你的工程名字.exe就行了

答案是158(出题者真e xin) 开始逐步进行: 根据前三句初始化: a=5 b=8 c=1 第一个判断条件: a>b 5>8是错的 所以第一个判断条件不执行 第二个判断条件: a>c 5>1是对的 执行第二个判断条件 执行结果:x=a x=a=5 a=c a=c=1 c=x c=x=5 结果是x=...

网站首页 | 网站地图
All rights reserved Powered by www.wdjh.net
copyright ©right 2010-2021。
内容来自网络,如有侵犯请联系客服。zhit325@qq.com