Question

可以写出这个程序吗用vb

我先自己运行一下，先谢谢了

Answer 1

关键是你要保存的文件格式，text格式的文件多为顺序文件。

二进制文件的读写方式如下：
Private Sub Form_Click()
Dim str As Integer
Open "k:\assc.avi" For Binary As #1 '以二进制写的方式打开文件。
Open "k:\d.avi" For Binary As #2 '以二进制读的方式打开文件。
Do While Not EOF(2)
Get #2, , str '随机方式读文件
Put #1, , str '随机方式写文件
Loop
Close #2
Close #1
End Sub

Answer 2

我就说下那个运行的命令按钮的代码把
如果你把那个相片放在了桌面，就可以直接写
Picture1.Picture = LoadPicture("c:\documents and settings\administrator\桌面\1.jpg")
a = a + 1
Text1 = a
这是运行的单击事件。

Answer 3

Combo控件选择加载的图片数量，右边的Image或picture控件是一个数组，其可见性受Combo控制控制。加载在Image或picture控件中的图片有二幅，分别为硬币的正反面。然后使用随机数并乘以10后取整，如果得到的数字为1，则加载硬币正面图片，反之加载硬币反面图片。

Answer 4

可以啊，挺简单的啊

Answer 5

当然